SF.net SVN: ledger-smb:[6029] trunk/bin

[..hidden..]

Revision: 6029
          http://sourceforge.net/p/ledger-smb/code/6029
Author:   einhverfr
Date:     2013-09-15 02:49:54 +0000 (Sun, 15 Sep 2013)
Log Message:
-----------
Fixing bug 879, new button breaks form

Modified Paths:
--------------
    trunk/bin/aa.pl
    trunk/bin/arapprn.pl

Modified: trunk/bin/aa.pl
===================================================================
--- trunk/bin/aa.pl	2013-09-14 13:50:55 UTC (rev 6028)
+++ trunk/bin/aa.pl	2013-09-15 02:49:54 UTC (rev 6029)
@@ -99,7 +99,7 @@
 
 sub new_screen {
     use LedgerSMB::Form;
-    my @reqprops = qw(ARAP vc dbh stylesheet batch_id);
+    my @reqprops = qw(ARAP vc dbh stylesheet batch_id script);
     $oldform = $form;
     $form = {};
     bless $form, Form;

Modified: trunk/bin/arapprn.pl
===================================================================
--- trunk/bin/arapprn.pl	2013-09-14 13:50:55 UTC (rev 6028)
+++ trunk/bin/arapprn.pl	2013-09-15 02:49:54 UTC (rev 6029)
@@ -40,7 +40,7 @@
 #
 
 package lsmb_legacy;
-use Error qw(:try);
+use Try::Tiny;
 use LedgerSMB::Template;
 use LedgerSMB::Company_Config;
 
@@ -364,15 +364,10 @@
         locale => $locale,
 	no_auto_output => 1,
         format => uc $form->{format} );
-    try {
-        $template->render($form);
-        $template->output(%{$form});
-    }
-    catch Error::Simple with {
-        my $E = shift;
-        $form->error( $E->stacktrace );
-    };
 
+    $template->render($form);
+    $template->output(%{$form});
+
     if (%$old_form) {
         $old_form->{invnumber} = $form->{invnumber};
         $old_form->{invtotal}  = $form->{invtotal};

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.


------------------------------------------------------------------------------
LIMITED TIME SALE - Full Year of Microsoft Training For Just $49.99!
1,500+ hours of tutorials including VisualStudio 2012, Windows 8, SharePoint
2013, SQL 2012, MVC 4, more. BEST VALUE: New Multi-Library Power Pack includes
Mobile, Cloud, Java, and UX Design. Lowest price ever! Ends 9/22/13. 
http://pubads.g.doubleclick.net/gampad/clk?id=64545871&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits