diff options
Diffstat (limited to 'extras/emacs/plugin.el')
| -rw-r--r-- | extras/emacs/plugin.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/extras/emacs/plugin.el b/extras/emacs/plugin.el index bf6e123bc86..1481c66dfa8 100644 --- a/extras/emacs/plugin.el +++ b/extras/emacs/plugin.el @@ -19,7 +19,10 @@ (setq start-dir default-directory) (makunbound 'plugin-name) (makunbound 'PLUGIN-NAME) + (makunbound 'plugin-flavor) (setq plugin-name (read-string "Plugin name: ")) + (setq plugin-flavor + (read-string "Dispatch type [dual or qs]: ")) (setq PLUGIN-NAME (upcase plugin-name)) (find-file (concat plugin-name ".am")) (skel-plugin-makefile-am-fragment) @@ -38,10 +41,13 @@ (find-file (concat plugin-name "_msg_enum.h")) (skel-plugin-msg-enum) (find-file "node.c") - (skel-plugin-node) + (if (string= plugin-flavor "qs") + (skel-plugin-qsnode) (skel-plugin-node)) (find-file (concat plugin-name "_test.c")) (skel-plugin-test) (find-file (concat plugin-name "_periodic.c")) (skel-plugin-periodic) + (find-file "setup.pg") + (skel-plugin-setup) (cd start-dir)))) |