Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
0773c610
Commit
0773c610
authored
Jul 05, 2013
by
Glenn Morris
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
* admin/admin.el (make-manuals): Avoid hard-coding list of misc manuals.
(manual-misc-manuals): New function.
parent
4431e6d9
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
23 additions
and
12 deletions
+23
-12
admin/ChangeLog
admin/ChangeLog
+5
-0
admin/admin.el
admin/admin.el
+18
-12
No files found.
admin/ChangeLog
View file @
0773c610
2013-07-06 Glenn Morris <rgm@gnu.org>
* admin.el (manual-misc-manuals): New function.
(make-manuals): Avoid hard-coding list of misc manuals.
2013-07-05 Glenn Morris <rgm@gnu.org>
* admin.el (make-manuals): Use a standard location for lispintro.
...
...
admin/admin.el
View file @
0773c610
...
...
@@ -193,6 +193,22 @@ Root must be the root of an Emacs source tree."
;;; Various bits of magic for generating the web manuals
(defun manual-misc-manuals (root)
"
Return
doc/misc
manuals
as
list
of
strings.
"
;; Like `make -C doc/misc echo-info', but works if unconfigured.
(with-temp-buffer
(insert-file-contents (expand-file-name "
doc/misc/Makefile.in
" root))
(search-forward "
INFO_TARGETS
=
")
(let ((start (point))
res)
(end-of-line)
(while (and (looking-back "
\\\\
")
(zerop (forward-line 1)))
(end-of-line))
(split-string (replace-regexp-in-string
"
\\
(
\\\\\\|\\.info\\)" ""
(buffer-substring start (point)))))))
(defun make-manuals (root)
"Generate the web manuals for the Emacs webpage."
(interactive "DEmacs root directory: ")
...
...
@@ -229,18 +245,8 @@ Root must be the root of an Emacs source tree."
(manual-pdf texi (expand-file-name "eintr.pdf" pdf-dir))
(manual-ps texi (expand-file-name "eintr.ps" ps-dir)))
;; Misc manuals
(let ((manuals '("
ada-mode
" "
auth
" "
autotype
" "
bovine
" "
calc
" "
cc-mode
"
"
cl
" "
dbus
" "
dired-x
" "
ebrowse
" "
ede
" "
ediff
"
"
edt
" "
eieio
" "
emacs-gnutls
" "
emacs-mime
" "
epa
" "
erc
" "
ert
"
"
eshell
" "
eudc
" "
faq
" "
flymake
" "
forms
"
"
gnus
" "
htmlfontify
" "
idlwave
" "
info
"
"
mairix-el
" "
message
" "
mh-e
" "
newsticker
"
"
nxml-mode
" "
org
" "
pcl-cvs
" "
pgg
" "
rcirc
"
"
reftex
" "
remember
" "
sasl
" "
sc
" "
semantic
"
"
ses
" "
sieve
" "
smtpmail
" "
speedbar
" "
srecode
" "
tramp
"
"
url
" "
vip
" "
viper
" "
widget
" "
wisent
" "
woman
")))
(dolist (manual manuals)
(manual-misc-html manual root html-node-dir html-mono-dir)))
(dolist (manual (manual-misc-manuals root))
(manual-misc-html manual root html-node-dir html-mono-dir))
(message "Manuals created in %s" dest)))
(defconst manual-doctype-string
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment