r11766 - trunk/gwydion/tools/elisp

Author: hannes
Date: Sat Mar 29 07:03:17 2008
New Revision: 11766

Modified:
   trunk/gwydion/tools/elisp/slime-dylan.el
Log:
Job: minor
support for subclass and superclass browser using emacs tree-widget

Modified: trunk/gwydion/tools/elisp/slime-dylan.el
==============================================================================
--- trunk/gwydion/tools/elisp/slime-dylan.el	(original)
+++ trunk/gwydion/tools/elisp/slime-dylan.el	Sat Mar 29 07:03:17 2008
@@ -33,4 +33,71 @@
   (local-set-key (kbd ",") 'slime-dylan-arglist-magic)
   (local-set-key (kbd "(") 'slime-dylan-arglist-magic))

-(provide 'slime-dylan)
\ No newline at end of file
+
+;;; Source modified from slime-xref-browser.el
+;;; slime-xref-browser.el --- xref browsing with tree-widget
+;;
+;; Author: Rui Patrocínio <rui.patrocinio <at> netvisao.pt>
+;; Licencse: GNU GPL (same license as Emacs)
+;; Modified by Hannes Mehnert <hannes <at> opendylan.org>
+
+(defun slime-expand-subclass-node (widget)
+  (or (widget-get widget :args)