From dbd7b9a97eede27e707a279114305d7591d371fc Mon Sep 17 00:00:00 2001
From: rsc <devnull@localhost>
Date: Sun, 23 Nov 2003 18:29:08 +0000
Subject: various shell script fixes. add 9a, 9c, 9l wrapper scripts. label
 sets label on xterm/9term

---
 bin/B | 12 +++---------
 1 file changed, 3 insertions(+), 9 deletions(-)

(limited to 'bin/B')

diff --git a/bin/B b/bin/B
index c1a4b163..74bdb48b 100755
--- a/bin/B
+++ b/bin/B
@@ -18,16 +18,10 @@ then
 	echo could not find sam 2>&1
 	exit 2
 else
-	pwd=`pwd`
 	for i
 	do
-		case $i in
-		/*)
-			echo "B $i" >>$sam
-			;;
-		*)
-			echo "B $pwd/$i" >>$sam
-			;;
-		esac
+		pwd=`pwd`
+		file=`cleanname -d $pwd $i`
+		echo "B $file" >>$sam
 	done
 fi
-- 
cgit v1.2.3