Changeset 55

Timestamp:

Feb 18, 2003, 9:54:20 AM (23 years ago)

Author:

eugene

Message:

fixed version variable

File:

• trunk/Ohana/src/perl/src/normalize (modified) (1 diff)

trunk/Ohana/src/perl/src/normalize

@@ -1 +1 @@
 #!/usr/bin/env perl
 
-$version = "\$Revision: 1.2 $";
+$revline = "\$Revision: 1.3 $?";
+($version) = $revline =~ m|\$Revision:\s*(\S*)|;
 
 # default variable values