aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPhillip Lord2017-03-07 13:22:04 +0000
committerPhillip Lord2017-03-07 13:46:48 +0000
commit11436e2890fda7367936b63b8fe2daca6957d3ef (patch)
tree1be529e1ebc1108f1be5481ba90a9162daf0a19a
parent66b7543eab5f500f2e7cf0cce9b260991107fc97 (diff)
downloademacs-11436e2890fda7367936b63b8fe2daca6957d3ef.tar.gz
emacs-11436e2890fda7367936b63b8fe2daca6957d3ef.zip
Revert "Fix minor problems with loaddefs autogeneration"
This reverts commit f2bd2c1e6476acc71e71f6cb2a1c56c5edd900ba. This commit has been reverted because the new mechanism was too sensitive to changes in the lisp source, generation of new ldefs-boot files was platform specific and resulted in warnings about undefined variables.
-rw-r--r--admin/ldefs-clean.el7
-rw-r--r--lisp/ldefs-boot-manual.el3
2 files changed, 2 insertions, 8 deletions
diff --git a/admin/ldefs-clean.el b/admin/ldefs-clean.el
index 33bc9e529fa..91512b4bbb7 100644
--- a/admin/ldefs-clean.el
+++ b/admin/ldefs-clean.el
@@ -57,9 +57,6 @@
57 57
58 58
59(defun ldefs-clean () 59(defun ldefs-clean ()
60 ;; Remove CR characters produced on MS-DOS/MS-Windows systems. 60 (find-file "../lisp/ldefs-boot-auto.temp")
61 (let ((coding-system-for-read 'utf-8-dos))
62 (find-file "../lisp/ldefs-boot-auto.temp"))
63 (ldefs-clean-up) 61 (ldefs-clean-up)
64 (let ((coding-system-for-write 'utf-8-unix)) 62 (write-file "ldefs-boot-auto.el"))
65 (write-file "ldefs-boot-auto.el")))
diff --git a/lisp/ldefs-boot-manual.el b/lisp/ldefs-boot-manual.el
index 06b9738d5ee..2f6e3fd2094 100644
--- a/lisp/ldefs-boot-manual.el
+++ b/lisp/ldefs-boot-manual.el
@@ -16,9 +16,6 @@
16(autoload 'dos-convert-standard-filename "dos-fns.el" nil nil nil) 16(autoload 'dos-convert-standard-filename "dos-fns.el" nil nil nil)
17(autoload 'w32-convert-standard-filename "w32-fns.el" nil nil nil) 17(autoload 'w32-convert-standard-filename "w32-fns.el" nil nil nil)
18 18
19;; This is needed on MS-Windows only, and won't be in
20;; ldefs-boot-auto.el on other platforms.
21(autoload 'image-type "image" nil nil nil)
22 19
23(load "ldefs-boot-auto.el") 20(load "ldefs-boot-auto.el")
24 21