diff options
| author | David Aspinall | 1999-11-15 18:39:53 +0000 |
|---|---|---|
| committer | David Aspinall | 1999-11-15 18:39:53 +0000 |
| commit | 67d134c05703c92b975e0b8d7815bb807c798496 (patch) | |
| tree | 4ccfa69f8efc3e429808b5c20e551c9c5bee5e23 | |
| parent | 7a23041ef6e3bf6b6fa4f5b276487d77817b04f4 (diff) | |
Name changes: proof-toolbar-follow-mode -> proof-follow-mode, proof-execute-minibuffer-cmd -> proof-minibuffer-cmd
| -rw-r--r-- | generic/proof-config.el | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/generic/proof-config.el b/generic/proof-config.el index 71fd7252..6b022017 100644 --- a/generic/proof-config.el +++ b/generic/proof-config.el @@ -287,12 +287,12 @@ you should set `proof-tidy-response' to nil." ;;; NON BOOLEAN OPTIONS -(defcustom proof-toolbar-follow-mode 'locked - "*Choice of how point moves with toolbar commands. +(defcustom proof-follow-mode 'locked + "*Choice of how point moves with script processing commands. One of the symbols: 'locked, 'follow, 'ignore. -If 'locked, point sticks to the end of the locked region with toolbar commands. +If 'locked, point sticks to the end of the locked region. If 'follow, point moves just when needed to display the locked region end. -If 'ignore, point is never moved after toolbar movement commands." +If 'ignore, point is never moved after movement commands." :type '(choice (const :tag "Follow locked region" locked) (const :tag "Keep locked region displayed" follow) @@ -404,6 +404,7 @@ The protocol used should be configured so that no user interaction Exactly what uses this face depends on the proof assistant." :group 'proof-faces) +;; FIXME da: are these defconsts still needed now we use defface? (defconst proof-declaration-name-face 'proof-declaration-name-face "Expression that evaluates to a face. Required so that 'proof-declaration-name-face is a proper facename in @@ -909,7 +910,7 @@ This is used to handle nested goals allowed by some provers." (defcustom proof-state-preserving-p nil "A predicate, non-nil if its argument (a command) preserves the proof state. -If set, used by proof-execute-minibuffer-cmd to filter out scripting +If set, used by proof-minibuffer-cmd to filter out scripting commands which should be entered directly into the script itself." :type 'function :group 'proof-script) @@ -1510,7 +1511,7 @@ buffer. Otherwise they appear in the response buffer." ;; 7. Splash screen settings ;; -(defcustom proof-splash-time 2.5 +(defcustom proof-splash-time 1.5 "Minimum number of seconds to display splash screen for. The splash screen may be displayed for a couple of seconds longer than this, depending on how long it takes the machine to initialise @@ -1634,7 +1635,7 @@ X-Symbol support is deactivated." ;; various PG modes? (defcustom proof-universal-keys '(([(control c) (control c)] . proof-interrupt-process) - ([(control c) (control v)] . proof-execute-minibuffer-cmd)) + ([(control c) (control v)] . proof-minibuffer-cmd)) "List of keybindings made for the script, goals and response buffer. Elements of the list are tuples `(k . f)' where `k' is a keybinding (vector) and `f' the designated function." |
