--- a/DebugView.st	Fri Jan 10 21:50:11 1997 +0100
+++ b/DebugView.st	Sat Jan 11 12:16:27 1997 +0100
@@ -21,7 +21,7 @@
 		steppedContextLineno stepForReturn actualContext inWrap
 		stackInspector steppedContext wrapperContext verboseBacktrace'
 	classVariableNames:'CachedDebugger CachedExclusive OpenDebuggers MoreDebuggingDetail
-		DebuggingDebugger'
+		DebuggingDebugger VerboseBacktraceDefault'
 	poolDictionaries:''
 	category:'Interface-Debugger'
 !
@@ -288,6 +288,18 @@
     ^ Image fromFile:'bitmaps/Debugger.xbm' resolution:100
 
     "Created: 1.1.1970 / 01:00:00 / cg"
+!
+
+defaultVerboseBacktrace
+    ^ VerboseBacktraceDefault
+
+    "Created: 11.1.1997 / 12:14:35 / cg"
+!
+
+defaultVerboseBacktrace:aBoolean
+    VerboseBacktraceDefault := aBoolean
+
+    "Created: 11.1.1997 / 12:14:44 / cg"
 ! !
 
 !DebugView class methodsFor:'misc'!
@@ -1036,7 +1048,7 @@
 
     font := font on:device.
 
-    verboseBacktrace := false.
+    verboseBacktrace := VerboseBacktraceDefault ? false.
 
     busy := false.
     exclusive := false.
@@ -1131,7 +1143,7 @@
                                     in:hpanel.
     contextInspector label:'context'.
 
-    "Modified: 10.1.1997 / 21:05:52 / cg"
+    "Modified: 11.1.1997 / 12:15:14 / cg"
 !
 
 initializeMiddleButtonMenu
@@ -3131,5 +3143,5 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.123 1997-01-10 20:50:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.124 1997-01-11 11:16:27 cg Exp $'
 ! !