From b9c2d9c3078db6aac7d5777de4b7eda945e6c850 Mon Sep 17 00:00:00 2001 From: doogie <> Date: Thu, 16 Aug 2001 16:39:03 -0800 Subject: [PATCH] [project @ 2001-08-16 17:37:01 by doogie] Add $config_path and $lib_path at the top, and modify the code to use these vars, instead of hard-coding the paths. --- scripts/mailsummary.in | 12 ++++++++---- scripts/summary.in | 11 ++++++++--- 2 files changed, 16 insertions(+), 7 deletions(-) diff --git a/scripts/mailsummary.in b/scripts/mailsummary.in index 53c94c12..3b5b4025 100755 --- a/scripts/mailsummary.in +++ b/scripts/mailsummary.in @@ -1,9 +1,13 @@ #!/usr/bin/perl -# $Id: mailsummary.in,v 1.6 2000/10/14 21:01:22 joy Exp $ +# $Id: mailsummary.in,v 1.7 2001/08/16 17:39:03 doogie Exp $ -require( '/etc/debbugs/config' ); +$config_path = '/org/bugs.debian.org/etc'; +$lib_path = '/org/bugs.debian.org/scripts'; + +require("$config_path/config"); +require("$lib_path/errorlib"); +$ENV{'PATH'} = $lib_path.':'.$ENV{'PATH'}; -$ENV{'PATH'} = '/usr/lib/debbugs:'.$ENV{'PATH'}; chdir("$gSpoolDir") || die "chdir spool: $!\n"; #open(DEBUG,">&4"); @@ -50,7 +54,7 @@ $gBug reports is posted periodically - this is a partial list only!) die "urgk, wrong argument @ARGV"; } -$v=`/usr/lib/debbugs/summary $ARGV[0]`; $? && die "undone failed $?: $!\n"; +$v=`$lib_path/summary $ARGV[0]`; $? && die "undone failed $?: $!\n"; $v= $vdef if $v eq ''; exit 0 if $v eq ''; diff --git a/scripts/summary.in b/scripts/summary.in index 20cba460..a84ca793 100755 --- a/scripts/summary.in +++ b/scripts/summary.in @@ -1,8 +1,13 @@ #!/usr/bin/perl -# $Id: summary.in,v 1.3 2001/04/24 19:10:26 doogie Exp $ +# $Id: summary.in,v 1.4 2001/08/16 17:37:01 doogie Exp $ + +$config_path = '/org/bugs.debian.org/etc'; +$lib_path = '/org/bugs.debian.org/scripts'; + +require("$config_path/config"); +require("$lib_path/errorlib"); +$ENV{'PATH'} = $lib_path.':'.$ENV{'PATH'}; -require('/etc/debbugs/config'); -require('/usr/lib/debbugs/errorlib'); chdir("$gSpoolDir") || die "chdir spool: $!\n"; #open(DEBUG,">&4"); -- 2.39.5