Changeset 193
- Timestamp:
- 02/08/05 18:28:17 (4 years ago)
- Files:
-
- manage/trunk/manage (modified) (1 diff)
- manage/trunk/META.yml (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
manage/trunk/manage
r191 r193 239 239 240 240 next if $cmd =~ /^[A-Z]+$/; 241 $cmd =~ s/^(\d+\))?( \$(\*)?)?//;241 $cmd =~ s/^(\d+\))?({.+?})?(\$(\*)?)?//; 242 242 if ($type eq 'HASH' and $grammar->{$key}->{HELP}) { 243 243 $type = ref($grammar->{$key}->{HELP}); manage/trunk/META.yml
r186 r193 2 2 #XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX# 3 3 name: CLI 4 version: 0. 14 version: 0.2 5 5 version_from: CLI.pm 6 installdirs: perl6 installdirs: site 7 7 requires: 8 8
