… | … | ||
---|---|---|---|
35 | }; | 35 | }; |
36 | } | 36 | } |
37 | 37 | ||
38 | %CFG = ( | 38 | %CFG = ( |
39 | version => 1, | 39 | version => 1, |
40 | dirty => 1, | ||
41 | ); | 40 | ); |
42 | } | 41 | } |
43 | 42 | ||
44 | sub save { | 43 | sub save { |
45 | return unless delete $CFG{dirty}; | 44 | return unless delete $CFG{dirty}; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |