     (t
      (vendle:register-register source option))))
 
+(defmethod vendle:message-register ((package vendle:package))
+  (vendle:message (concat (vendle:package-name package) "\n%s")
+                  (string-join
+                   (seq-map
+                    (lambda (s)
+                      (format "%s: %s"
+                              (symbol-name s)
+                              (slot-value package s)))
+                    (object-slots package))
+                   "\n")))
+
 (cl-defun vendle:register-register (source &optional option)
   (cl-letf* ((package (vendle:make-package source option)))
     (vendle:resolve-deps package)

      (vendle:add-to-load-path package)
      (vendle:add-to-package-list package)
      (vendle:option-info package)
      (vendle:message "registered %s"  (vendle:package-name package)))))

(cl-defun vendle:register-local (source &optional option)
  (cl-letf* ((path (expand-file-name source))

    (vendle:add-to-package-list package)
    (vendle:option-info package)
    (vendle:message "registered %s locally"
                    (vendle:package-name package))
    (vendle:message-register package)
    ))

(cl-defun vendle:register-theme (source &optional option)
  (cl-letf* ((mod-option (vendle:register-theme-default-tag option))
