Subversion Repositories DevTools

Rev

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

Rev 231 Rev 235
Line 2772... Line 2772...
2772
    my ( $Prefix, $Type, $Mode ) = @_;
2772
    my ( $Prefix, $Type, $Mode ) = @_;
2773
    my $ModePrefix;
2773
    my $ModePrefix;
2774
    my $Style = "C";
2774
    my $Style = "C";
2775
    my $FileName;
2775
    my $FileName;
2776
    my $VersionFiles;
2776
    my $VersionFiles;
-
 
2777
    my $IconName;
2777
 
2778
 
2778
    StartBuildPhase();                          # Starting the build phase. No more data collection
2779
    StartBuildPhase();                          # Starting the build phase. No more data collection
2779
 
2780
 
2780
    if ( defined($Prefix) && $Prefix =~ /^--/ )
2781
    if ( defined($Prefix) && $Prefix =~ /^--/ )
2781
    {
2782
    {
Line 2804... Line 2805...
2804
                $Style = $1;
2805
                $Style = $1;
2805
 
2806
 
2806
            } elsif ( /^--File=(.*)/ ) {
2807
            } elsif ( /^--File=(.*)/ ) {
2807
                $FileName = $1;
2808
                $FileName = $1;
2808
 
2809
 
-
 
2810
            } elsif ( /^--Icon=(.*)/ ) {
-
 
2811
                $IconName = $1;
-
 
2812
 
2809
            } else {
2813
            } else {
2810
                Error ("BuildVersion: Unknown option: $_");
2814
                Error ("BuildVersion: Unknown option: $_");
2811
 
2815
 
2812
            }
2816
            }
2813
        }
2817
        }
Line 2840... Line 2844...
2840
 
2844
 
2841
    } elsif ( $Style =~ /^Properties/i ) {
2845
    } elsif ( $Style =~ /^Properties/i ) {
2842
        BuildVersionProperties( $FileName, $Prefix );
2846
        BuildVersionProperties( $FileName, $Prefix );
2843
 
2847
 
2844
    } elsif ( $Style =~ /^WinRC/i ) {
2848
    } elsif ( $Style =~ /^WinRC/i ) {
2845
        BuildVersionWinRC( $FileName );
2849
        BuildVersionWinRC( $FileName, $IconName );
2846
 
2850
 
2847
    } elsif ( $Style eq "C" ) {
2851
    } elsif ( $Style eq "C" ) {
2848
        BuildVersionC    ( $Prefix, $Type )     if ( $VersionFiles );
2852
        BuildVersionC    ( $Prefix, $Type )     if ( $VersionFiles );
2849
        BuildVersionCdefs( $Mode, $ModePrefix ) if ( $Mode );
2853
        BuildVersionCdefs( $Mode, $ModePrefix ) if ( $Mode );
2850
 
2854