diff options
| author | David Aspinall | 2003-10-05 15:34:23 +0000 |
|---|---|---|
| committer | David Aspinall | 2003-10-05 15:34:23 +0000 |
| commit | 609ab252249a866ad6c31ca534ef2680ae891720 (patch) | |
| tree | cd5784deae999885d0b4070b10abd7aef3859a35 | |
| parent | 3d00a973733c36f07a3664b05637d190defcdf3a (diff) | |
Set proof-shell-interactive-input-regexp
| -rw-r--r-- | isar/isar.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/isar/isar.el b/isar/isar.el index b7b87a43..063d331c 100644 --- a/isar/isar.el +++ b/isar/isar.el @@ -508,13 +508,13 @@ proof-shell-retract-files-regexp." ;borrowed from plastic.el (defvar isar-shell-current-line-width nil "Current line width of the Isabelle process's pretty printing module. - Its value will be updated whenever the corresponding screen gets - selected.") +Its value will be updated whenever the corresponding screen gets +selected.") ;borrowed from plastic.el (defun isar-shell-adjust-line-width () "Use Isabelle's pretty printing facilities to adjust output line width. - Checks the width in the `proof-goals-buffer'" +Checks the width in the `proof-goals-buffer'" (let ((ans "")) (and (buffer-live-p proof-goals-buffer) (proof-shell-live-buffer) @@ -537,7 +537,8 @@ proof-shell-retract-files-regexp." (setq proof-mode-for-shell 'isar-shell-mode) (setq proof-mode-for-goals 'isar-goals-mode) (setq proof-mode-for-response 'isar-response-mode) - (setq proof-shell-trace-output-regexp "\375")) + (setq proof-shell-trace-output-regexp "\375") + (setq proof-shell-interactive-input-regexp "\375\\*\\*")) ;; |