diff --git a/src/gui/client/main-window.lisp b/src/gui/client/main-window.lisp index cb4c130..4ab8942 100644 --- a/src/gui/client/main-window.lisp +++ b/src/gui/client/main-window.lisp @@ -1925,16 +1925,10 @@ local file paths." (scale-gemtext main-window -0.1)))) :exclusive t) (gui:bind target - #$$ + #$$ (lambda (e) (declare (ignore e)) - (scale-gemtext main-window 0.1)) - :exclusive t) - (gui:bind target - #$$ - (lambda (e) - (declare (ignore e)) - (scale-gemtext main-window -0.1)) + (funcall (back-iri-clsr main-window))) :exclusive t)) (defun init-main-window (starting-iri)