View | Details | Raw Unified | Return to bug 38299
Collapse All | Expand All

(-)a/Koha/Installer/Output.pm (-5 / +24 lines)
Lines 71-92 Output an informational message in blue. Link Here
71
71
72
sub say_warning {
72
sub say_warning {
73
    my ( $fh, $msg ) = @_;
73
    my ( $fh, $msg ) = @_;
74
    say $fh YELLOW, "$msg", RESET;
74
75
    if ($fh) {
76
        say $fh YELLOW, "$msg", RESET;
77
    } else {
78
        say YELLOW, "$msg", RESET;
79
    }
75
}
80
}
76
81
77
sub say_failure {
82
sub say_failure {
78
    my ( $fh, $msg ) = @_;
83
    my ( $fh, $msg ) = @_;
79
    say $fh RED, "$msg", RESET;
84
85
    if ($fh) {
86
        say $fh RED, "$msg", RESET;
87
    } else {
88
        say RED, "$msg", RESET;
89
    }
80
}
90
}
81
91
82
sub say_success {
92
sub say_success {
83
    my ( $fh, $msg ) = @_;
93
    my ( $fh, $msg ) = @_;
84
    say $fh GREEN, "$msg", RESET;
94
95
    if ($fh) {
96
        say $fh GREEN, "$msg", RESET;
97
    } else {
98
        say GREEN, "$msg", RESET;
99
    }
85
}
100
}
86
101
87
sub say_info {
102
sub say_info {
88
    my ( $fh, $msg ) = @_;
103
    my ( $fh, $msg ) = @_;
89
    say $fh BLUE, "$msg", RESET;
104
105
    if ($fh) {
106
        say $fh BLUE, "$msg", RESET;
107
    } else {
108
        say BLUE, "$msg", RESET;
109
    }
90
}
110
}
91
111
92
=head1 AUTHORS
112
=head1 AUTHORS
93
- 

Return to bug 38299