[Emacs-diffs] Changes to emacs/lisp/progmodes/idlwave.el,v

[John-David T. Smith]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     John-David T. Smith <jdsmith>   06/12/05 23:28:01

Index: idlwave.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/idlwave.el,v
retrieving revision 3.55
retrieving revision 3.56
diff -u -b -r3.55 -r3.56
--- idlwave.el  29 Nov 2006 19:15:09 -0000      3.55
+++ idlwave.el  5 Dec 2006 23:28:01 -0000       3.56
@@ -4651,7 +4651,11 @@
              props (car (cdr pelem)))
        (cond
         ((eq ptype 'SUPERCLASS)
-         (push (cdr (assq 'name props)) inherits))
+         (let ((pname (cdr (assq 'name props)))
+               (plink (cdr (assq 'link props))))
+           (unless (and (string= pname "None")
+                        (string= plink "None"))
+             (push pname inherits))))
 
         ((eq ptype 'PROPERTY)
          (let ((pname (cdr (assq 'name props)))