SF.net SVN: ledger-smb:[2904] branches/1.2/bin/admin.pl

[..hidden..]

Revision: 2904
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=2904&view=rev
Author:   einhverfr
Date:     2010-02-22 19:31:30 +0000 (Mon, 22 Feb 2010)

Log Message:
-----------
Fixing whitespace bug for real this time

Modified Paths:
--------------
    branches/1.2/bin/admin.pl

Modified: branches/1.2/bin/admin.pl
===================================================================
--- branches/1.2/bin/admin.pl	2010-02-22 17:42:52 UTC (rev 2903)
+++ branches/1.2/bin/admin.pl	2010-02-22 19:31:30 UTC (rev 2904)
@@ -823,14 +823,15 @@
 
     $myconfig = LedgerSMB::User->new("$form->{login}");
 
-    # redo acs variable and delete all the acs codes
+   # redo acs variable and delete all the acs codes
     @acs = split /;/, $form->{acs};
     $form->{acs} = "";
 
     foreach $item (@acs) {
 
-        $item = $form->escape( $item, 1 );
-
+        if ($item =~ /\s/){
+            $item = $form->escape( $item, 1 );
+        }
         if ( !$form->{$item} ) {
             $form->{acs} .= $form->unescape( $form->unescape("$item") ) . ";";
         }


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