Changeset 193

Show
Ignore:
Timestamp:
02/08/05 18:28:17 (4 years ago)
Author:
athomas
Message:

Fixed bug where grouping tokens were not stripped on error dumps.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • manage/trunk/manage

    r191 r193  
    239239 
    240240                                next if $cmd =~ /^[A-Z]+$/; 
    241                                 $cmd =~ s/^(\d+\))?(\$(\*)?)?//; 
     241                                $cmd =~ s/^(\d+\))?({.+?})?(\$(\*)?)?//; 
    242242                                if ($type eq 'HASH' and $grammar->{$key}->{HELP}) { 
    243243                                        $type = ref($grammar->{$key}->{HELP}); 
  • manage/trunk/META.yml

    r186 r193  
    22#XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX# 
    33name:         CLI 
    4 version:      0.1 
     4version:      0.2 
    55version_from: CLI.pm 
    6 installdirs:  perl 
     6installdirs:  site 
    77requires: 
    88