Преглед изворни кода

Dpkg::ErrorHandling: Add new notice() reporting function

Guillem Jover пре 10 година
родитељ
комит
d2a1a297ee
1 измењених фајлова са 6 додато и 0 уклоњено
  1. 6 0
      scripts/Dpkg/ErrorHandling.pm

+ 6 - 0
scripts/Dpkg/ErrorHandling.pm

@@ -23,6 +23,7 @@ our @EXPORT_OK = qw(
 our @EXPORT = qw(
 our @EXPORT = qw(
     report_options
     report_options
     info
     info
+    notice
     warning
     warning
     error
     error
     errormsg
     errormsg
@@ -64,6 +65,11 @@ sub info($;@)
     print { $info_fh } report(g_('info'), @_) if (!$quiet_warnings);
     print { $info_fh } report(g_('info'), @_) if (!$quiet_warnings);
 }
 }
 
 
+sub notice
+{
+    warn report(g_('notice'), @_) if not $quiet_warnings;
+}
+
 sub warning($;@)
 sub warning($;@)
 {
 {
     warn report(g_('warning'), @_) if (!$quiet_warnings);
     warn report(g_('warning'), @_) if (!$quiet_warnings);