Subversion Repositories DevTools

Rev

Rev 263 | Rev 275 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 263 Rev 267
Line 2796... Line 2796...
2796
    my $Style = "C";
2796
    my $Style = "C";
2797
    my $FileName;
2797
    my $FileName;
2798
    my $VersionFiles;
2798
    my $VersionFiles;
2799
    my $IconName;
2799
    my $IconName;
2800
    my $DefinitionsOnly;
2800
    my $DefinitionsOnly;
-
 
2801
    my @opts;
-
 
2802
    my $supports_opts;
2801
 
2803
 
2802
    StartBuildPhase();                          # Starting the build phase. No more data collection
2804
    StartBuildPhase();                          # Starting the build phase. No more data collection
2803
 
2805
 
2804
    if ( defined($Prefix) && $Prefix =~ /^--/ )
2806
    if ( defined($Prefix) && $Prefix =~ /^--/ )
2805
    {
2807
    {
Line 2824... Line 2826...
2824
                $Mode = 'defs';
2826
                $Mode = 'defs';
2825
                $ModePrefix = "";
2827
                $ModePrefix = "";
2826
 
2828
 
2827
            } elsif ( /^--Style=(.*)/ ) {
2829
            } elsif ( /^--Style=(.*)/ ) {
2828
                $Style = $1;
2830
                $Style = $1;
-
 
2831
                $supports_opts = 1 if ( $Style =~ /^WinRC/i );
2829
 
2832
 
2830
            } elsif ( /^--File=(.*)/ ) {
2833
            } elsif ( /^--File=(.*)/ ) {
2831
                $FileName = $1;
2834
                $FileName = $1;
2832
 
2835
 
2833
            } elsif ( /^--Icon=(.*)/ ) {
2836
            } elsif ($supports_opts ) {
2834
                $IconName = $1;
2837
                push @opts, $_;
2835
 
2838
 
2836
            } elsif ( /^--Definitions/ ) {
-
 
2837
                $DefinitionsOnly = 1;
-
 
2838
                
-
 
2839
            } else {
2839
            } else {
2840
                Error ("BuildVersion: Unknown option: $_");
2840
                Error ("BuildVersion: Unknown option: $_");
2841
 
2841
 
2842
            }
2842
            }
2843
        }
2843
        }
Line 2870... Line 2870...
2870
 
2870
 
2871
    } elsif ( $Style =~ /^Properties/i ) {
2871
    } elsif ( $Style =~ /^Properties/i ) {
2872
        BuildVersionProperties( $FileName, $Prefix );
2872
        BuildVersionProperties( $FileName, $Prefix );
2873
 
2873
 
2874
    } elsif ( $Style =~ /^WinRC/i ) {
2874
    } elsif ( $Style =~ /^WinRC/i ) {
2875
        BuildVersionWinRC( $FileName, $IconName, $DefinitionsOnly );
2875
        BuildVersionWinRC( $FileName, @opts );
2876
 
2876
 
2877
    } elsif ( $Style eq "C" ) {
2877
    } elsif ( $Style eq "C" ) {
2878
        BuildVersionC    ( $Prefix, $Type )     if ( $VersionFiles );
2878
        BuildVersionC    ( $Prefix, $Type )     if ( $VersionFiles );
2879
        BuildVersionCdefs( $Mode, $ModePrefix ) if ( $Mode );
2879
        BuildVersionCdefs( $Mode, $ModePrefix ) if ( $Mode );
2880
 
2880