annotate vms/make-mms-derivative.el @ 54485:6232f791322c

(ethio-find-file): Doc fix.
author Juri Linkov <juri@jurta.org>
date Mon, 22 Mar 2004 07:47:29 +0000
parents d6dc58f9beaa
children e5d5ea6a58f1
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
1 ;;; make-mms-derivative.el --- framework to do horrible things for VMS support
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
2
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
3 ;; Copyright (C) 2003 Free Software Foundation, Inc.
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
4
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
5 ;; Author: Thien-Thi Nguyen <ttn@gnu.org>
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
6 ;; Keywords: maint build vms mms makefile levitte autoconf war-is-a-lose
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
7 ;; Favorite-TV-Game-Show: L'Eredità
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
8
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
9 ;; This file is part of GNU Emacs.
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
10
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
11 ;; GNU Emacs is free software; you can redistribute it and/or modify
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
12 ;; it under the terms of the GNU General Public License as published by
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
13 ;; the Free Software Foundation; either version 2, or (at your option)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
14 ;; any later version.
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
15
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
16 ;; GNU Emacs is distributed in the hope that it will be useful,
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
19 ;; GNU General Public License for more details.
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
20
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
21 ;; You should have received a copy of the GNU General Public License
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
23 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
24 ;; Boston, MA 02111-1307, USA.
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
25
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
26 ;;; Commentary:
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
27
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
28 ;; Under OpenVMS the standard make-like program is called MMS, which
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
29 ;; looks for an input file in the default directory named DESCRIP.MMS
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
30 ;; and runs the DCL command rules therein. As of 2003, the build
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
31 ;; process requires a hand translation of the Makefile.in and related
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
32 ;; Emacs-specific methodology to DCL and TPU commands, so to alleviate
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
33 ;; this pain, we provide `make-mms-derivative', which given a source
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
34 ;; FILENAME (under `make-mms-derivative-root-dir'), inserts the file
53153
95cc51c7ff64 (make-mms-derivative): Use suffix "-2mms"
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53152
diff changeset
35 ;; contents in a new buffer and loads FILENAME-2mms. The elisp in the
95cc51c7ff64 (make-mms-derivative): Use suffix "-2mms"
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53152
diff changeset
36 ;; -2mms file can (do whatever -- it's emacs -- and) arrange to write
95cc51c7ff64 (make-mms-derivative): Use suffix "-2mms"
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53152
diff changeset
37 ;; out the modified buffer after FILENAME-2mms loading by using:
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
38 ;;
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
39 ;; (make-mms-derivative-data 'write-under-root RELATIVE-FILENAME)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
40 ;;
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
41 ;; where RELATIVE-FILENAME is something like "src/descrip.mms_in_in".
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
42 ;; Over the long run, the convenience procedures provided (see source)
53153
95cc51c7ff64 (make-mms-derivative): Use suffix "-2mms"
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53152
diff changeset
43 ;; will be augmented by factoring maximally the -2mms files, squeezing
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
44 ;; as much algorithm out of those nasty heuristics as possible. What
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
45 ;; makes them nasty is not that they rely on the conventions of the
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
46 ;; Emacs makefiles; that's no big deal. What makes them nasty is that
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
47 ;; they rely on the conventions of separately maintained tools (namely
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
48 ;; Autoconf 1.11 under OpenVMS and the rest of GNU), and the separation
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
49 ;; of conventions is how people drift apart, dragging their software
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
50 ;; behind mercilessly.
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
51 ;;
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
52 ;; In general, codified thought w/o self-synchronization is doomed.
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
53 ;; That a generation would eat its young (most discriminatingly, even)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
54 ;; is no reason GNU cannot build around such woe.
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
55
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
56 ;;; Code:
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
57
53186
d6dc58f9beaa (make-mms-derivative-root-dir): Update.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53156
diff changeset
58 (defvar make-mms-derivative-root-dir "AXPA:[TTN.EMACS.EMACS212_3]"
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
59 "Source tree root directory.")
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
60
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
61 (defvar make-mms-derivative-data nil
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
62 "Alist of data specific to `make-mms-derivative'.")
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
63
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
64 (defun make-mms-derivative-data (key &optional newval)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
65 (if newval
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
66 (setq make-mms-derivative-data
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
67 (cons (cons key newval) make-mms-derivative-data))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
68 (cdr (assq key make-mms-derivative-data))))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
69
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
70 (defun make-mms-derivative-write-under-root (rel-filename)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
71 (write-file (expand-file-name rel-filename make-mms-derivative-root-dir)))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
72
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
73 (defmacro make-mms-derivative-progn (msg &rest body)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
74 `(progn
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
75 (message "(%s) %s" (point) ,msg)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
76 ,@body))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
77
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
78 (put 'make-mms-derivative-progn 'lisp-indent-function 1)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
79
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
80 (defun make-mms-derivative-load-edits-file (name)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
81 (make-mms-derivative-data 'edits-filename name)
53156
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
82 (let (raw-data
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
83 (cur (current-buffer))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
84 (wbuf (get-buffer-create "*make-mms-derivative-load-edits-file work")))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
85 (set-buffer wbuf)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
86 (insert-file-contents name)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
87 (keep-lines "^;;;[0-9]+;;")
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
88 (goto-char (point-max))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
89 (while (re-search-backward "^;;;\\([0-9]+\\);;\\(.*\\)$" (point-min) t)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
90 (let* ((i (string-to-number (match-string 1)))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
91 (line (match-string 2))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
92 (look (assq i raw-data)))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
93 (if look
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
94 (setcdr look (cons line (cdr look)))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
95 (setq raw-data (cons (list i line) raw-data)))))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
96 (kill-buffer wbuf)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
97 (set-buffer cur)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
98 (mapcar '(lambda (ent)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
99 (setcdr ent (mapconcat '(lambda (line)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
100 (concat line "\n"))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
101 (cdr ent)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
102 "")))
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
103 raw-data)
4d79ab10fd56 (make-mms-derivative-load-edits-file): Rewrite
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53155
diff changeset
104 (make-mms-derivative-data 'raw-data raw-data))
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
105 (load name))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
106
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
107 (defun make-mms-derivative-insert-raw-data (n)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
108 (insert (cdr (assq n (make-mms-derivative-data 'raw-data)))))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
109
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
110 (defun make-mms-derivative (file)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
111 (interactive "fSource File: ")
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
112 (let ((root (expand-file-name make-mms-derivative-root-dir))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
113 (file (expand-file-name file)))
53186
d6dc58f9beaa (make-mms-derivative-root-dir): Update.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53156
diff changeset
114 (when (file-name-absolute-p (file-relative-name file root))
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
115 (error "Not under root (%s)" root))
53153
95cc51c7ff64 (make-mms-derivative): Use suffix "-2mms"
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53152
diff changeset
116 (let ((edits-filename (concat file "-2mms")))
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
117 (unless (file-exists-p edits-filename)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
118 (error "Could not find %s" edits-filename))
53186
d6dc58f9beaa (make-mms-derivative-root-dir): Update.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53156
diff changeset
119 (let ((buf (get-buffer-create
d6dc58f9beaa (make-mms-derivative-root-dir): Update.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53156
diff changeset
120 (format "*mms-derivative: %s"
d6dc58f9beaa (make-mms-derivative-root-dir): Update.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents: 53156
diff changeset
121 (file-relative-name file root)))))
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
122 (message "Munging ...")
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
123 (switch-to-buffer buf)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
124 (erase-buffer)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
125 (make-variable-buffer-local 'make-mms-derivative-data)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
126 (insert-file file)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
127 (make-mms-derivative-load-edits-file edits-filename)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
128 (let ((out (make-mms-derivative-data 'write-under-root)))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
129 (when out (make-mms-derivative-write-under-root out))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
130 (kill-buffer buf)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
131 (unless out (message "Munging ... done")))))))
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
132
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
133 (provide 'make-mms-derivative)
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
134
53155
384390a9b30f Add arch taglines
Miles Bader <miles@gnu.org>
parents: 53153
diff changeset
135 ;;; arch-tag: a5b08625-3952-4053-be16-296220e27bb0
53152
a87bb25a4575 Initial revision
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
diff changeset
136 ;;; make-mms-derivative.el ends here