Mercurial > hg > xemacs-beta
diff lisp/psgml/tempo.el @ 120:cca96a509cfe r20-1b12
Import from CVS: tag r20-1b12
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:25:29 +0200 |
parents | 376386a54a3c |
children |
line wrap: on
line diff
--- a/lisp/psgml/tempo.el Mon Aug 13 09:24:19 2007 +0200 +++ b/lisp/psgml/tempo.el Mon Aug 13 09:25:29 2007 +0200 @@ -6,7 +6,7 @@ ;; Modified: 20 Jun 1995 ;; Version: 1.2.4 ;; Keywords: extensions, languages, tools -;; $Revision: 1.1.1.1 $ +;; $Revision: 1.2 $ ;; This file is part of GNU Emacs. @@ -111,26 +111,39 @@ ;;; User options -(defvar tempo-interactive t ;; wing change +(defgroup tempo nil + "Flexible template insertion" + :group 'extensions) + + +(defcustom tempo-interactive t ;; wing change "*Prompt user for strings in templates. If this variable is non-nil, `tempo-insert' prompts the -user for text to insert in the templates") +user for text to insert in the templates" + :type 'boolean + :group 'tempo) -(defvar tempo-insert-region nil +(defcustom tempo-insert-region nil "*Automatically insert current region when there is a `r' in the template If this variable is NIL, `r' elements will be treated just like `p' elements, unless the template function is given a prefix (or a non-nil argument). If this variable is non-NIL, the behaviour is reversed. -In Transient Mark mode, this option is unused.") +In Transient Mark mode, this option is unused." + :type 'boolean + :group 'tempo) -(defvar tempo-show-completion-buffer t +(defcustom tempo-show-completion-buffer t "*If non-NIL, show a buffer with possible completions, when only -a partial completion can be found") +a partial completion can be found" + :type 'boolean + :group 'tempo) -(defvar tempo-leave-completion-buffer nil +(defcustom tempo-leave-completion-buffer nil "*If NIL, a completion buffer generated by \\[tempo-complete-tag] -disappears at the next keypress; otherwise, it remains forever.") +disappears at the next keypress; otherwise, it remains forever." + :type 'boolean + :group 'tempo) ;;; Internal variables