… | … | ||
---|---|---|---|
26 | >k::save_state; | 26 | >k::save_state; |
27 | Storable::nstore($state, $staterc); | 27 | Storable::nstore($state, $staterc); |
28 | appwin::status("save_state", "layout saved"); | 28 | appwin::status("save_state", "layout saved"); |
29 | } | 29 | } |
30 | 30 | ||
31 | sub toxml($) { | ||
32 | local $_ = shift; | ||
33 | s/&/&/g; | ||
34 | s/</</g; | ||
35 | s/]]>/]]>/g; | ||
36 | $_; | ||
37 | } | ||
38 | |||
31 | 1; | 39 | 1; |
32 | 40 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |