- support %global
authorMichael Schröder <mls@suse.de>
Tue, 20 Mar 2007 13:12:54 +0000 (13:12 +0000)
committerMichael Schröder <mls@suse.de>
Tue, 20 Mar 2007 13:12:54 +0000 (13:12 +0000)
- fix bug in macro name parsing

Build/Rpm.pm

index 8f53013..fdb8c78 100644 (file)
@@ -182,7 +182,7 @@ sub parse {
          $mactest = 1;
        }
        $macname =~ s/^[\!\?]+//;
-       $macname =~ s/ .*//;
+       $macname =~ s/^([^:\s]*)\s.*/$1/;
        my $macalt;
        ($macname, $macalt) = split(':', $macname, 2);
        if ($macname eq '%') {
@@ -191,7 +191,7 @@ sub parse {
        } elsif ($macname eq '(') {
          $line = 'MACRO';
          last;
-       } elsif ($macname eq 'define') {
+       } elsif ($macname eq 'define' || $macname eq 'global') {
          if ($line =~ /^\s*([0-9a-zA-Z_]+)(\([^\)]*\))?\s*(.*?)$/) {
            my $macname = $1;
            my $macargs = $2;