[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

SF.net SVN: ledger-smb:[6359] trunk



Revision: 6359
          http://sourceforge.net/p/ledger-smb/code/6359
Author:   einhverfr
Date:     2014-01-03 08:44:56 +0000 (Fri, 03 Jan 2014)
Log Message:
-----------
Fixing syntax errors

Modified Paths:
--------------
    trunk/LedgerSMB/Template/DB.pm
    trunk/tools/load_templates.pl

Modified: trunk/LedgerSMB/Template/DB.pm
===================================================================
--- trunk/LedgerSMB/Template/DB.pm	2014-01-03 07:48:46 UTC (rev 6358)
+++ trunk/LedgerSMB/Template/DB.pm	2014-01-03 08:44:56 UTC (rev 6359)
@@ -60,7 +60,7 @@
 sub get_template {
     my ($module, $template_name, $language_code, $format) = @_;
     my ($temp) = __PACKAGE__->call_procedure(
-         procname => 'template__get'
+         procname => 'template__get',
          args => [$template_name, $language_code, $format]
     );
     my $text = $temp->{template};
@@ -76,7 +76,7 @@
 sub get_by_id {
     my ($module, $id) = @_;
     my ($temp) = __PACKAGE__->call_procedure(
-         procname => 'template__get_by_id'
+         procname => 'template__get_by_id',
          args => [$id]
     );
     return __PACKAGE__->new(%$temp);
@@ -103,7 +103,7 @@
     my $module = shift @_;
     my %args = @_;
     my ($temp) = __PACKAGE__->call_procedure(
-         procname => 'template__get'
+         procname => 'template__get',
          args => [$args{template_name}, $args{language_code}, $args{format}]
     );
     return __PACKAGE__->new(%$temp);

Modified: trunk/tools/load_templates.pl
===================================================================
--- trunk/tools/load_templates.pl	2014-01-03 07:48:46 UTC (rev 6358)
+++ trunk/tools/load_templates.pl	2014-01-03 08:44:56 UTC (rev 6359)
@@ -59,7 +59,7 @@
 if ($to_load eq '--help' or $to_load =~ /^-/ or !$to_load){
     print $help_msg;
     exit 0;
-};
+}
 
 ### FUNCTIONS
 
@@ -103,7 +103,7 @@
 $type = 'dir' if -d $to_load;
 
 die 'Bad file type: Must be a file or directory or file does not exist' 
-   unless $type;
+   unless defined $type;
 
 # load
 

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


------------------------------------------------------------------------------
Rapidly troubleshoot problems before they affect your business. Most IT 
organizations don't have a clear picture of how application performance 
affects their revenue. With AppDynamics, you get 100% visibility into your 
Java,.NET, & PHP application. Start your 15-day FREE TRIAL of AppDynamics Pro!
http://pubads.g.doubleclick.net/gampad/clk?id=84349831&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits