… | |
… | |
216 | if ($who->flag (FLAG_WIZ)) { |
216 | if ($who->flag (FLAG_WIZ)) { |
217 | $who->message ("reloading..."); |
217 | $who->message ("reloading..."); |
218 | |
218 | |
219 | warn "reloading...\n"; |
219 | warn "reloading...\n"; |
220 | eval { |
220 | eval { |
|
|
221 | $_->cancel for Event::all_watchers; |
|
|
222 | |
221 | unload_extension $_ for @exts; |
223 | unload_extension $_ for @exts; |
222 | delete $INC{"cf.pm"}; |
224 | delete $INC{"cf.pm"}; |
223 | |
225 | |
224 | # don't, removes xs symbols, too |
226 | # don't, removes xs symbols, too |
225 | #Symbol::delete_package $pkg; |
227 | #Symbol::delete_package $pkg; |