diff options
| author | fukachan <fukachan> | 2002-04-13 13:51:46 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-04-13 13:51:46 +0000 |
| commit | e53db1f0d995f38cf7b2acc6f8eaafde50158b42 (patch) | |
| tree | a2a836a78cf2cb466727591d128fed5a9679ce20 /fml/lib/FML/Command | |
| parent | 1a8eb5b6c377192c3998dce6caa75137f081976a (diff) | |
| download | fml8-e53db1f0d995f38cf7b2acc6f8eaafde50158b42.tar.gz fml8-e53db1f0d995f38cf7b2acc6f8eaafde50158b42.tar.bz2 fml8-e53db1f0d995f38cf7b2acc6f8eaafde50158b42.zip | |
use FML::Confirm not via eval{ use ..}
Diffstat (limited to 'fml/lib/FML/Command')
| -rw-r--r-- | fml/lib/FML/Command/User/unsubscribe.pm | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/fml/lib/FML/Command/User/unsubscribe.pm b/fml/lib/FML/Command/User/unsubscribe.pm index bc1f4130..4fcff8b2 100644 --- a/fml/lib/FML/Command/User/unsubscribe.pm +++ b/fml/lib/FML/Command/User/unsubscribe.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: unsubscribe.pm,v 1.10 2002/04/06 14:46:13 fukachan Exp $ +# $FML: unsubscribe.pm,v 1.11 2002/04/07 05:35:09 fukachan Exp $ # package FML::Command::User::unsubscribe; @@ -85,15 +85,9 @@ sub process } # try confirmation before unsubscribe else { - Log("unsubscriber request, try confirmation"); - eval q{ - use FML::Confirm; - }; - if ($@) { - LogError("tail to load FML::Confirm"); - croak($@); - } + Log("unsubscribe request, try confirmation"); + use FML::Confirm; my $confirm = new FML::Confirm { keyword => $keyword, cache_dir => $cache_dir, |