Changeset 30735 for main/trunk/greenstone2/bin/script/gti.pl

Timestamp:

2016-08-22T20:44:10+12:00 (7 years ago)

Author:

ak19

Message:

Forgot to clean up comments that were no longer necessary

File:

• main/trunk/greenstone2/bin/script/gti.pl (modified) (2 diffs)

main/trunk/greenstone2/bin/script/gti.pl

@@ -1622 +1622 @@
         # So find the first :/= char not preceded by \. That will be the true separator of a chunk_key and its value chunk_text
 
-        if ($line =~ m/^(\S*?[^\\])[:|=](.*)$/) { #if ($line =~ /^(\S+?)[:|=](.*)$/) {
+        if ($line =~ m/^(\S*?[^\\])[:|=](.*)$/) {
             # Line contains a dictionary string
 
@@ -1659 +1659 @@
     # So just as in the previous subroutine, find the first (leftmost) : or = char not preceded by \. 
     # That will be the true separator of a chunk_key and its value chunk_text
-    $chunk_text =~ s/^(\S*?[^\\])[:|=](\s*)//s; # $chunk_text =~ s/^(\S+)[:|=](\s*)//s;
+    $chunk_text =~ s/^(\S*?[^\\])[:|=](\s*)//s;
 
     $chunk_text =~ s/(\s*)$//s;  # Remove any nasty whitespace, carriage returns etc.