nyxt: Fix dev data profile.

master
Pierre Neidhardt 2021-03-15 16:54:37 +01:00
parent 7b761f9f6a
commit 29a7557915
1 changed files with 4 additions and 3 deletions

View File

@ -284,10 +284,11 @@ format."
(load-after-system :slynk (nyxt-init-file "slynk.lisp"))
(defvar +dev-data-profile+ (make-instance 'data-profile :name "dev")
"Development profile.")
(define-class dev-data-profile (data-profile)
((name :initform "dev"))
(:documentation "Development profile."))
(defmethod nyxt:expand-data-path ((profile (eql +dev-data-profile+)) (path data-path))
(defmethod nyxt:expand-data-path ((profile dev-data-profile) (path data-path))
"Persist data to /tmp/nyxt/."
(expand-default-path (make-instance (class-name (class-of path))
:basename (basename path)