From 2a3c2708fd1f55bd06d0b48a132d487a1745c075 Mon Sep 17 00:00:00 2001 From: "jkeiser%netscape.com" <> Date: Thu, 31 Jul 2003 03:04:48 +0000 Subject: Patch Viewer, a pretty way of viewing and manipulating patches (bug 174942). Requires PatchIterator to be installed, classes uploaded to that bug and will be soon in CPAN. --- globals.pl | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'globals.pl') diff --git a/globals.pl b/globals.pl index 134bddb28..67fed5306 100644 --- a/globals.pl +++ b/globals.pl @@ -75,7 +75,7 @@ use DBI; use Date::Format; # For time2str(). use Date::Parse; # For str2time(). -#use Carp; # for confess +use Carp; # for confess use RelationSet; # Use standard Perl libraries for cross-platform file/directory manipulation. @@ -98,12 +98,12 @@ $::SIG{PIPE} = 'IGNORE'; $::defaultqueryname = "(Default query)"; # This string not exposed in UI $::unconfirmedstate = "UNCONFIRMED"; -#sub die_with_dignity { -# my ($err_msg) = @_; -# print $err_msg; -# confess($err_msg); -#} -#$::SIG{__DIE__} = \&die_with_dignity; +sub die_with_dignity { + my ($err_msg) = @_; + print $err_msg; + confess($err_msg); +} +$::SIG{__DIE__} = \&die_with_dignity; @::default_column_list = ("bug_severity", "priority", "rep_platform", "assigned_to", "bug_status", "resolution", -- cgit v1.2.3-24-g4f1b