mirror of
https://codeberg.org/cage/tinmop/
synced 2025-02-10 07:20:35 +01:00
- [GUI] bound 'backspace' key to command to get backward in the browsing history.
This commit is contained in:
parent
7db93c5ea3
commit
2612289b1e
@ -1925,16 +1925,10 @@ local file paths."
|
||||
(scale-gemtext main-window -0.1))))
|
||||
:exclusive t)
|
||||
(gui:bind target
|
||||
#$<Control-4>$
|
||||
#$<BackSpace>$
|
||||
(lambda (e)
|
||||
(declare (ignore e))
|
||||
(scale-gemtext main-window 0.1))
|
||||
:exclusive t)
|
||||
(gui:bind target
|
||||
#$<Control-5>$
|
||||
(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)
|
||||
|
Loading…
x
Reference in New Issue
Block a user