|
0
|
1 ;;; hm--html-configuration.el - Configurationfile for the html-mode
|
|
2
|
2 ;;;
|
|
70
|
3 ;;; $Id: hm--html-configuration.el,v 1.1.1.1 1996/12/18 22:43:20 steve Exp $
|
|
2
|
4 ;;;
|
|
70
|
5 ;;; Copyright (C) 1993, 1994, 1995, 1996 Heiko Muenkel
|
|
0
|
6 ;;; email: muenkel@tnt.uni-hannover.de
|
|
|
7 ;;;
|
|
|
8 ;;; This program is free software; you can redistribute it and/or modify
|
|
|
9 ;;; it under the terms of the GNU General Public License as published by
|
|
|
10 ;;; the Free Software Foundation; either version 2, or (at your option)
|
|
|
11 ;;; any later version.
|
|
|
12 ;;;
|
|
|
13 ;;; This program is distributed in the hope that it will be useful,
|
|
|
14 ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
15 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
16 ;;; GNU General Public License for more details.
|
|
|
17 ;;;
|
|
|
18 ;;; You should have received a copy of the GNU General Public License
|
|
|
19 ;;; along with this program; if not, write to the Free Software
|
|
|
20 ;;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
|
21 ;;;
|
|
|
22 ;;;
|
|
|
23 ;;; Description:
|
|
|
24 ;;;
|
|
2
|
25 ;;; This file is for the system wide configuration of the html mode.
|
|
|
26 ;;; User specific configuration should be done in the file
|
|
70
|
27 ;;; ~/.hm--html-configuration.el, which preceeds the settings in
|
|
2
|
28 ;;; this file.
|
|
|
29 ;;; All settings in this file are done with defvar's, therefore
|
|
|
30 ;;; you could overwrite them also with the function setq in your
|
|
|
31 ;;; .emacs or default.el and so on.
|
|
0
|
32 ;;;
|
|
|
33 ;;; Installation:
|
|
|
34 ;;;
|
|
|
35 ;;; Put this file in one of your lisp load path directories or
|
|
|
36 ;;; set the environment variable HTML_CONFIG_FILE to this file.
|
|
|
37 ;;; For example:
|
|
|
38 ;;; setenv HTML_CONFIG_FILE "~/data/hm--htm-environment.el"
|
|
|
39 ;;; if you have put this file in the directory "~/data/"
|
|
|
40 ;;;
|
|
|
41
|
|
2
|
42 ;(require 'adapt)
|
|
0
|
43
|
|
|
44
|
|
2
|
45 ;;; The User config file (an proposal of Manoj Srivastava)
|
|
0
|
46 (defvar hm--html-user-config-file nil
|
|
|
47 "*The location of the users config file.
|
|
|
48 This variable will only be used, if no environment variable
|
|
|
49 \"HTML_USER_CONFIG_FILE\" is set.
|
|
|
50 Example value: \"~/.hm--html-configuration.el\".")
|
|
|
51
|
|
|
52
|
|
2
|
53 ;;; Chose the initial popup menu
|
|
0
|
54 (defvar hm--html-expert nil
|
|
|
55 "*t : Use the HTML expert popup menu,
|
|
|
56 nil : Use the HTML novice (simple) menu.
|
|
|
57
|
|
2
|
58 NOTE: In the Emacs 19 you should set this variable only before
|
|
|
59 loading the mode.")
|
|
0
|
60
|
|
|
61 ;;; Your Signature
|
|
|
62
|
|
|
63 (defvar hm--html-signature-file nil
|
|
|
64 "*Your Signature file.
|
|
|
65 For example: \"http://www.tnt.uni-hannover.de:80/data/info/www/tnt/info/tnt/whois/muenkel.html\".")
|
|
|
66
|
|
|
67
|
|
|
68 (defvar hm--html-username nil
|
|
|
69 "*Your Name for the signature. For example: \"Heiko Münkel\".")
|
|
|
70
|
|
|
71
|
|
|
72 ;;; Your favorite server (eg: the name of the host of your own http server)
|
|
|
73 ;;; This is used in some other variables
|
|
|
74
|
|
|
75 (defvar hm--html-favorite-http-server-host-name "www.tnt.uni-hannover.de"
|
|
|
76 "*The name of your favorite http server host. It must be specified !")
|
|
|
77
|
|
|
78
|
|
|
79 ;;; For links to Info Gateways
|
|
|
80
|
|
2
|
81 (defvar hm--html-info-hostname:port-alist '(("www.tnt.uni-hannover.de:8005"))
|
|
0
|
82 "*Alist with hostnames and ports for the Info gateway.")
|
|
|
83
|
|
2
|
84 (defvar hm--html-info-hostname:port-default "www.tnt.uni-hannover.de:8005"
|
|
0
|
85 "*Default hostname with port for the Info gateway.")
|
|
|
86
|
|
2
|
87 (defvar hm--html-info-path-alist '((1 . "/appl/lemacs/Global/emacs/info")
|
|
|
88 (2 . "/appl/emacs/info")
|
|
|
89 (3 . "/appl/gnu/Global/info")
|
|
|
90 (4 . "/appl/emacs-19/Global/info")
|
|
|
91 (5 . "/"))
|
|
0
|
92 "*Alist with directories for the Info gateway.")
|
|
|
93
|
|
|
94
|
|
|
95 ;;; For links to WAIS Gateways
|
|
|
96
|
|
2
|
97 (defvar hm--html-wais-hostname:port-alist '(("www.tnt.uni-hannover.de:8001")
|
|
|
98 ("info.cern.ch:8001"))
|
|
0
|
99 "*Alist with hostnames and ports for the WAIS gateway.")
|
|
|
100
|
|
2
|
101 (defvar hm--html-wais-hostname:port-default "www.tnt.uni-hannover.de:8001"
|
|
0
|
102 "*Default hostname with port for the WAIS gateway.")
|
|
|
103
|
|
2
|
104 (defvar hm--html-wais-servername:port-alist
|
|
|
105 '(("wais.tnt.uni-hannover.de:210")
|
|
|
106 ("daedalus.tnt.uni-hannover.de:21408")
|
|
|
107 ("ikarus.tnt.uni-hannover.de:21401"))
|
|
0
|
108 "*Alist with servernames and ports for the WAIS gateway.")
|
|
|
109
|
|
2
|
110 (defvar hm--html-wais-servername:port-default "www.tnt.uni-hannover.de:210"
|
|
0
|
111 "*Default servername with port for the WAIS gateway.")
|
|
|
112
|
|
|
113 (defvar hm--html-wais-path-alist nil
|
|
|
114 "*Alist with directories for the wais gateway.")
|
|
|
115
|
|
|
116
|
|
|
117 ;;; For links to HTML servers
|
|
|
118
|
|
2
|
119 (defvar hm--html-html-hostname:port-alist '(("www.tnt.uni-hannover.de:80")
|
|
|
120 ("vxcrna.cern.ch:80")
|
|
|
121 ("www.ncsa.uiuc.edu:80"))
|
|
0
|
122 "*Alist with hostnames and ports for the HTML server.")
|
|
|
123
|
|
2
|
124 (defvar hm--html-html-hostname:port-default "www.tnt.uni-hannover.de:80"
|
|
0
|
125 "*Default hostname with port for the HTML server.")
|
|
|
126
|
|
2
|
127 (defvar hm--html-html-path-alist '((1 . "/data/info/www/tnt/")
|
|
|
128 (2 . "/data/info/www/")
|
|
|
129 (3 . "/data/info/")
|
|
|
130 (4 . "/data/")
|
|
|
131 (5 . "/appl/")
|
|
|
132 (6 . "/project/")
|
|
|
133 (7 . "~/")
|
|
|
134 (8 . "/"))
|
|
0
|
135 "*Alist with directories for the HTML server.")
|
|
|
136
|
|
|
137
|
|
|
138 ;;; For links to file gateways
|
|
|
139
|
|
2
|
140 (defvar hm--html-file-path-alist '((1 . "/data/info/www/tnt/")
|
|
|
141 (2 . "/data/info/www/")
|
|
|
142 (3 . "/data/info/")
|
|
|
143 (4 . "/data/")
|
|
|
144 (5 . "/appl/")
|
|
|
145 (6 . "/project/")
|
|
|
146 (7 . "~/")
|
|
|
147 (8 . "/"))
|
|
0
|
148 "*Alist with directories for the file gateway.")
|
|
|
149
|
|
|
150
|
|
|
151 ;;; For links to ftp servers
|
|
|
152
|
|
2
|
153 (defvar hm--html-ftp-hostname:port-alist '(("ftp.tnt.uni-hannover.de")
|
|
|
154 ("ftp.rrzn.uni-hannover.de")
|
|
|
155 ("wega.informatik.uni-hannover.de")
|
|
|
156 ("rusmv1.rus.uni-stuttgart.de")
|
|
|
157 ("export.lcs.mit.edu")
|
|
|
158 )
|
|
0
|
159 "*Alist with hostnames and ports for the ftp server.")
|
|
|
160
|
|
2
|
161 (defvar hm--html-ftp-hostname:port-default "ftp.rrzn.uni-hannover.de"
|
|
0
|
162 "*Default hostname with port for the ftp server.")
|
|
|
163
|
|
2
|
164 (defvar hm--html-ftp-path-alist '((1 . "/pub")
|
|
|
165 (2 . "/pub/gnu")
|
|
|
166 (3 . "/pub/linux")
|
|
|
167 (4 . "/pub/unix")
|
|
|
168 (5 . "/incoming")
|
|
|
169 (6 . "/"))
|
|
0
|
170 "*Alist with directories for the ftp server.")
|
|
|
171
|
|
|
172
|
|
|
173 ;;; For links to gopher servers
|
|
|
174
|
|
2
|
175 (defvar hm--html-gopher-hostname:port-alist
|
|
|
176 '(("newsserver.rrzn.uni-hannover.de:70")
|
|
|
177 ("solaris.rz.tu-clausthal.de:70")
|
|
|
178 ("veronica.scs.unr.edu:70")
|
|
|
179 ("pinus.slu.se:70")
|
|
|
180 ("sunic.sunet.se:70")
|
|
|
181 )
|
|
0
|
182 "*Alist with hostnames and ports for the gopher server.")
|
|
|
183
|
|
2
|
184 (defvar hm--html-gopher-doctype-alist '(("/1")
|
|
|
185 ("/11")
|
|
|
186 ("/00"))
|
|
0
|
187 "*Alist with doctype strings for the gopher server.")
|
|
|
188
|
|
2
|
189 (defvar hm--html-gopher-doctype-default "/1"
|
|
0
|
190 "*Default doctype string for the gopher server.")
|
|
|
191
|
|
70
|
192 (defvar hm--html-gopher-hostname:port-default
|
|
|
193 "newsserver.rrzn.uni-hannover.de:70"
|
|
|
194 "*Default hostname with port for the gopher server.")
|
|
|
195
|
|
2
|
196 (defvar hm--html-gopher-anchor-alist
|
|
|
197 '(("veronica")
|
|
|
198 ("Wide%20Area%20Information%20Services%20databases")
|
|
|
199 ("Subject%20Tree"))
|
|
0
|
200 "*Alist with directories for the gopher server.")
|
|
|
201
|
|
|
202
|
|
|
203 ;;; For the links to the Program Gateway
|
|
|
204
|
|
2
|
205 (defvar hm--html-proggate-hostname:port-alist
|
|
|
206 '(("www.tnt.uni-hannover.de:8007")
|
|
|
207 )
|
|
0
|
208 "*Alist with hostnames and ports for the proggate server.")
|
|
|
209
|
|
2
|
210 (defvar hm--html-proggate-hostname:port-default "www.tnt.uni-hannover.de:8007"
|
|
0
|
211 "*Default hostname with port for the proggate server.")
|
|
|
212
|
|
2
|
213 (defvar hm--html-proggate-allowed-file "/appl/www/bin/proggate.allowed"
|
|
0
|
214 "*The filename (with path) of the proggate allowed file.")
|
|
|
215
|
|
|
216
|
|
|
217 ;;; For links to the Local Program Gatewy
|
|
|
218
|
|
2
|
219 (defvar hm--html-local-proggate-path-alist '((1 . "/bin/")
|
|
|
220 (2 . "/usr/bin/")
|
|
|
221 (3 . "/usr/local/bin/")
|
|
|
222 (4 . "/appl/util/bin/")
|
|
|
223 (5 . "/appl/gnu/Global/bin/")
|
|
|
224 (6 . "/")
|
|
|
225 (7 . "/appl/")
|
|
|
226 (8 . "~/appl/Global/bin/")
|
|
|
227 (9 . "~/"))
|
|
0
|
228 "*Alist with directories for the local program gateway.")
|
|
|
229
|
|
|
230
|
|
|
231 ;;; For links to the mail gateway
|
|
|
232
|
|
2
|
233 (defvar hm--html-mail-hostname:port-alist '(("www.tnt.uni-hannover.de:8003")
|
|
|
234 )
|
|
0
|
235 "*Alist with hostnames and ports for the mail gateway.")
|
|
|
236
|
|
2
|
237 (defvar hm--html-mail-hostname:port-default "www.tnt.uni-hannover.de:8003"
|
|
0
|
238 "*Default hostname with port for the mail gateway.")
|
|
|
239
|
|
2
|
240 (defvar hm--html-mail-path-alist '((1 . "~/data/docs/mail")
|
|
|
241 (2 . "~/data/docs/news")
|
|
|
242 (3 . "~/docs/mail")
|
|
|
243 (4 . "~/docs/news")
|
|
|
244 (5 . "~/mail")
|
|
|
245 (6 . "~/news")
|
|
|
246 (7 . "~/")
|
|
|
247 (8 . "/data/info/mail")
|
|
|
248 (9 . "/data/info/news")
|
|
|
249 (10 . "/"))
|
|
0
|
250 "*Alist with directories for the mail gateway.")
|
|
|
251
|
|
|
252
|
|
|
253 ;;; For mailto links
|
|
|
254
|
|
2
|
255 (defvar hm--html-mailto-alist '(("muenkel@tnt.uni-hannover.de"))
|
|
0
|
256 "*Alist with mail adresses for the mailto alist.
|
|
|
257 The value of `user-mail-address' will also be added by the package to
|
|
|
258 this alist.")
|
|
|
259
|
|
|
260
|
|
|
261 ;;; For the server side include directive
|
|
2
|
262 ;;; not sure, if these directives works on any server
|
|
0
|
263
|
|
2
|
264 (defvar hm--html-server-side-include-command-alist '(("/bin/date")
|
|
|
265 ("/usr/bin/finger")
|
|
|
266 ("/bin/df"))
|
|
0
|
267 "*Alist with commands for the server side include directive.
|
|
|
268 These commands needs no parameter.")
|
|
|
269
|
|
2
|
270 (defvar hm--html-server-side-include-command-with-parameter-alist
|
|
|
271 '(("/usr/bin/man")
|
|
|
272 ("/usr/bin/finger")
|
|
|
273 ("/usr/bin/ls")
|
|
|
274 ("/bin/cat"))
|
|
0
|
275 "*Alist with commands for the server side include directive.
|
|
|
276 These commands needs parameters.")
|
|
|
277
|
|
|
278
|
|
|
279 ;;; Alist with URL'S for FORMS and IMAGE tags
|
|
|
280
|
|
2
|
281 (defvar hm--html-url-alist
|
|
|
282 (list
|
|
|
283 '("http://hoohoo.ncsa.uiuc.edu/htbin-post/post-query"
|
|
|
284 POST)
|
|
|
285 '("http://hoohoo.ncsa.uiuc.edu/htbin/query"
|
|
|
286 GET)
|
|
|
287 (list
|
|
|
288 (concat "http://"
|
|
|
289 hm--html-favorite-http-server-host-name
|
|
|
290 "/")
|
|
|
291 'IMAGE))
|
|
0
|
292 "*Alist with URL's for FORMS and IMAGE tags.
|
|
|
293 The cdr of each list contains symbols, which specifys the use of the
|
|
|
294 URL.")
|
|
|
295
|
|
|
296
|
|
|
297 ;;; For the marking of examples in the help buffer
|
|
|
298
|
|
|
299 (defvar hm--html-help-foreground "red"
|
|
|
300 "The foreground color to highlight examples.")
|
|
|
301
|
|
|
302 (defvar hm--html-help-background nil
|
|
|
303 "The background color to highlight examples.")
|
|
|
304
|
|
|
305 (defvar hm--html-help-font (face-font 'bold)
|
|
|
306 "The font to highlight examples.")
|
|
|
307
|
|
|
308
|
|
|
309 ;;; For the Templates
|
|
|
310
|
|
2
|
311 (defvar hm--html-template-dir "/data/info/www/tnt/guide/templates"
|
|
70
|
312 "*A directory with templatefiles")
|
|
0
|
313
|
|
70
|
314 (if (not (file-exists-p hm--html-template-dir))
|
|
0
|
315 ;; Use a system directory, if the above one doesn't exist
|
|
70
|
316 ;; This is only useful, in the XEmacs 19.12
|
|
0
|
317 (setq hm--html-template-dir (concat data-directory
|
|
70
|
318 "../lisp/hm--html-menus/")))
|
|
0
|
319
|
|
70
|
320 (defvar hm--html-frame-template-file (concat hm--html-template-dir
|
|
|
321 "frame.tmpl")
|
|
0
|
322 "File, which is used as template for a html frame.")
|
|
|
323
|
|
2
|
324 (defvar hm--html-automatic-expand-templates t
|
|
0
|
325 "*Automatic expansion of templates. This feature needs the file
|
|
|
326 tmpl-minor-mode.el from Heiko Muenkel (muenkel@tnt.uni-hannover.de),
|
|
|
327 which is distributed with the package hm--html-menus.")
|
|
|
328
|
|
|
329
|
|
|
330 ;;; for deleting the automounter path-prefix
|
|
2
|
331 (defvar hm--html-delete-wrong-path-prefix '("/tmp_mnt" "/phys/[^/]+")
|
|
0
|
332 "If non nil, it specifies path-prefixes, which should be deleted in pathes.
|
|
|
333 The Sun automounter adds a temporary prefix to the automounted directories
|
|
|
334 (At our site the prefix is /tmp_mnt). But you can't select such a path, if
|
|
|
335 the automounter has currently not mounted the directory and so you can't
|
|
|
336 follow a html-link, which consists of such a path. To overcome this behaviour,
|
|
|
337 you can set this variable to the prefix (eg. \"/tmp_mnt\"). After that, the
|
|
|
338 prefix should be stripped from the pathes during the creation of the links.
|
|
|
339 ATTENTION: This variable is used as regular expression !
|
|
|
340 It can be set to a string or to a list of strings.")
|
|
|
341
|
|
|
342
|
|
|
343 ;;; For insertation of created and changed comments and automatic
|
|
|
344 ;;; date update in the title line
|
|
|
345
|
|
|
346 (defvar hm--html-automatic-new-date t
|
|
|
347 "*t => The date in the title line will be updated before filesaving.
|
|
|
348 nil => No automatic update of the date.")
|
|
|
349
|
|
|
350 (defvar hm--html-automatic-changed-comment t
|
|
|
351 "*t => A \"changed comment\" line will be added before filesaving.
|
|
|
352 nil => No automatic insertation of a \"changed comment\" line.")
|
|
|
353
|
|
|
354 (defvar hm--html-automatic-created-comment t
|
|
|
355 "*t => A \"created comment\" line will be added.
|
|
|
356 nil => No automatic insertation of a \"created comment\" line.")
|
|
|
357
|
|
|
358
|
|
|
359 ;;; Keybindings:
|
|
|
360
|
|
|
361 (defvar hm--html-bind-latin-1-char-entities t
|
|
70
|
362 "Set this to nil, if you don't want to use the ISO Latin 1 charcter entities.
|
|
0
|
363 This is only useful, if `hm--html-use-old-keymap' is set to nil. It is only
|
|
|
364 used during loading the html package the first time.")
|
|
|
365
|
|
|
366
|
|
2
|
367 ;;; The drag and drop interface
|
|
|
368 (defvar hm--html-idd-create-relative-links t
|
|
|
369 "If t, then the hm--html-idd-* functions are creating relative links.
|
|
|
370 Otherwise absolute links are used. The idd functions are used for
|
|
|
371 drag and drop.")
|
|
0
|
372
|
|
2
|
373 (defvar hm--html-idd-actions
|
|
70
|
374 '((nil (((idd-major-mode-p . dired-mode)
|
|
|
375 (idd-dired-file-on-line-p . ".*\\.\\(gif\\)\\|\\(jpq\\)"))
|
|
2
|
376 hm--html-idd-add-include-image-from-dired-line)
|
|
70
|
377 (((idd-major-mode-p . dired-mode)
|
|
|
378 (idd-dired-no-file-on-line-p . nil))
|
|
2
|
379 hm--html-idd-add-file-link-to-file-on-dired-line)
|
|
70
|
380 (((idd-major-mode-p . dired-mode)
|
|
|
381 (idd-dired-no-file-on-line-p . t))
|
|
2
|
382 hm--html-idd-add-file-link-to-directory-of-buffer)
|
|
70
|
383 (((idd-major-mode-p . w3-mode)
|
|
|
384 (idd-url-at-point-p . t))
|
|
2
|
385 hm--html-idd-add-html-link-from-w3-buffer-point)
|
|
70
|
386 (((idd-major-mode-p . w3-mode))
|
|
2
|
387 hm--html-idd-add-html-link-to-w3-buffer)
|
|
70
|
388 (((idd-local-file-p . t))
|
|
2
|
389 hm--html-idd-add-file-link-to-buffer)))
|
|
70
|
390 "The action list for the source mode `hm--html-mode'.
|
|
|
391 Look at the description of the variable idd-actions")
|
|
0
|
392
|
|
2
|
393
|
|
|
394 ;;; The font lock keywords
|
|
|
395
|
|
70
|
396 (defvar hm--html-font-lock-keywords
|
|
2
|
397 (list
|
|
70
|
398 '("\\(<!--.*-->\\)\\|\\(<[^>]*>\\)+" . font-lock-comment-face)
|
|
|
399 '("[Hh][Rr][Ee][Ff]=\"\\([^\"]*\\)\"" 1 font-lock-string-face t)
|
|
|
400 '("[Ss][Rr][Cc]=\"\\([^\"]*\\)\"" 1 font-lock-string-face t))
|
|
2
|
401 "Default expressions to highlight in the hm--html-mode.")
|
|
|
402
|
|
0
|
403
|
|
2
|
404 ;;; The Prefix- Key for the keytables
|
|
|
405 (defvar hm--html-minor-mode-prefix-key "\C-z"
|
|
|
406 "The prefix key for the keytables in the `hm--html-minor-mode'.")
|
|
|
407
|
|
|
408 (defvar hm--html-mode-prefix-key "\C-c"
|
|
|
409 "The prefix key for the hm--html keys in the `hm--html-mode'.")
|
|
|
410
|
|
|
411
|
|
|
412 ;;; The pulldown menu names
|
|
|
413 (defvar hm--html-minor-mode-pulldown-menu-name "HM-HTML"
|
|
|
414 "The name of the pulldown menu in the minor html mode.")
|
|
|
415
|
|
|
416 (defvar hm--html-mode-pulldown-menu-name "HTML"
|
|
|
417 "The name of the pulldown menu in the major html mode.")
|
|
|
418
|
|
|
419
|
|
|
420 ;;; The hook variables
|
|
|
421 (defvar hm--html-load-hook nil
|
|
|
422 "*Hook variable to execute functions after loading the package.")
|
|
0
|
423
|
|
2
|
424 (defvar hm--html-mode-hook nil
|
|
70
|
425 "This hook will be called each time, when the hm--html-mode is invoked.")
|
|
2
|
426
|
|
|
427
|
|
|
428 ;;; For the file html-view.el
|
|
|
429 ;;; There are also some other variables in hmtl-view.el
|
|
|
430 ;;; Look at that file, if you've trouble with the functions
|
|
|
431 ;;; to preview the html document with the Mosaic
|
|
|
432 (defvar html-view-mosaic-command "/sol/www/bin/mosaic"
|
|
70
|
433 "The command that runs Mosaic on your system")
|
|
0
|
434
|
|
2
|
435 (defvar html-sigusr1-signal-value 16
|
|
|
436 "Value for the SIGUSR1 signal on your system.
|
|
|
437 See, usually, /usr/include/sys/signal.h.
|
|
|
438 SunOS 4.1.x : (setq html-sigusr1-signal-value 30)
|
|
|
439 SunOS 5.x : (setq html-sigusr1-signal-value 16)
|
|
|
440 Linux : (setq html-sigusr1-signal-value 10))")
|
|
|
441
|
|
|
442
|
|
|
443 ;;; Announce the feature hm--html-configuration
|
|
|
444 (provide 'hm--html-configuration)
|
|
|
445
|
