From ddc30be73a0c9a4f14597df436cebe14d15454da Mon Sep 17 00:00:00 2001
From: Jason Rumney <jasonr@gnu.org>
Date: Wed, 19 Dec 2007 01:15:26 +0000
Subject: [PATCH] (rng-autoload-modules, rng-update-autoloads)
 (rng-compile-modules, rng-byte-compile-load, rng-write-version): Remove.

---
 lisp/ChangeLog         |  5 ++--
 lisp/nxml/rng-maint.el | 66 ------------------------------------------
 2 files changed, 3 insertions(+), 68 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 553c188cbff..0c0db1539a4 100644
--- 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 fa72dcf46bc..d535c45691a 100644
--- 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)
-- 
2.39.2