[interchange-cvs] interchange - jon modified scripts/interchange.PL

[interchange-core@interchange.redhat.com]

User:      jon
Date:      2001-11-28 03:35:45 GMT
Modified:  scripts  interchange.PL
Log:
Fall back to sane ExeName and ConfigFile defaults so that error messages
make sense when e.g. interchange.cfg is missing.

Revision  Changes    Path
2.17      +2 -2      interchange/scripts/interchange.PL


rev 2.17, prev_rev 2.16
Index: interchange.PL
===================================================================
RCS file: /var/cvs/interchange/scripts/interchange.PL,v
retrieving revision 2.16
retrieving revision 2.17
diff -u -u -r2.16 -r2.17
--- interchange.PL	2001/11/28 02:41:42	2.16
+++ interchange.PL	2001/11/28 03:35:45	2.17
@@ -50,7 +50,7 @@
 #
 # Interchange version 4.9.0
 #
-# $Id: interchange.PL,v 2.16 2001/11/28 02:41:42 jon Exp $
+# $Id: interchange.PL,v 2.17 2001/11/28 03:35:45 jon Exp $
 #
 # Copyright (C) 1996-2001 Red Hat, Inc. <interchange@redhat.com>
 #
@@ -98,7 +98,7 @@
 		$Global::ExeName = 'minivend';
 		$Global::ConfigFile = 'minivend.cfg';
 	}
-	elsif(-f "$Global::VendRoot/interchange.cfg.dist") {
+	else {
 		$Global::ExeName = 'interchange';
 		$Global::ConfigFile = 'interchange.cfg';
 	}