      #'helm-vendle-action-update-1
      pkgs)))
 
-(cl-defmethod helm-vendle-action-update-1 ((package vendle:package))
+(cl-defmethod helm-vendle-action-update-1 ((package vendle:<package>))
   (vendle:update-package package))
 
 (cl-defun helm-vendle-action-reinstall (_candidate)

   #'helm-vendle-transformer-format-1
   candidates))

(cl-defmethod helm-vendle-transformer-format-1 ((package vendle:package))
  (cl-letf ((tag (helm-vendle-propertize-tag package 'font-lock-doc-face)))
    (cons (format
           "%s%s\t%s"

                       'font-lock-variable-name-face))
          package)))

(cl-defmethod helm-vendle-propertize-tag ((package vendle:<package>) face)
  (cl-letf ((tag (vendle:package-tag package)))
    (if tag
        (if (stringp tag)
