--- a/DebugView.st Mon Aug 07 12:17:28 2006 +0200
+++ b/DebugView.st Mon Aug 07 13:03:23 2006 +0200
@@ -5793,7 +5793,15 @@
codeView flash.
codeSet := true.
] ifFalse:[
- errMsg := '** no source **'
+ [
+ |src|
+
+ src := String streamContents:[:s | Decompiler decompile:method to:s].
+ codeView contents:src.
+ codeSet := true.
+ ] on: Error do:[
+ errMsg := '** no source **'
+ ].
]
]
] ifFalse:[
@@ -5948,8 +5956,8 @@
"
self updateMenuItems
- "Created: / 14.8.1997 / 20:15:00 / cg"
- "Modified: / 18.11.2001 / 00:15:32 / cg"
+ "Created: / 14-08-1997 / 20:15:00 / cg"
+ "Modified: / 06-08-2006 / 15:33:35 / cg"
!
updateMenuItems
@@ -6003,7 +6011,7 @@
!DebugView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.399 2006-07-07 12:51:42 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.400 2006-08-07 11:03:23 cg Exp $'
! !
DebugView initialize!