Support MXD files.
authormdw <mdw>
Wed, 22 Dec 1999 17:08:52 +0000 (17:08 +0000)
committermdw <mdw>
Wed, 22 Dec 1999 17:08:52 +0000 (17:08 +0000)
Makefile.am
skelrc.mxd [new file with mode: 0644]

index b5996b9..8cb09ab 100644 (file)
@@ -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 (file)
index 0000000..e1d7816
--- /dev/null
@@ -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))