Replace last manual REPLACEME- definitions with define-REPLACEME-class.

source/buffer.lisp

@@ -191,7 +191,7 @@ Must be one of `:always' (accept all cookies), `:never' (reject all cookies),
 
 (define-REPLACEME-class buffer)
 
-(defclass internal-buffer ()
+(defclass internal-buffer (REPLACEME-buffer)
   ((default-modes :accessor default-modes
                   :initarg :default-modes
                   :type list-of-symbols
@@ -229,11 +229,9 @@ The mode instances are stored in the `modes' slot.")
              (|.button:active|
               :color "white"))))))
 
-(defclass REPLACEME-internal-buffer (internal-buffer REPLACEME-buffer)
-  ()
-  (:export-class-name-p t))
+(define-REPLACEME-class internal-buffer)
 
-(defclass status-buffer ()
+(defclass status-buffer (REPLACEME-internal-buffer)
   ((height :accessor height :initform 16
            :type integer
            :documentation "The height of the status buffer in pixels.")
@@ -261,9 +259,7 @@ The mode instances are stored in the `modes' slot.")
              (|.button:hover|
               :color "white"))))))
 
-(define-class REPLACEME-status-buffer (status-buffer REPLACEME-internal-buffer)
-  ()
-  (:export-class-name-p t))
+(define-REPLACEME-class status-buffer)
 
 (defmethod internal-buffer-p ((buffer buffer))
   nil)

source/minibuffer.lisp

@@ -3,7 +3,7 @@
 
 (in-package :nyxt)
 
-(define-class minibuffer ()
+(define-class minibuffer (REPLACEME-buffer)
   ((default-modes '(minibuffer-mode))
    (suggestion-function nil
                         :type (or function null)
@@ -128,9 +128,7 @@ A minibuffer query is typically done as follows:
   ;; Write form here in which `tags' is bound to the resulting element(s).
   )"))
 
-(define-class REPLACEME-minibuffer (minibuffer REPLACEME-buffer)
-  ()
-  (:export-class-name-p t))
+(define-REPLACEME-class minibuffer)
 
 (export-always 'make-minibuffer)
 (defun make-minibuffer