X-Git-Url: https://git.distorted.org.uk/~mdw/skel/blobdiff_plain/9f6c125eabf5883d7c60aa578cca5d947779592e..34262dcf7796cacf3a38adddf6f2ba448270904d:/skelrc.mxd 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))