From 71a3df9d04ebb10eb18c07179397899f21090b7f Mon Sep 17 00:00:00 2001
From: "Janet B. Anderson" <jba@aps.anl.gov>
Date: Tue, 28 Mar 2000 18:56:14 +0000
Subject: [PATCH] Replaced double slashes with single slash.

---
 src/tools/installEpics.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/tools/installEpics.pl b/src/tools/installEpics.pl
index 33f44b19e..fa517ec1e 100644
--- a/src/tools/installEpics.pl
+++ b/src/tools/installEpics.pl
@@ -34,6 +34,7 @@ Usage ("Nothing to install") if ($num_files < 1);
 $install_dir=$ARGV[$num_files];
 $install_dir =~ s[\\][/]g;	# maybe fix DOS-style path
 $install_dir =~ s[/$][];	# remove trailing '/'
+$install_dir =~ s[//][/]g;    # replace '//' by '/'
 
 #	Do we have to create the directory?
 unless (-d $install_dir)