diff options
author | Miguel Ángel Moreno <mail@migalmoreno.com> | 2023-02-17 12:35:20 +0100 |
---|---|---|
committer | Miguel Ángel Moreno <mail@migalmoreno.com> | 2023-02-17 12:35:20 +0100 |
commit | 0a16bb253b2572e2697c67b69500bdace143259d (patch) | |
tree | 39e00accf177e612b44a24f456595cbe88d4ae81 | |
parent | 8d02507dbd3824497d7c7b87ff9d5010ade7b8fa (diff) |
fix: Import new symbol and remove namespaced calls
-rw-r--r-- | package.lisp | 3 | ||||
-rw-r--r-- | tailor.lisp | 6 |
2 files changed, 5 insertions, 4 deletions
diff --git a/package.lisp b/package.lisp index 0df1425..499359c 100644 --- a/package.lisp +++ b/package.lisp @@ -12,5 +12,6 @@ #:current-buffer #:current-window #:find-submode - #:url) + #:url + #:buffer) (:documentation "An interface to manage themes in Nyxt.")) diff --git a/tailor.lisp b/tailor.lisp index 75bbb0b..ca38430 100644 --- a/tailor.lisp +++ b/tailor.lisp @@ -282,16 +282,16 @@ If DARK, find the first dark `user-theme'." (some (lambda (slot) (eq 'nyxt:style slot)) (mopu:slot-names (class-of mode)))) - (nyxt:modes (nyxt:buffer mode))))) - + (nyxt:modes (buffer mode))))) (setf *current-theme* theme) (setf (theme *browser*) theme) (load-style (find-style 'nyxt:window) (current-window)) - (load-style (find-style 'nyxt:web-buffer) (nyxt:buffer mode)) + (load-style (find-style 'nyxt:web-buffer) (buffer mode)) (load-style (find-style 'nyxt:status-buffer) (nyxt:status-buffer (current-window))) (load-style (find-style 'nyxt:prompt-buffer) prompt-buffer) (loop for mode-style in modes-with-style do (load-style (find-style (class-name (class-of mode-style))) mode-style)) + (nyxt::echo (format nil "Loaded theme ~a" (id theme))) theme))) (defmethod load-automatic-theme ((mode tailor-mode)) |