Changeset 3382

Show
Ignore:
Timestamp:
12/19/06 19:36:22 (6 years ago)
Author:
qldrob
Message:

Fix <version> being incorrectly picked up.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • modules/branches/2.2/publish.pl

    r2788 r3382  
    1212  $rawname = "unset"; 
    1313  while (<FH>) { 
    14     if (/<version>(.+)<\/version>/) { $vers = $1; } 
     14    if ($vers == 'unset' && /<version>(.+)<\/version>/) { $vers = $1; } 
    1515    if (/<rawname>(.+)<\/rawname>/) { $rawname = $1; } 
    1616    $newxml .= $_;