From 6029166a66b9830071831abfe053698e1ac95643 Mon Sep 17 00:00:00 2001 From: "Tom Breton (Tehom)" Date: Tue, 11 Jan 2011 18:24:59 -0500 Subject: [PATCH] Bugfix: Place load-path statements at the beginning of loaddefs files. --- elinstall.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/elinstall.el b/elinstall.el index ec1c7e9..4aa37d5 100644 --- a/elinstall.el +++ b/elinstall.el @@ -597,10 +597,12 @@ Current buffer must be a loaddef-style file." (unless found (progn (setq found 'new) - ;; No later sections in the file. Put before the last page. - (goto-char (point-max)) - (search-backward "\f" nil t))) - + ;; No later sections in the file. Put first in file. + (goto-char (point-min)) + (when + (search-forward "\f" nil t) + (goto-char (match-beginning 0))))) + (elinstall-generate-add-to-path path-element type))) ;;This never belongs in the no-autoloads section. -- 2.11.4.GIT