equal
deleted
inserted
replaced
48 |
48 |
49 [see also:] |
49 [see also:] |
50 Context DebugView |
50 Context DebugView |
51 " |
51 " |
52 ! ! |
52 ! ! |
|
53 |
53 |
54 |
54 !ContextInspectorView methodsFor:'accessing'! |
55 !ContextInspectorView methodsFor:'accessing'! |
55 |
56 |
56 inspect:aContext |
57 inspect:aContext |
57 "set the context to be inspected" |
58 "set the context to be inspected" |
367 super release |
368 super release |
368 |
369 |
369 "Modified: 14.12.1995 / 21:49:43 / cg" |
370 "Modified: 14.12.1995 / 21:49:43 / cg" |
370 ! ! |
371 ! ! |
371 |
372 |
|
373 |
372 !ContextInspectorView methodsFor:'initialization'! |
374 !ContextInspectorView methodsFor:'initialization'! |
373 |
375 |
374 initialize |
376 initialize |
375 super initialize. |
377 super initialize. |
376 showingTemporaries := false. |
378 showingTemporaries := false. |
377 |
379 |
378 ! ! |
380 ! ! |
|
381 |
379 |
382 |
380 !ContextInspectorView methodsFor:'menu'! |
383 !ContextInspectorView methodsFor:'menu'! |
381 |
384 |
382 fieldMenu |
385 fieldMenu |
383 "return a popUpMenu for the left (fields) pane" |
386 "return a popUpMenu for the left (fields) pane" |
454 ]. |
457 ]. |
455 ^ m |
458 ^ m |
456 |
459 |
457 "Modified: / 20-07-2012 / 10:51:12 / cg" |
460 "Modified: / 20-07-2012 / 10:51:12 / cg" |
458 ! ! |
461 ! ! |
|
462 |
459 |
463 |
460 !ContextInspectorView methodsFor:'private'! |
464 !ContextInspectorView methodsFor:'private'! |
461 |
465 |
462 defaultLabel |
466 defaultLabel |
463 ^ 'Locals' |
467 ^ 'Locals' |
623 |
627 |
624 self error:'unknown special line'. |
628 self error:'unknown special line'. |
625 |
629 |
626 "Created: / 31.10.2001 / 09:17:45 / cg" |
630 "Created: / 31.10.2001 / 09:17:45 / cg" |
627 ! ! |
631 ! ! |
|
632 |
628 |
633 |
629 !ContextInspectorView methodsFor:'user actions'! |
634 !ContextInspectorView methodsFor:'user actions'! |
630 |
635 |
631 doAccept:theText |
636 doAccept:theText |
632 "text in the right pane was accepted - evaluate the contents and |
637 "text in the right pane was accepted - evaluate the contents and |
667 valueAtLine:selectionIndex put:newValue |
672 valueAtLine:selectionIndex put:newValue |
668 "yes, you can do that with a context" |
673 "yes, you can do that with a context" |
669 inspectedContext at:selectionIndex put:newValue. |
674 inspectedContext at:selectionIndex put:newValue. |
670 ! ! |
675 ! ! |
671 |
676 |
|
677 |
672 !ContextInspectorView class methodsFor:'documentation'! |
678 !ContextInspectorView class methodsFor:'documentation'! |
673 |
679 |
674 version |
680 version |
675 ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.79 2012/07/20 09:22:08 cg Exp $' |
681 ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.79 2012-07-20 09:22:08 cg Exp $' |
676 ! |
682 ! |
677 |
683 |
678 version_CVS |
684 version_CVS |
679 ^ '§Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.79 2012/07/20 09:22:08 cg Exp §' |
685 ^ '$Header: /cvs/stx/stx/libtool/ContextInspectorView.st,v 1.79 2012-07-20 09:22:08 cg Exp $' |
680 ! |
686 ! |
681 |
687 |
682 version_SVN |
688 version_SVN |
683 ^ '$Id: ContextInspectorView.st 8022 2012-07-25 09:51:30Z vranyj1 $' |
689 ^ '$Id: ContextInspectorView.st 8022 2012-07-25 09:51:30Z vranyj1 $' |
684 ! ! |
690 ! ! |
|
691 |