Clean trailing slahes from module names.
authorZdeněk Šustr <sustr4@cesnet.cz>
Mon, 26 Jan 2009 15:28:53 +0000 (15:28 +0000)
committerZdeněk Šustr <sustr4@cesnet.cz>
Mon, 26 Jan 2009 15:28:53 +0000 (15:28 +0000)
org.glite.lb/etics-tag-with-subsystems.pl
org.glite.lb/etics-tag.pl

index 57d737b..18779c0 100755 (executable)
@@ -22,6 +22,9 @@ usage: $0 [-c <current configuration>] module.name
 };
         if (defined $opt_h) {die $usage};
        die $usage unless $module;
+
+        #Clean possible trailing '/' (even multiple occurrences :-) from module name
+        $module=~s/\/+$//;
  
         if (defined $opt_c) {
 
index cd60f06..b006ad6 100755 (executable)
@@ -33,6 +33,9 @@ usage: $0 [-i maj|min|rev|age|none|<sigle_word_age>] [-g] [-c <current configura
        if (defined $opt_h) {die $usage};
        die $usage unless $module;
 
+       #Clean possible trailing '/' (even multiple occurrences :-) from module name
+       $module=~s/\/+$//;
+
        switch ($opt_i) {
                case "maj" {$increment="j"}
                case "min" {$increment="i"}