summaryrefslogtreecommitdiffstats
path: root/urpm/msg.pm
diff options
context:
space:
mode:
authorMaat <maat-pub@mageia.biz>2021-03-28 22:59:51 +0200
committerMaat <maat-pub@mageia.biz>2021-03-28 22:59:51 +0200
commit7fab2353b8298492594ae672a3aadff89428cac2 (patch)
tree50d553a34a5a9f76d69c62f6c00d2cdcbf170fcd /urpm/msg.pm
parent084744de672cb2af32d3b1b7409dfd746dab022b (diff)
downloadurpmi-7fab2353b8298492594ae672a3aadff89428cac2.tar
urpmi-7fab2353b8298492594ae672a3aadff89428cac2.tar.gz
urpmi-7fab2353b8298492594ae672a3aadff89428cac2.tar.bz2
urpmi-7fab2353b8298492594ae672a3aadff89428cac2.tar.xz
urpmi-7fab2353b8298492594ae672a3aadff89428cac2.zip
Setting up H() function for cleaner color control
Diffstat (limited to 'urpm/msg.pm')
-rw-r--r--urpm/msg.pm21
1 files changed, 20 insertions, 1 deletions
diff --git a/urpm/msg.pm b/urpm/msg.pm
index a79e59b8..ca81d9fe 100644
--- a/urpm/msg.pm
+++ b/urpm/msg.pm
@@ -1,4 +1,5 @@
package urpm::msg;
+# vim:et:ai:ts=4:sts=4:sw=4
use strict;
@@ -6,6 +7,7 @@ no warnings;
use Exporter;
use URPM;
use urpm::util 'append_to_file';
+use Term::ANSIColor;
my $encoding;
BEGIN {
@@ -14,7 +16,7 @@ BEGIN {
}
our @ISA = 'Exporter';
-our @EXPORT = qw(N N_ P translate bug_log message_input toMb formatXiB sys_log);
+our @EXPORT = qw(H N N_ P translate bug_log message_input toMb formatXiB sys_log);
#- I18N.
use Locale::gettext;
@@ -65,6 +67,23 @@ sub P {
sprintf(translate($s_singular, $s_plural, $nb), @para);
}
+sub H {
+ my ($label, $istring) = @_;
+ my $color = '';
+ my %colors = (
+ "Alert" => 'red',
+ "Error" => 'red',
+ "Warning" => 'bright_yellow',
+ "Arg" => 'cyan',
+ "Package" => 'bold white',
+ "Highlight" => 'bright_yellow',
+ "Progress" => 'blue',
+ "Success" => 'bright_green'
+ );
+ my $output = color($colors{$label}) . $istring . color('reset');
+ return $output;
+}
+
sub N {
my ($format, @params) = @_;
sprintf(translate($format), @params);