anchor.diff:  (defmethod generate-macro-form ((macro-editor macro-edit-mode))
     (let ((name (intern (name macro-editor)))
           (commands (mapcar
  -                   (lambda (command) (write `(,(name command)) :stream nil))
  +                   (lambda (command) `(,(name command)))
                      (alexandria:hash-table-values (functions macro-editor)))))
       `(define-command-global ,name () "User generated macro form" ,@commands)))
   
  
positive.code:   (render-functions macro-editor))
  
  (defmethod name ((macro-editor macro-edit-mode))
    (let ((name
            (ffi-buffer-evaluate-javascript
             (buffer macro-editor)
             (ps:ps
               (ps:chain document (get-element-by-id "macro-name") value)))))
      (cond ((not (str:emptyp name)) (setf (slot-value macro-editor 'name) name))
            ((slot-value macro-editor 'name) (slot-value macro-editor 'name))
            (t nil))))
  
negative.code: ;;;; SPDX-License-Identifier: BSD-3-Clause
  
  (uiop:define-package :nyxt/macro-edit-mode
    (:use :common-lisp :trivia :nyxt)
    (:documentation "Mode for editing macros."))
  (in-package :nyxt/macro-edit-mode)
  
  