# HG changeset patch # User Jason Rumney # Date 1198026846 0 # Node ID 8c94facb0a5ee21718df3a08d980063c73301589 # Parent 8e18b9e1e74ab7e59c9c34f8cb4e2fbf0613b928 (rng-autoload-modules, rng-update-autoloads) (rng-compile-modules, rng-byte-compile-load, rng-write-version): Remove. diff -r 8e18b9e1e74a -r 8c94facb0a5e lisp/nxml/rng-maint.el --- a/lisp/nxml/rng-maint.el Wed Dec 19 00:55:56 2007 +0000 +++ b/lisp/nxml/rng-maint.el Wed Dec 19 01:14:06 2007 +0000 @@ -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)