[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/advice.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/emacs-lisp/advice.el
diff -c emacs/lisp/emacs-lisp/advice.el:1.35.4.1 
emacs/lisp/emacs-lisp/advice.el:1.35.4.2
*** emacs/lisp/emacs-lisp/advice.el:1.35.4.1    Fri Apr 16 12:50:13 2004
--- emacs/lisp/emacs-lisp/advice.el     Thu Nov  4 08:55:37 2004
***************
*** 3106,3112 ****
                          (not advised-interactive-form))
                     ;; Check whether we were called interactively
                     ;; in order to do proper prompting:
!                    `(if (interactive-p)
                          (call-interactively ',origname)
                        ,(ad-make-mapped-call orig-arglist
                                              advised-arglist
--- 3106,3112 ----
                          (not advised-interactive-form))
                     ;; Check whether we were called interactively
                     ;; in order to do proper prompting:
!                    `(if (called-interactively-p)
                          (call-interactively ',origname)
                        ,(ad-make-mapped-call orig-arglist
                                              advised-arglist