Changeset 382 for LATMOS-Accounts/lib/LATMOS/Accounts/Utils.pm

Timestamp:

08/21/09 15:36:20 (15 years ago)

Author:

nanardon

Message:

• strip white space at en of line

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Utils.pm (modified) (1 diff)

LATMOS-Accounts/lib/LATMOS/Accounts/Utils.pm

@@ -63 +63 @@
         chomp($line);
         my ($attr, $value) = $line =~ /^\s*(\S+):\s*(.*)\s*$/ or next;
+        $value =~ s/\s*$//;
         if ($attributes{$attr}) {
             if (ref $attributes{$attr}) {