dkochmanski

Command name completer in the Interactor

Links

• 24.5 Completion
• 27.1 Commands
• 27.6 The Command Processor

Glossary

dkochmanski

diff --git a/src/logger.lisp b/src/logger.lisp
index ad781af..ae19912 100644
--- a/src/logger.lisp
+++ b/src/logger.lisp
@@ -520,7 +520,7 @@ context of the current application."
                        (is-enabled-for ,logger-symbol ,level))
                  (flet ((,log-stmt (,stream)
                           (declare (type stream ,stream))
-                          (format ,stream ,@args)))

dkochmanski

(in-package #:climi)

(defclass standard-port (clim:basic-port)
  ((mirrored-sheet->current-pointer-cursor :initform (make-hash-table :test #'eq))
   (selections :initform (make-hash-table) :reader standard-port-selections)))

(defmethod port-lookup-current-pointer-cursor ((port standard-port) sheet)
  (gethash sheet (slot-value port 'mirrored-sheet->current-pointer-cursor)))

(defmethod climb:set-sheet-pointer-cursor :before ((port standard-port) sheet cursor)