Commit 16697bfa authored by Troels Henriksen's avatar Troels Henriksen
Browse files

Updates to handle Drei changes.

parent 4f906351
......@@ -362,6 +362,9 @@ active."
(setf (views frame) (list (make-new-view-for-climacs
frame 'textual-drei-syntax-view))))
(defmethod command-for-unbound-gestures ((frame climacs) gestures)
(command-for-unbound-gestures (esa-current-window frame) gestures))
(defun make-view-subscript-generator (climacs)
#'(lambda (name)
(1+ (reduce #'max (remove name (views climacs)
......@@ -521,7 +524,7 @@ etc."))
(defmethod handle-drei-condition ((drei climacs-pane) condition)
(call-next-method)
(display-drei drei))
(display-drei drei :redisplay-minibuffer t))
(defmethod execute-frame-command :around ((frame climacs) command)
(if (eq frame *esa-instance*)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment