diff options
Diffstat (limited to 'tools/designer/integration/designer.el')
| -rw-r--r-- | tools/designer/integration/designer.el | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/tools/designer/integration/designer.el b/tools/designer/integration/designer.el new file mode 100644 index 000000000..4b3c38d57 --- /dev/null +++ b/tools/designer/integration/designer.el @@ -0,0 +1,19 @@ +(defvar designer-exec "/usr/bin/designer") + +(defun designer-open-ui-file () + (interactive) + (defvar procname "designer") + (start-process procname nil designer-exec "-client" buffer-file-name) +) + +(defun designer-create-ui-file (&optional arg) + (interactive "FNew UI-File: ") + (find-file arg) + (insert "<UI></UI>") + (save-buffer) + (designer-open-ui-file) +) + +;(global-set-key [f7] 'designer-open-ui-file) +;(global-set-key [f8] 'designer-create-ui-file) + |