summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndre A. Gomes <andremegafone@gmail.com>2024-09-19 10:20:08 +0300
committerAndre A. Gomes <andremegafone@gmail.com>2024-09-19 10:20:08 +0300
commita6ae2454c9dc70a8e11fd64799399b27b310d401 (patch)
treea1ddb184f8baf4f6a121512ef063137bd9a33c77
parentd027b315bb2c7c91e694f5181c3777c4fa9e564c (diff)
renderer/gtk: Fix bug.
Introduced in cddbb4bb4b8b041a7a84c7a579e446bb317dd1cd.
-rw-r--r--source/renderer/gtk.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/source/renderer/gtk.lisp b/source/renderer/gtk.lisp
index b21f24ab7..bd28699e3 100644
--- a/source/renderer/gtk.lisp
+++ b/source/renderer/gtk.lisp
@@ -127,7 +127,8 @@ requests are denied."))
(defmethod input-modifier-translator ((buffer gtk-buffer) input-event-modifier-state)
"Return a list of modifier keys understood by `keymaps:make-key'."
(when-let ((state input-event-modifier-state))
- (mapcar (lambda (modifier) (getf (modifier-plist buffer) modifier)) state)))
+ (delete nil
+ (mapcar (lambda (modifier) (getf (modifier-plist buffer) modifier)) state))))
(defclass webkit-website-data-manager (webkit:webkit-website-data-manager) ()
(:metaclass gobject:gobject-class))