diff options
Diffstat (limited to 'urpm/msg.pm')
| -rw-r--r-- | urpm/msg.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/urpm/msg.pm b/urpm/msg.pm index fa07e4d3..b062ee7f 100644 --- a/urpm/msg.pm +++ b/urpm/msg.pm @@ -14,7 +14,7 @@ BEGIN { } our @ISA = 'Exporter'; -our @EXPORT = qw(N N_ P translate bug_log message_input_ toMb formatXiB sys_log); +our @EXPORT = qw(N N_ P translate bug_log message_input toMb formatXiB sys_log); #- I18N. use Locale::gettext; @@ -102,10 +102,10 @@ sub bug_log { sub ask_yes_or_no { my ($msg) = @_; - message_input_($msg . N(" (y/N) "), boolean => 1) =~ /[$yesexpr]/; + message_input($msg . N(" (y/N) "), boolean => 1) =~ /[$yesexpr]/; } -sub message_input_ { +sub message_input { my ($msg, %o_opts) = @_; _message_input($msg, undef, %o_opts); } |