| … | … | ||
|---|---|---|---|
| 1032 | ++$cfg->{dirty}; | 1032 | ++$cfg->{dirty}; |
| 1033 | }; | 1033 | }; |
| 1034 | } | 1034 | } |
| 1035 | 1035 | ||
| 1036 | for (keys %CMD) { | 1036 | for (keys %CMD) { |
| 1037 | $CMD{$1} = $CMD{$_} if /^set(.*)$/; | 1037 | $CMD{$1} ||= $CMD{$_} if /^set(.*)$/; |
| 1038 | } | 1038 | } |
| 1039 | 1039 | ||
| 1040 | sub docmd { | 1040 | sub docmd { |
| 1041 | my $cmd = shift @ARGV; | 1041 | my $cmd = shift @ARGV; |
| 1042 | 1042 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |