diff options
| author | David Aspinall | 2009-11-30 23:19:15 +0000 |
|---|---|---|
| committer | David Aspinall | 2009-11-30 23:19:15 +0000 |
| commit | 2fafa16d69106aac0338b96e2a8db894d93764e9 (patch) | |
| tree | e4c03a22565e45c3e9a7e1d3daa9a5670571e548 /generic/proof-shell.el | |
| parent | bfba9bfb0c7af789f62b77b7814b730e6d628661 (diff) | |
Replace proof-locked-end -> proof-unprocessed-begin
Diffstat (limited to 'generic/proof-shell.el')
| -rw-r--r-- | generic/proof-shell.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/proof-shell.el b/generic/proof-shell.el index 3004c811..71099176 100644 --- a/generic/proof-shell.el +++ b/generic/proof-shell.el @@ -1045,10 +1045,10 @@ and indentation. Assumes proof-script-buffer is active." ;; a unit, i.e. sent to the proof assistant together. ;; FIXME da: this seems very similar to proof-insert-pbp-command ;; in proof-script.el. Should be unified, I suspect. - (setq span (span-make (proof-locked-end) (point))) + (setq span (span-make (proof-unprocessed-begin) (point))) (span-set-property span 'type 'pbp) (span-set-property span 'cmd cmd) - (proof-set-queue-endpoints (proof-locked-end) (point)) + (proof-set-queue-endpoints (proof-unprocessed-begin) (point)) (setq proof-action-list (cons (car proof-action-list) (cons (list span cmd 'proof-done-advancing) |