From: mdw <mdw>
Date: Wed, 22 Dec 1999 17:08:52 +0000 (+0000)
Subject: Support MXD files.
X-Git-Tag: 1.0.3~1
X-Git-Url: https://git.distorted.org.uk/~mdw/skel/commitdiff_plain/34262dcf7796cacf3a38adddf6f2ba448270904d

Support MXD files.
---

diff --git a/Makefile.am b/Makefile.am
index b5996b9..8cb09ab 100644
--- a/Makefile.am
+++ b/Makefile.am
@@ -1,6 +1,6 @@
 ## -*-makefile-*-
 ##
-## $Id: Makefile.am,v 1.4 1999/08/23 18:54:00 mdw Exp $
+## $Id: Makefile.am,v 1.5 1999/12/22 17:08:29 mdw Exp $
 ##
 ## Makefile for skel
 ##
@@ -28,6 +28,9 @@
 ##----- Revision history ----------------------------------------------------
 ##
 ## $Log: Makefile.am,v $
+## Revision 1.5  1999/12/22 17:08:29  mdw
+## Support MXD files.
+##
 ## Revision 1.4  1999/08/23 18:54:00  mdw
 ## Support Objective-C.
 ##
@@ -55,6 +58,7 @@ ELCFILES = skel.elc
 pkgdata_DATA = \
 	skeleton skelrc \
 	skelrc.c skelrc.cc skelrc.h skelrc.m skelrc.y skelrc.java \
+	skelrc.mxd \
 	skelrc.el \
 	skelrc.pm skelrc.pl \
 	skelrc.am skelrc.in \
diff --git a/skelrc.mxd b/skelrc.mxd
new file mode 100644
index 0000000..e1d7816
--- /dev/null
+++ b/skelrc.mxd
@@ -0,0 +1,23 @@
+;;; -*-emacs-lisp-*-
+
+(skel-include "skelrc.c")
+
+(defun skelrc-mxd-header ()
+  (if buffer-file-name
+      (file-name-sans-extension (file-name-nondirectory buffer-file-name)))
+    (skel-lookup 'mxd-header-name))
+
+(setq skel-alist
+      (append
+       '((preamble . "[[prologue]][[includes]][[structures]]")
+	 (prologue . "@mxd prologue \"[[header-name]].h\";\n\n")
+	 (header-name . (skelrc-mxd-header))
+	 (c++-guard . "#ifdef __cplusplus\n  extern \"C\" {\n#endif\n\n")
+	 (includes . "[[includes-banner]]\n\n[[headers]]")
+	 (includes-banner . (skelrc-banner "Header files"))
+	 (headers . "")
+	 (structures . "[[struct-banner]]\n\n@mxd {\n\n}\n\n")
+	 (struct-banner . (skelrc-banner "Data structures"))
+	 (postamble . "[[epilogue]]\n")
+	 (epilogue . "\n@mxd epilogue;"))
+       skel-alist))