20070725-1342

3 files changed, 11 insertions, 10 deletions

diff --git a/CHANGES b/CHANGES
index 2ba9d356..53b4c79c 100644
--- a/CHANGES
+++ b/CHANGES
@@ -1,3 +1,5 @@
+20070725
+	/dis/man initialise fils correctly to empty list and remove hack (issue 56)
 20070720
 	utils/5l/asm.c: ensure SBZ field in MOV is regarded as MBZ (ie, force to zero)
 20070714
diff --git a/dis/man b/dis/man
index ebd13f4f..1c83abc5 100755
--- a/dis/man
+++ b/dis/man
@@ -3,7 +3,7 @@
 # for more details see the real man(1)
 load std
 
-fils=''
+fils=()
 cmd=n
 sec=()
 S=/man
@@ -86,9 +86,7 @@ if{no $fils} {
 }
 
 for i in $fils {
-	if {~ $i ''}{
-		#echo bug ignore ''
-	}{! ftest -f $i}{
+	if {! ftest -f $i}{
 		echo need:$i
 	}{
 		if {~ $cmd n}{
@@ -98,12 +96,13 @@ for i in $fils {
 		}{~ $cmd p}{
 			wm/man -f $i
 		}{~ $cmd b}{
-			if{~ $i '/man/*/*'}{
+			if{~ $i '/man/*/0intro'}{
+				x=`{echo $i | sed 's;/man/(.*)/.*;/\1 intro;'}
+			}{~ $i '/man/*/*'}{
 				x=`{echo $i | sed 's;/man/(.*)/(.*);\1 \2;'}			
-				if{~ ${index 2 $x} 0intro}{
-					x=(${index 1 $x} intro)
-				}
-			}{ x=($i ''); }
+			}{
+				x=($i '')
+			}
 
 			man2txt $i |
 		 	plumb -i -d edit -a action showdata -a filename '/man/'^${tl $x}^'('^${hd $x}^')'
diff --git a/include/version.h b/include/version.h
index d651e3c6..ee3d4545 100644
--- a/include/version.h
+++ b/include/version.h
@@ -1 +1 @@
-#define VERSION	"Fourth Edition (20070714)"
+#define VERSION	"Fourth Edition (20070725)"