blob: b60d38ca2dfc0abffd1aeae3123e2e6fc47e2675 (
plain)
1
2
3
4
|
(defun config-c-mode-insert-header-guard ()
(interactive)
(let ((guard (upcase (format "%s_H" (file-name-base (buffer-file-name))))))
(insert (format "#ifndef %s\n#define %s\n#endif" guard guard))))
|