major-mode))
'riece-dialogue-mode)
(riece-shrink-buffer (car buffers)))
- (deql (car buffers) riece-buffer-list))
+ (delq (car buffers) riece-buffer-list))
(setq buffers (cdr buffers))))))))
(switch-to-buffer riece-command-buffer)
(riece-display-connect-signals)
(let* ((inhibit-read-only t)
buffer-read-only
(start (point))
- (end (progn (beginning-of-line 2) (point)))
+ (end (progn (beginning-of-line
+ (1+ riece-shrink-buffer-remove-lines))
+ (point)))
(overlays (riece-overlays-in start end)))
(while overlays
(riece-delete-overlay (car overlays))