Changeset 11934

Timestamp:

2006-06-19T15:38:37+12:00 (18 years ago)

Author:

mdewsnip

Message:

Now removes dots from the end of function values.

File:

• trunk/cic-hcap/perllib/plugins/CICPlug.pm (modified) (1 diff)

trunk/cic-hcap/perllib/plugins/CICPlug.pm

@@ -559 +559 @@
         # Create place functions mapping
         $place_function = lc($place_function);
+        $place_function =~ s/\.$//;
         $place_function =~ s/\(.*\)//g;
         $place_function =~ s/^\s*//;