diff options
author | Miguel Ángel Moreno <mail@migalmoreno.com> | 2023-02-20 14:38:09 +0100 |
---|---|---|
committer | Miguel Ángel Moreno <mail@migalmoreno.com> | 2023-02-20 14:38:09 +0100 |
commit | b7530a22f497346a64f1ea9a407579470606da85 (patch) | |
tree | 90e2656352079a2fa935e5cbc3a62c0635fae7cc | |
parent | 8d5689f6e3cd0d3e02bfe68198bcd1e92ae7d0ee (diff) |
fix: Include mode enabling hook after buffer has been loaded
-rw-r--r-- | tailor.lisp | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tailor.lisp b/tailor.lisp index ca38430..30b9564 100644 --- a/tailor.lisp +++ b/tailor.lisp @@ -151,12 +151,12 @@ Optionally, retrieve the original style of OBJ via STYLE-SLOT." (flet ((style-mode (mode) (setf (slot-value mode 'nyxt:style) (compute-current-style style mode)))) - (hooks:once-on (nyxt:buffer-loaded-hook (buffer nyxt-mode)) (_) - (style-mode nyxt-mode)) - (hooks:add-hook (nyxt:enable-mode-hook (buffer nyxt-mode)) - (make-instance 'hooks:handler - :fn #'style-mode - :name 'style-mode)))) + (hooks:once-on (nyxt:buffer-loaded-hook (buffer nyxt-mode)) (buffer) + (style-mode nyxt-mode) + (hooks:add-hook (nyxt:enable-mode-hook buffer) + (make-instance 'hooks:handler + :fn #'style-mode + :name 'style-mode))))) (define-mode tailor-mode () "Manage and apply user-defined browser themes on predefined criteria." |