From 1c0977a9516b7df0ca30d28abf42a618a66b9989 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 19 Apr 2013 11:42:34 +0300 Subject: Add reveal-filename function instead of 3 set-generated-*-file funcs, as suggested by Glenn Morris. --- lisp/emacs-lisp/autoload.el | 12 ------------ 1 file changed, 12 deletions(-) (limited to 'lisp/emacs-lisp/autoload.el') diff --git a/lisp/emacs-lisp/autoload.el b/lisp/emacs-lisp/autoload.el index f9e691c153c..edaecd7ff19 100644 --- a/lisp/emacs-lisp/autoload.el +++ b/lisp/emacs-lisp/autoload.el @@ -86,18 +86,6 @@ that text will be copied verbatim to `generated-autoload-file'.") (defvar autoload-modified-buffers) ;Dynamically scoped var. -(defun set-generated-autoload-file (file) - "Set value of `generated-autoload-file' from FILE. - -On systems other than MS-Windows, just sets the value -of `generated-autoload-file'. On MS-Windows, converts /d/foo/bar -form passed by MSYS Make into d:/foo/bar that Emacs can grok. -This function is called from lisp/Makefile." - (when (and (eq system-type 'windows-nt) - (string-match "\\`/[a-zA-Z]/" file)) - (setq file (concat (substring file 1 2) ":" (substring file 2)))) - (setq generated-autoload-file file)) - (defun make-autoload (form file &optional expansion) "Turn FORM into an autoload or defvar for source file FILE. Returns nil if FORM is not a special autoload form (i.e. a function definition -- cgit v1.2.3