Mercurial > hg > foxridge-archiver

changeset 27:2890dd75d2f6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed bug in sstrip with whitespace at the end of the string...
author casties
date Fri, 10 Feb 2006 18:01:18 +0100
parents 24d9dd63ae93
children 3ff9da4b7c87
files MPIWGStor.pm
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/MPIWGStor.pm	Wed Dec 07 18:31:04 2005 +0100
+++ b/MPIWGStor.pm	Fri Feb 10 18:01:18 2006 +0100
@@ -12,7 +12,7 @@
 	    $file_perm);
 use Exporter;
 
-$VERSION = 0.6.1; #  ROC 8.8.2005
+$VERSION = 0.6.2; #  ROC 10.2.2006
 
 @ISA = qw(Exporter);
 
@@ -162,7 +162,7 @@
 sub sstrip {
     my ($name) = @_;
     
-    if ($name =~ /\s*(.*)\s*/) {
+    if ($name =~ /^\s*(.*?)\s*$/) {
 	return $1;
     }
     return $name;