*** empty log message ***

1 files changed, 10 insertions, 10 deletions

diff --git a/lisp/subr.el b/lisp/subr.el
index aee62d11f94..c485e98c608 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -312,16 +312,16 @@ This makes or adds to an entry on `after-load-alist'.
 FILE should be the name of a library, with no directory name."
   (eval-after-load file (read)))
 
-(defmacro defun-inline (name args &rest body)
-  "Create an \"inline defun\" (actually a macro).
-Use just like `defun'."
-  (nconc (list 'defmacro name '(&rest args))
-	 (if (stringp (car body))
-	     (prog1 (list (car body))
-	       (setq body (or (cdr body) body))))
-	 (list (list 'cons (list 'quote
-				 (cons 'lambda (cons args body)))
-		     'args))))
+;;(defmacro defun-inline (name args &rest body)
+;;  "Create an \"inline defun\" (actually a macro).
+;;Use just like `defun'."
+;;  (nconc (list 'defmacro name '(&rest args))
+;;	 (if (stringp (car body))
+;;	     (prog1 (list (car body))
+;;	       (setq body (or (cdr body) body))))
+;;	 (list (list 'cons (list 'quote
+;;				 (cons 'lambda (cons args body)))
+;;		     'args))))
 
 (defun user-original-login-name ()
   "Return user's login name from original login.