Subversion Repositories DevTools

Rev

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

Rev 5783 Rev 6133
Line 109... Line 109...
109 
    if ( $#args == 2 && ($args[2] eq 'cots' || $args[2] eq 'tool' ))
 109 
    if ( $#args == 2 && ($args[2] eq 'cots' || $args[2] eq 'tool' ))
110 
    {
 110 
    {
111 
        $result{RELAXED_VERSION} = 1;           # Legacy (COTS) packages have no number scheme
 111 
        $result{RELAXED_VERSION} = 1;           # Legacy (COTS) packages have no number scheme
112 
    }
 112 
    }
113 
 
 113 
 
- 
 
 114 
    if ( $#args == 0 && ($args[0] =~ '(.*)\s+(.*)\s+(cots)$' || $args[0] =~ '(.*)\s+(.*)\s+(tool)$' ))
- 
 
 115 
    {
- 
 
 116 
        $result{RELAXED_VERSION} = 1;           # Legacy (COTS) packages have no number scheme
- 
 
 117 
        $args[0] = $1;
- 
 
 118 
        $args[1] = $2;
- 
 
 119 
        $args[2] = $3;
- 
 
 120 
    }
- 
 
 121 
 
- 
 
 122 
    if ( $#args == 1 && ($args[1] =~ '(.*)[. ](cots)$' || $args[1] =~ '(.*)[. ](tool)$' ))
- 
 
 123 
    {
- 
 
 124 
        $result{RELAXED_VERSION} = 1;           # Legacy (COTS) packages have no number scheme
- 
 
 125 
        $args[1] = $1;
- 
 
 126 
        $args[2] = $2;
- 
 
 127 
    }
- 
 
 128 
 
114 
    #
 129 
    #
115 
    #   Process non-flagged options
 130 
    #   Process non-flagged options
116 
    #
 131 
    #
117 
    Error ("BuildName. No name provided") unless ( defined($args[0]) );
 132 
    Error ("BuildName. No name provided") unless ( defined($args[0]) );
118 
    my $BUILDNAME = $args[0];
 133 
    my $BUILDNAME = $args[0];