… | … | ||
---|---|---|---|
114 | [ | 114 | [ |
115 | $::PICKUP_ENABLE->{state} | 115 | $::PICKUP_ENABLE->{state} |
116 | ? "Disable automatic pickup" | 116 | ? "Disable automatic pickup" |
117 | : "Enable automatic pickup", | 117 | : "Enable automatic pickup", |
118 | sub { $::PICKUP_ENABLE->toggle } | 118 | sub { $::PICKUP_ENABLE->toggle } |
119 | ], | ||
120 | ["Quit", | ||
121 | sub { | ||
122 | if ($::CONN) { | ||
123 | &::open_quit_dialog; | ||
124 | } else { | ||
125 | exit; | ||
126 | } | ||
127 | } | ||
119 | ], | 128 | ], |
120 | ], | 129 | ], |
121 | )->popup ($ev); | 130 | )->popup ($ev); |
122 | } | 131 | } |
123 | 132 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |