Mercurial > pub > Impl

diff Lib/IMPL/AppException.pm @ 266:89179bb8c388

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*corrected TTView to handle plain (and undefined) values *added URL generating methods to Application::Action *fixed the compare validatior for schemas
author cin
date Mon, 14 Jan 2013 03:10:06 +0400
parents 93963ec449c5
children 4ddb27ff4a0b
line wrap: on
line diff
--- a/Lib/IMPL/AppException.pm	Thu Jan 10 03:25:02 2013 +0400
+++ b/Lib/IMPL/AppException.pm	Mon Jan 14 03:10:06 2013 +0400
@@ -16,7 +16,7 @@
 
 use IMPL::declare {
     base => [
-        'IMPL::Object' => '@_'
+        'IMPL::Object' => undef
     ],
     props => [
         source => PROP_RO,
@@ -29,9 +29,9 @@
 	my $self = shift;
 	
 	my $instance = $self->next::method(@_);
-    
-    $instance->callStack(longmess);
-    $instance->source(shortmess);
+	
+	$instance->source(shortmess);
+	$instance->callStack(longmess);
     
     return $instance;
 }