--- tkman.tcl.orig	Sat Aug 23 02:55:32 1997
+++ tkman.tcl	Mon Aug 25 11:39:03 1997
@@ -2410,7 +2410,7 @@
 			set man(glimpse) $default(glimpse)
 			set man(glimpseindex) $default(glimpseindex)
 			# likewise, reset manformat so assured of picking up long lines
-			set man(manformat) $default(manformat)
+			set man(format) $default(format)
 
 			set fixup 1
 		}