(rng-autoload-modules, rng-update-autoloads)

(rng-compile-modules, rng-byte-compile-load, rng-write-version): Remove.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 553c188cbff9f616449013f7c8aada2c7dc3ba01..0c0db1539a47f81f4c7b7a7d871653356423b968 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,8 @@
 2007-12-19  Jason Rumney  <jasonr@gnu.org>
 
-       * nxml/rng-maint.el (rng-update-autoloads, rng-byte-compile-load)
-       (rng-format-manual, rng-write-version): Do not autoload.
+       * nxml/rng-maint.el (rng-format-manual): Do not autoload.
+       (rng-autoload-modules, rng-update-autoloads, rng-compile-modules)
+       (rng-byte-compile-load, rng-write-version): Remove.
 
        * nxml/rng-loc.el (rng-schema-locating-files-default)
        (rng-schema-locating-file-schema-file): Use files in etc/schemas.

diff --git a/lisp/nxml/rng-maint.el b/lisp/nxml/rng-maint.el
index fa72dcf46bcd6e15680815f2a46a83d30b8d72ba..d535c45691aafa45947fae4052f2bd5643a979b9 100644 (file)
--- a/lisp/nxml/rng-maint.el
+++ b/lisp/nxml/rng-maint.el
@@ -32,64 +32,6 @@
 
 (defvar rng-dir (file-name-directory load-file-name))
 
-(defconst rng-autoload-modules
-  '(xmltok
-    nxml-mode
-    nxml-uchnm
-    nxml-glyph
-    rng-cmpct
-    rng-maint
-    rng-valid
-    rng-xsd
-    rng-nxml))
-
-(defun rng-update-autoloads ()
-  "Update the autoloads in rng-auto.el."
-  (interactive)
-  (let* ((generated-autoload-file (expand-file-name "rng-auto.el"
-                                                   rng-dir)))
-    (mapcar (lambda (x)
-             (update-file-autoloads
-              (expand-file-name (concat (symbol-name x) ".el") rng-dir)))
-           rng-autoload-modules)))
-
-
-(defconst rng-compile-modules
-  '(xmltok
-    nxml-util
-    nxml-enc
-    nxml-glyph
-    nxml-rap
-    nxml-outln
-    nxml-mode
-    nxml-uchnm
-    nxml-ns
-    nxml-parse
-    nxml-maint
-    xsd-regexp
-    rng-util
-    rng-dt
-    rng-xsd
-    rng-uri
-    rng-pttrn
-    rng-cmpct
-    rng-match
-    rng-parse
-    rng-loc
-    rng-valid
-    rng-nxml
-    rng-maint))
-
-(defun rng-byte-compile-load ()
-  "Byte-compile and load all of the RELAX NG library in an appropriate order."
-  (interactive)
-  (mapcar (lambda (x)
-           (byte-compile-file (expand-file-name (concat (symbol-name x) ".el")
-                                                rng-dir)
-                              t))
-         rng-compile-modules))
-
-
 ;;; Conversion from XML to texinfo.
 ;; This is all a hack and is just enough to make the conversion work.
 ;; It's not intended for public use.
@@ -285,14 +227,6 @@
          (insert ?\n))
       (insert "\n\n"))))
 
-;;; Versioning
-
-(defun rng-write-version ()
-  (find-file "VERSION")
-  (erase-buffer)
-  (insert nxml-version "\n")
-  (save-buffer))
-
 ;;; Timing
 
 (defun rng-time-to-float (time)