issues.org

Epkgs: Issues

(require 'emir)

(epkg-add-org-header rows header)

up

Features provided by multiple packages

(let (alist)
  (dolist (name (epkgs 'name))
    (dolist (feature (epkg-sql [:select feature :from provided
                                :where (and (= package $s1)
                                            (isnull drop))]
                               name))
      (setq feature (car feature))
      (if-let ((elt (assq feature alist)))
          (push name (cdr elt))
        (cl-pushnew (list feature name) alist))))
  (mapcar (pcase-lambda (`(,feature ,package))
            (list feature package
                  (epkg-shelved-package-p (epkg package))))
          (mapcan (pcase-lambda (`(,feature . ,providers))
                    (and (> (length providers) 1)
                         (list (list feature providers))
                         (mapcar (lambda (elt) (list feature elt))
                                 (sort providers #'string<))))
                  (cl-sort alist #'string< :key #'car))))

Feature (4)	Package	Shelved
derl	derl
derl	distel
oauth2-auto	oauth2-auto
oauth2-auto	org-gcal
plz-event-source	llm
plz-event-source	plz-event-source
plz-media-type	llm
plz-media-type	plz-media-type

• 2023-10-09 derl melpa/melpa#8769
• 2024-05-18 llm “It is temporarily vendored within the llm library.” (from library header)
• 2024-07-01 org-gcal kidd/org-gcal.el#250

Packages with unsatisfied dependencies

(mapcan
 (pcase-lambda (`(,name ,class))
   (let (alist)
     (pcase-dolist (`(,feature)
                    (epkg-sql [:select feature :from required
                               :where (and (= package $s1)
                                           (isnull drop))]
                              name))
       (if-let ((provider (epkg-provided-by feature)))
           (when (epkg-sql [:select class :from packages
                            :where (and (= name $s1)
                                        (= class 'shelved))]
                           provider)
             (push (list feature provider) alist))
         (push (list feature nil) alist)))
     (mapcar (pcase-lambda (`(,feature ,provider))
               (list name class feature provider))
             (cl-sort alist #'string< :key #'car))))
 (epkgs [name class] [mirrored*]))

Package (8)	Class	Feature	Provider
eev	github	lean4-mode
evil-textobj-tree-sitter	github	tree-sitter	tree-sitter
flex-compile	github	slite
gleam-ts-mode	github	tree-sitter	tree-sitter
gleam-ts-mode	github	tree-sitter-indent	tree-sitter-indent
org-node	github	org-super-links
scopeline	github	tree-sitter	tree-sitter
sdml-mode	github	tree-sitter	tree-sitter
sdml-mode	github	tree-sitter-hl	tree-sitter
sdml-mode	github	tree-sitter-indent	tree-sitter-indent
symex	github	tree-sitter	tree-sitter
symex	github	tsc	tree-sitter

• 2023-06-25 flex-compile https://github.com/plandes/flex-compile/commit/c6f7b97e96b4f2608954f8f599d255578c73d600
• 2024-06-10 tree-sitter https://github.com/emacsmirror/epkgs/commit/d7bc99e41d8cf8ef32c21a983ab61edd4c4167e6

Missing library summary

(epkg--sql-keep
 (list name class
       (and (epkg-get-recipe 'melpa name) "✓"))
 [:select [name class]
  :from packages
  ;;:where (isnull commentary)
  :where (and (isnull summary)
              (not (= class 'builtin))
              (not (= class 'shelved)))
  :order-by [(asc name)]])

Failing updates