/[emacs]/emacs/lisp/subr.el
ViewVC logotype

Diff of /emacs/lisp/subr.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.272 by miles, Thu Nov 8 12:08:51 2001 UTC revision 1.273 by miles, Fri Nov 9 01:02:27 2001 UTC
# Line 1538  configuration." Line 1538  configuration."
1538             (fboundp object)             (fboundp object)
1539             (setq object (indirect-function object))             (setq object (indirect-function object))
1540             (eq (car-safe object) 'autoload)             (eq (car-safe object) 'autoload)
1541             (not (eq (car-safe             (not (car-safe (cdr-safe (cdr-safe (cdr-safe (cdr-safe object)))))))
                      (cdr-safe (cdr-safe (cdr-safe (cdr-safe object)))))  
                     'keymap)))  
1542        (subrp object) (byte-code-function-p object)        (subrp object) (byte-code-function-p object)
1543        (eq (car-safe object) 'lambda)        (eq (car-safe object) 'lambda)))
       (eq (car-safe object) 'macro)))  
1544    
1545  (defun interactive-form (function)  (defun interactive-form (function)
1546    "Return the interactive form of FUNCTION.    "Return the interactive form of FUNCTION.

Legend:
Removed from v.1.272  
changed lines
  Added in v.1.273

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26