From 7cb34a4bf8133849d1017f081abc04e3d7ace1d8 Mon Sep 17 00:00:00 2001 From: Stephen L Johnson Date: Fri, 8 Aug 2003 20:37:38 +0000 Subject: [PATCH] added confirmation of Spong VAR directory value to warning message --- utils/convert-history | 20 ++++++++++++++------ 1 file changed, 14 insertions(+), 6 deletions(-) diff --git a/utils/convert-history b/utils/convert-history index b2f097d..0e10556 100755 --- a/utils/convert-history +++ b/utils/convert-history @@ -9,18 +9,26 @@ # history -> history file # status/ -> status data for events # -# $Id: convert-history,v 1.1 2002/12/17 21:22:34 sljohnson Exp $ +# $Id: convert-history,v 1.2 2003/08/08 20:37:38 sljohnson Exp $ use strict; # strict compiler $|++; # disable buffering for stdin -print "This utility will convert the Spong History files into the new format/\n"; -print "This utility should be run as the spong user in order to maintain "; -print "proper ownerships.\n"; -print "\nPress enter to proceeded\n"; +my $VARDIR = "/usr/local/spong/var"; + +print qq( +This utility will convert the Spong History files into the new format. +This utility should be run as the spong user in order to maintain +proper ownerships. + +The VAR directory is configured as $VARDIR +If this not correct, stop the program with CTRL-C, and edit the \$VARDIR +variable. + +Press enter to proceeded); my $t = ; -my $SPONG_ARCHIVE = "/usr/local/spong/var/archives"; +my $SPONG_ARCHIVE = "$VARDIR/archives"; opendir(DIR,$SPONG_ARCHIVE) || die "Could not opendir $SPONG_ARCHIVE: $!"; chdir $SPONG_ARCHIVE; -- 2.30.2