[nongnu] elpa/popup 545e258024: ci: Exclude macos tests below 27.x

2024-05-07 Thread ELPA Syncer
branch: elpa/popup
commit 545e258024f6e4a8b2a066a5442d9e0147a7ee03
Author: Jen-Chieh Shen 
Commit: GitHub 

ci: Exclude macos tests below 27.x
---
 .github/workflows/test.yml | 5 +
 1 file changed, 5 insertions(+)

diff --git a/.github/workflows/test.yml b/.github/workflows/test.yml
index c533da9f31..cffa08b417 100644
--- a/.github/workflows/test.yml
+++ b/.github/workflows/test.yml
@@ -35,6 +35,11 @@ jobs:
 - os: windows-latest
   emacs-version: snapshot
   experimental: true
+exclude:
+  - os: macos-latest
+emacs-version: 26.3
+  - os: macos-latest
+emacs-version: 27.2
 
 steps:
 - uses: actions/checkout@v4



[elpa] externals/pyim updated (cdad180403 -> f22c20f2e6)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch externals/pyim.

  from  cdad180403 Add "让 pyim 在 Termux Emacs 中正常工作" to README,  #484
   new  f6f085ccf4 Fix: pyim输入法无法在eww打开的网站(比如百度)的输入框中输入中文 #479
   new  f22c20f2e6 v5.3.4


Summary of changes:
 pyim.el | 12 
 1 file changed, 8 insertions(+), 4 deletions(-)



[elpa] externals/pyim f6f085ccf4 1/2: Fix: pyim输入法无法在eww打开的网站(比如百度)的输入框中输入中文 #479

2024-05-07 Thread ELPA Syncer
branch: externals/pyim
commit f6f085ccf4b717fc5ff5468e42d2bf0b4756e9c9
Author: Feng Shu 
Commit: Feng Shu 

Fix: pyim输入法无法在eww打开的网站(比如百度)的输入框中输入中文 #479
---
 pyim.el | 10 +++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/pyim.el b/pyim.el
index a16127b9cb..2dbf5b4669 100644
--- a/pyim.el
+++ b/pyim.el
@@ -127,9 +127,13 @@
 这个函数会处理用户输入的字符,并最终的得到需要插入 buffer 的字符
 串。这个字符串会被分解为 event list, 通过 emacs 低层函数
 `read-event' 来将这些 list 插入到 *待输入buffer*。"
-  (if (or buffer-read-only
-  overriding-terminal-local-map
-  overriding-local-map)
+  (if (or
+   ;; NOTE: 在 widget 输入框存在的情况下,即使 buffer 是只读的,widget 输入
+   ;; 框也有可能要输入文本,EWW 就存在类似情况。
+   ;;
+   ;; buffer-read-only
+   overriding-terminal-local-map
+   overriding-local-map)
   (list key)
 ;; (message "call with key: %S" key-or-string)
 (with-silent-modifications



[elpa] externals/pyim f22c20f2e6 2/2: v5.3.4

2024-05-07 Thread ELPA Syncer
branch: externals/pyim
commit f22c20f2e6af55b3a758defabe4c842fb94cde2b
Author: Feng Shu 
Commit: Feng Shu 

v5.3.4
---
 pyim.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pyim.el b/pyim.el
index 2dbf5b4669..a3699b8546 100644
--- a/pyim.el
+++ b/pyim.el
@@ -7,7 +7,7 @@
 ;; Feng Shu 
 ;; Maintainer: Feng Shu 
 ;; URL: https://github.com/tumashu/pyim
-;; Version: 5.3.3
+;; Version: 5.3.4
 ;; Keywords: convenience, Chinese, pinyin, input-method
 ;; Package-Requires: ((emacs "27.1") (async "1.6") (xr "1.13"))
 



[elpa] externals/denote b6a93b75d6 1/3: Add denote--rename-file and denote--rename-get-file-info-from-prompts-or-existing and simplify renaming commands

2024-05-07 Thread ELPA Syncer
branch: externals/denote
commit b6a93b75d64e48a392fba9fbcad891dbaf62a6a6
Author: Jean-Philippe Gagné Guay 
Commit: Jean-Philippe Gagné Guay 

Add denote--rename-file and 
denote--rename-get-file-info-from-prompts-or-existing and simplify renaming 
commands
---
 denote.el | 502 +-
 1 file changed, 170 insertions(+), 332 deletions(-)

diff --git a/denote.el b/denote.el
index 89e5970cbf..b3c43674d0 100644
--- a/denote.el
+++ b/denote.el
@@ -2715,16 +2715,98 @@ If `denote-rename-confirmations' does not contain
 (defvar denote-rename-max-mini-window-height 0.33
   "How much to enlarge `max-mini-window-height' for renaming operations.")
 
+(defun denote--rename-file (file title keywords signature date file-type 
directory)
+  "Rename FILE according to the other parameters.
+Parameters TITLE, KEYWORDS, SIGNATURE, DATE, FILE-TYPE and
+DIRECTORY are as described in `denote-rename-file' and are
+assumed to be valid (TITLE and SIGNATURE are strings, KEYWORDS is
+a list, etc.).
+
+This function only does the work necessary to rename a file
+according to its parameters.  In particular, it does not prompt
+for anything.  It is meant to be combined with
+`denote--rename-get-file-info-from-prompts-or-existing' to create
+a renaming command.
+
+Respect `denote-rename-confirmations' and `denote-save-buffers'."
+  (let* ((current-file-type (denote-filetype-heuristics file))
+ (keywords (denote-keywords-sort keywords))
+ (extension (denote--file-extension file-type))
+ ;; TODO: For now, we cannot change the identifier. We retrieve
+ ;; the current one or generate a new one with DATE, if non-nil.
+ (id (or (denote-retrieve-filename-identifier file)
+ (denote-create-unique-file-identifier file date)))
+ (new-name (denote-format-file-name directory id keywords title 
extension signature))
+ (max-mini-window-height denote-rename-max-mini-window-height))
+(when (denote-rename-file-prompt file new-name)
+  ;; Modify file name, buffer name, or both
+  (denote-rename-file-and-buffer file new-name)
+  ;; Handle front matter if new-name is of a supported type (rewrite or 
add front matter)
+  (when (and (denote-file-has-supported-extension-p file)
+ (denote-file-is-writable-and-supported-p new-name))
+(if (and (denote--edit-front-matter-p new-name file-type)
+ (eq current-file-type file-type))
+(denote-rewrite-front-matter new-name title keywords file-type)
+  (when (denote-add-front-matter-prompt new-name)
+(denote--add-front-matter new-name title keywords id file-type
+  ;; TODO: Offer to regenerate link descriptions in other files on
+  ;; rename. Maybe this should be a distinct command.
+  (when denote--used-ids
+(puthash id t denote--used-ids))
+  (when denote-save-buffers
+(with-current-buffer (find-file-noselect new-name)
+  (save-buffer)))
+  (run-hooks 'denote-after-rename-file-hook))
+new-name))
+
+(defun denote--rename-get-file-info-from-prompts-or-existing (file)
+  "Retrieve existing info from FILE and prompt according to `denote-prompts'.
+
+It is meant to be combined with `denote--rename-file' to create
+renaming commands."
+  (let* ((file-in-prompt (propertize (file-relative-name file) 'face 
'denote-faces-prompt-current-name))
+ (file-type (denote-filetype-heuristics file))
+ (date (denote-retrieve-filename-identifier file))
+ (directory (file-name-directory file))
+ (title (denote-retrieve-title-or-filename file file-type))
+ (keywords (denote-extract-keywords-from-path file))
+ (signature (or (denote-retrieve-filename-signature file) "")))
+ (dolist (prompt denote-prompts)
+   (pcase prompt
+ ('title
+  (setq title (denote-title-prompt
+   title
+   (format "Rename `%s' with TITLE (empty to remove)" 
file-in-prompt
+ ('keywords
+  (setq keywords (denote-keywords-prompt
+  (format "Rename `%s' with KEYWORDS (empty to 
remove)" file-in-prompt)
+  (string-join keywords ","
+ ('signature
+  (setq signature (denote-signature-prompt
+   signature
+   (format "Rename `%s' with SIGNATURE (empty to 
remove)" file-in-prompt
+ ('file-type
+  (setq file-type (denote--valid-file-type (denote-file-type-prompt
+ ('subdirectory
+  (setq directory (file-name-as-directory 
(denote-subdirectory-prompt
+ ('date
+  ;; TODO: We currently prompt only if the current file has no
+  ;; identifier. Eventually, we may want to allow modifying the
+  ;; date/id. Then, it will be better to prompt according to
+  ;; `denote-prompts`, like other 

[elpa] externals/denote updated (c79da89b23 -> 781ba35280)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch externals/denote.

  from  c79da89b23 Clarify that denote-org-extras.el is part of Denote and 
autoloadable
   new  b6a93b75d6 Add denote--rename-file and 
denote--rename-get-file-info-from-prompts-or-existing and simplify renaming 
commands
   new  927fa43615 Merge pull request #333 from 
jeanphilippegg/renaming-commands
   new  781ba35280 Tweak doc string of denote-rename-file


Summary of changes:
 denote.el | 501 +-
 1 file changed, 169 insertions(+), 332 deletions(-)



[elpa] externals/denote 927fa43615 2/3: Merge pull request #333 from jeanphilippegg/renaming-commands

2024-05-07 Thread ELPA Syncer
branch: externals/denote
commit 927fa43615bec64bb8c2d939d85373f978d29151
Merge: c79da89b23 b6a93b75d6
Author: Protesilaos Stavrou 
Commit: GitHub 

Merge pull request #333 from jeanphilippegg/renaming-commands

Streamline the renaming commands
---
 denote.el | 502 +-
 1 file changed, 170 insertions(+), 332 deletions(-)

diff --git a/denote.el b/denote.el
index a500437821..85f50ca0f3 100644
--- a/denote.el
+++ b/denote.el
@@ -2723,16 +2723,98 @@ If `denote-rename-confirmations' does not contain
 (defvar denote-rename-max-mini-window-height 0.33
   "How much to enlarge `max-mini-window-height' for renaming operations.")
 
+(defun denote--rename-file (file title keywords signature date file-type 
directory)
+  "Rename FILE according to the other parameters.
+Parameters TITLE, KEYWORDS, SIGNATURE, DATE, FILE-TYPE and
+DIRECTORY are as described in `denote-rename-file' and are
+assumed to be valid (TITLE and SIGNATURE are strings, KEYWORDS is
+a list, etc.).
+
+This function only does the work necessary to rename a file
+according to its parameters.  In particular, it does not prompt
+for anything.  It is meant to be combined with
+`denote--rename-get-file-info-from-prompts-or-existing' to create
+a renaming command.
+
+Respect `denote-rename-confirmations' and `denote-save-buffers'."
+  (let* ((current-file-type (denote-filetype-heuristics file))
+ (keywords (denote-keywords-sort keywords))
+ (extension (denote--file-extension file-type))
+ ;; TODO: For now, we cannot change the identifier. We retrieve
+ ;; the current one or generate a new one with DATE, if non-nil.
+ (id (or (denote-retrieve-filename-identifier file)
+ (denote-create-unique-file-identifier file date)))
+ (new-name (denote-format-file-name directory id keywords title 
extension signature))
+ (max-mini-window-height denote-rename-max-mini-window-height))
+(when (denote-rename-file-prompt file new-name)
+  ;; Modify file name, buffer name, or both
+  (denote-rename-file-and-buffer file new-name)
+  ;; Handle front matter if new-name is of a supported type (rewrite or 
add front matter)
+  (when (and (denote-file-has-supported-extension-p file)
+ (denote-file-is-writable-and-supported-p new-name))
+(if (and (denote--edit-front-matter-p new-name file-type)
+ (eq current-file-type file-type))
+(denote-rewrite-front-matter new-name title keywords file-type)
+  (when (denote-add-front-matter-prompt new-name)
+(denote--add-front-matter new-name title keywords id file-type
+  ;; TODO: Offer to regenerate link descriptions in other files on
+  ;; rename. Maybe this should be a distinct command.
+  (when denote--used-ids
+(puthash id t denote--used-ids))
+  (when denote-save-buffers
+(with-current-buffer (find-file-noselect new-name)
+  (save-buffer)))
+  (run-hooks 'denote-after-rename-file-hook))
+new-name))
+
+(defun denote--rename-get-file-info-from-prompts-or-existing (file)
+  "Retrieve existing info from FILE and prompt according to `denote-prompts'.
+
+It is meant to be combined with `denote--rename-file' to create
+renaming commands."
+  (let* ((file-in-prompt (propertize (file-relative-name file) 'face 
'denote-faces-prompt-current-name))
+ (file-type (denote-filetype-heuristics file))
+ (date (denote-retrieve-filename-identifier file))
+ (directory (file-name-directory file))
+ (title (denote-retrieve-title-or-filename file file-type))
+ (keywords (denote-extract-keywords-from-path file))
+ (signature (or (denote-retrieve-filename-signature file) "")))
+ (dolist (prompt denote-prompts)
+   (pcase prompt
+ ('title
+  (setq title (denote-title-prompt
+   title
+   (format "Rename `%s' with TITLE (empty to remove)" 
file-in-prompt
+ ('keywords
+  (setq keywords (denote-keywords-prompt
+  (format "Rename `%s' with KEYWORDS (empty to 
remove)" file-in-prompt)
+  (string-join keywords ","
+ ('signature
+  (setq signature (denote-signature-prompt
+   signature
+   (format "Rename `%s' with SIGNATURE (empty to 
remove)" file-in-prompt
+ ('file-type
+  (setq file-type (denote--valid-file-type (denote-file-type-prompt
+ ('subdirectory
+  (setq directory (file-name-as-directory 
(denote-subdirectory-prompt
+ ('date
+  ;; TODO: We currently prompt only if the current file has no
+  ;; identifier. Eventually, we may want to allow modifying the
+  ;; date/id. Then, it will be better to prompt according to
+  ;; `denote-prompts`, like other 

[elpa] externals/denote 781ba35280 3/3: Tweak doc string of denote-rename-file

2024-05-07 Thread ELPA Syncer
branch: externals/denote
commit 781ba3528016d0665fdd6838107356d416af44de
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Tweak doc string of denote-rename-file
---
 denote.el | 9 -
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/denote.el b/denote.el
index 85f50ca0f3..79e0500a9c 100644
--- a/denote.el
+++ b/denote.el
@@ -2857,11 +2857,10 @@ the file name into a comma-separated string and prefill 
the
 minibuffer with it (the KEYWORDS prompt accepts more than one
 keywords, each separated by a comma, else the `crm-separator').
 
-If FILE-TYPE is non-nil and different from the current file type,
-change the extension of the file.  Important note: No attempt is
-made to modify the content of the file and we only add a new
-front matter at the beginning of the file (rather than modify an
-existing one).
+If FILE-TYPE is non-nil and different from the current file type, change
+the extension of the file.  (Important note: No attempt is made to
+modify the content of the file and we only add a new front matter at the
+beginning of the file (rather than modify an existing one).
 
 If DIRECTORY is non-nil, move the new file in this directory.
 



[elpa] elpa-admin 68bbdcd562: Tweak the way `index.html` is updated

2024-05-07 Thread Stefan Monnier via
branch: elpa-admin
commit 68bbdcd562d8311a13239fe18095a4f644b42ec2
Author: Stefan Monnier 
Commit: Stefan Monnier 

Tweak the way `index.html` is updated

* elpa-admin.el (elpaa--update-archive-contents): Don't bother updating
the `index.html`.  Let `elpaa-batch-html-make-index` take care of it.
(elpaa--make-aggregated-atom-feed): Adjust call to
`libxml-parse-xml-region` for older Emacsen.
---
 elpa-admin.el | 7 +++
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/elpa-admin.el b/elpa-admin.el
index 7b6f9b82d4..ef17fca8ea 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -178,9 +178,7 @@ Delete backup files also."
  (lambda (x y)
(string-lessp (symbol-name (car x)) (symbol-name 
(car y))
 (elpaa--message "new AC: %S" ac)
-(elpaa--write-archive-contents ac dir)
-(let ((default-directory (expand-file-name dir)))
-  (elpaa--html-make-index (cdr ac)
+(elpaa--write-archive-contents ac dir)))
 
 (defun elpaa--get-specs ()
   (elpaa--form-from-file-contents elpaa--specs-file))
@@ -3263,7 +3261,8 @@ the article."
   (dolist (file files)
 (erase-buffer)
 (insert-file-contents file)
-(let* ((xml (with-demoted-errors "%S" (libxml-parse-xml-region)))
+(let* ((xml (with-demoted-errors "%S" (libxml-parse-xml-region
+   (point-min) (point-max
(lastentry (assq 'entry (nreverse xml
   (when lastentry
 (push lastentry entries



[nongnu] elpa/package-lint 404076375a 1/3: Add org-babel-expand-body:

2024-05-07 Thread ELPA Syncer
branch: elpa/package-lint
commit 404076375aac2f77fdd9a5102a680a30ebf44ce3
Author: TANIGUCHI Masaya 
Commit: GitHub 

Add org-babel-expand-body:
---
 package-lint.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/package-lint.el b/package-lint.el
index 5a9b717ea1..a0cf86c3bd 100644
--- a/package-lint.el
+++ b/package-lint.el
@@ -193,6 +193,7 @@ TYPE is `function' or `variable'."
(or
 "org-dblock-write:"
 "org-babel-execute:"
+"org-babel-expand-body:"
 "org-babel-prep-session:"
 "org-babel-variable-assignments:"
 "org-babel-default-header-args:"



[nongnu] elpa/package-lint 7aeb9ff19b 2/3: Don't check package signatures at install time

2024-05-07 Thread ELPA Syncer
branch: elpa/package-lint
commit 7aeb9ff19b92fc9e9d7732d50368ee1f37b87782
Author: Steve Purcell 
Commit: Steve Purcell 

Don't check package signatures at install time
---
 run-tests.sh | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/run-tests.sh b/run-tests.sh
index 5ef1ccb05d..462714ec25 100755
--- a/run-tests.sh
+++ b/run-tests.sh
@@ -7,9 +7,9 @@ NEEDED_PACKAGES="cl-lib let-alist compat"
 INIT_PACKAGE_EL="(progn \
   (require 'package) \
   (push '(\"melpa\" . \"https://melpa.org/packages/\;) package-archives) \
+  (setq package-check-signature nil) \
   (package-initialize) \
-  (unless package-archive-contents \
- (package-refresh-contents)) \
+  (package-refresh-contents) \
   (dolist (pkg '(${NEEDED_PACKAGES})) \
 (unless (package-installed-p pkg) \
   (package-install pkg"



[nongnu] elpa/package-lint cb8b0ddaa1 3/3: Merge pull request #270 from tani/master

2024-05-07 Thread ELPA Syncer
branch: elpa/package-lint
commit cb8b0ddaa14cafe9e4ab9a81b2ad47319fd54f27
Merge: 7aeb9ff19b 404076375a
Author: Steve Purcell 
Commit: GitHub 

Merge pull request #270 from tani/master

Add org-babel-expand-body:
---
 package-lint.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/package-lint.el b/package-lint.el
index 5a9b717ea1..a0cf86c3bd 100644
--- a/package-lint.el
+++ b/package-lint.el
@@ -193,6 +193,7 @@ TYPE is `function' or `variable'."
(or
 "org-dblock-write:"
 "org-babel-execute:"
+"org-babel-expand-body:"
 "org-babel-prep-session:"
 "org-babel-variable-assignments:"
 "org-babel-default-header-args:"



[nongnu] elpa/magit updated (b6c9286597 -> f7cba11588)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch elpa/magit.

  from  b6c9286597 Use while-let more
  adds  3695493ce8 magit-insert-section--finish: Fix collecting children
  adds  f7cba11588 magit-insert-section--finish: Fix delayed marker creation

No new revisions were added by this update.

Summary of changes:
 lisp/magit-section.el | 14 +++---
 1 file changed, 7 insertions(+), 7 deletions(-)



[nongnu] elpa/package-lint updated (17e4ab20dd -> cb8b0ddaa1)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch elpa/package-lint.

  from  17e4ab20dd Bump version to 0.23
   new  7aeb9ff19b Don't check package signatures at install time
   new  404076375a Add org-babel-expand-body:
   new  cb8b0ddaa1 Merge pull request #270 from tani/master


Summary of changes:
 package-lint.el | 1 +
 run-tests.sh| 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)



[nongnu] elpa/magit-section updated (b6c9286597 -> f7cba11588)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch elpa/magit-section.

  from  b6c9286597 Use while-let more
  adds  3695493ce8 magit-insert-section--finish: Fix collecting children
  adds  f7cba11588 magit-insert-section--finish: Fix delayed marker creation

No new revisions were added by this update.

Summary of changes:
 lisp/magit-section.el | 14 +++---
 1 file changed, 7 insertions(+), 7 deletions(-)



[nongnu] elpa/git-commit 3695493ce8 1/2: magit-insert-section--finish: Fix collecting children

2024-05-07 Thread ELPA Syncer
branch: elpa/git-commit
commit 3695493ce8a8427434af50d1336ea8041434b9f3
Author: Jonas Bernoulli 
Commit: Jonas Bernoulli 

magit-insert-section--finish: Fix collecting children

Children are being pushed to the `children' slot of the object,
not the `children' variable that was added in [1: 4ec4d0272e].

1: 2024-05-04 4ec4d0272e6c50f10ccc96350ed917a3e8d3313a
   magit-insert-section--finish: Optimize propertizing leaf sections
---
 lisp/magit-section.el | 7 +++
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/lisp/magit-section.el b/lisp/magit-section.el
index 065cec21ee..65e43846b8 100644
--- a/lisp/magit-section.el
+++ b/lisp/magit-section.el
@@ -1446,12 +1446,11 @@ anything this time around.
  (point-marker
 (props `( magit-section ,obj
   ,@(and-let* ((map (symbol-value (oref obj keymap
-  (list 'keymap map
-(children (oref obj children)))
+  (list 'keymap map)
 (unless magit-section-inhibit-markers
   (set-marker-insertion-type beg t))
 (cond ((eq obj magit-root-section))
-  (children
+  ((oref obj children)
(magit-insert-child-count obj)
(magit-section-maybe-add-heading-map obj)
(save-excursion
@@ -1479,7 +1478,7 @@ anything this time around.
(nconc (oref parent children)
   (list obj))
 (when magit-section-insert-in-reverse
-  (oset obj children (nreverse children)
+  (oset obj children (nreverse (oref obj children))
 
 (defun magit-cancel-section ( if-empty)
   "Cancel inserting the section that is currently being inserted.



[nongnu] elpa/git-commit f7cba11588 2/2: magit-insert-section--finish: Fix delayed marker creation

2024-05-07 Thread ELPA Syncer
branch: elpa/git-commit
commit f7cba11588c4a35f91922ef28658aa88a59c895b
Author: Jonas Bernoulli 
Commit: Jonas Bernoulli 

magit-insert-section--finish: Fix delayed marker creation

Fix regression added in [1: 153cba365f].  We are mapping over
children; using the bounds of the parent was not intended.

1: 2024-05-04 153cba365fe9678f4257b7277c3e1d60b94c979c
   magit-insert-section--finish: Avoid some oref calls
---
 lisp/magit-section.el | 7 ---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/magit-section.el b/lisp/magit-section.el
index 65e43846b8..5fa14dd275 100644
--- a/lisp/magit-section.el
+++ b/lisp/magit-section.el
@@ -1466,9 +1466,10 @@ anything this time around.
 (cond ((eq obj magit-root-section)
(when (eq magit-section-inhibit-markers 'delay)
  (setq magit-section-inhibit-markers nil)
- (magit-map-sections (lambda (section)
-   (oset section start (copy-marker beg t))
-   (oset section end   (copy-marker end t)
+ (magit-map-sections
+  (lambda (section)
+(oset section start (copy-marker (oref section start) t))
+(oset section end   (copy-marker (oref section end)   t)
(let ((magit-section-cache-visibility nil))
  (magit-section-show obj)))
   (magit-section-insert-in-reverse



[nongnu] elpa/git-commit updated (b6c9286597 -> f7cba11588)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch elpa/git-commit.

  from  b6c9286597 Use while-let more
   new  3695493ce8 magit-insert-section--finish: Fix collecting children
   new  f7cba11588 magit-insert-section--finish: Fix delayed marker creation


Summary of changes:
 lisp/magit-section.el | 14 +++---
 1 file changed, 7 insertions(+), 7 deletions(-)



[nongnu] elpa/cider 3c0fd75c5d 3/4: Remove some obsolete aliases

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit 3c0fd75c5d2cd6ca1218d5b0dd7f2a683e6fe9d5
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Remove some obsolete aliases
---
 cider.el | 4 
 1 file changed, 4 deletions(-)

diff --git a/cider.el b/cider.el
index 46bfadbae9..2d0fcac3bb 100644
--- a/cider.el
+++ b/cider.el
@@ -1249,10 +1249,6 @@ you're working on."
   :safe #'symbolp
   :package-version '(cider . "0.17.0"))
 
-(make-obsolete-variable 'cider-cljs-lein-repl 'cider-default-cljs-repl "0.17")
-(make-obsolete-variable 'cider-cljs-boot-repl 'cider-default-cljs-repl "0.17")
-(make-obsolete-variable 'cider-cljs-gradle-repl 'cider-default-cljs-repl 
"0.17")
-
 (defvar cider--select-cljs-repl-history nil)
 (defun cider-select-cljs-repl ( default)
   "Select the ClojureScript REPL to use with `cider-jack-in-cljs'.



[nongnu] elpa/cider e8d036403a 1/4: Tweak a changelog entry

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit e8d036403af5ae9f74add152f19d8d1a41a6c58b
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Tweak a changelog entry
---
 CHANGELOG.md | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index c8810f0b6f..e1631660aa 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -50,7 +50,7 @@
   - Introduces Timbre compatibility for [CIDER Log 
Mode](https://docs.cider.mx/cider/debugging/logging.html).
   - Fixes JS completions for nested objects.
   - Bundles other fixes and reliability improvements.
-- [#840](https://github.com/clojure-emacs/cider-nrepl/pull/840): Drop support 
for Clojure 1.8.
+- [cider-nrepl#840](https://github.com/clojure-emacs/cider-nrepl/pull/840): 
Drop support for Clojure 1.8.
 
 ## 1.12.0 (2023-11-24)
 



[nongnu] elpa/cider 380073eea2 4/4: Fix a typo

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit 380073eea28b47f69d320361f560beabadea534a
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Fix a typo
---
 cider.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cider.el b/cider.el
index 2d0fcac3bb..a494d10b93 100644
--- a/cider.el
+++ b/cider.el
@@ -1232,7 +1232,7 @@ It's intended to be used in your Emacs config."
 (defcustom cider-default-cljs-repl nil
   "The default ClojureScript REPL to start.
 This affects commands like `cider-jack-in-cljs'.  Generally it's
-intended to be set via .dir-locals.el for individual projects, as its
+intended to be set via .dir-locals.el for individual projects, as it's
 relatively unlikely you'd like to use the same type of REPL in each project
 you're working on."
   :type '(choice (const :tag "Figwheel" figwheel)



[nongnu] elpa/cider 9317479e94 2/4: [Docs] Tweak wording

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit 9317479e944269b1d694c1e80f781e8870b670e4
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

[Docs] Tweak wording
---
 doc/modules/ROOT/pages/index.adoc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/doc/modules/ROOT/pages/index.adoc 
b/doc/modules/ROOT/pages/index.adoc
index 394fe12cfb..b1cb104b32 100644
--- a/doc/modules/ROOT/pages/index.adoc
+++ b/doc/modules/ROOT/pages/index.adoc
@@ -20,7 +20,7 @@ if you'd like to know more about CIDER's early history.
 
 
 *Please consider
-xref:contributing/funding.adoc[supporting financially its ongoing 
development].*
+xref:contributing/funding.adoc[supporting financially CIDER's ongoing 
development].*
 
 == Overview
 



[nongnu] elpa/cider updated (4f53c0b1d4 -> 380073eea2)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch elpa/cider.

  from  4f53c0b1d4 Tweak a docstring
   new  e8d036403a Tweak a changelog entry
   new  9317479e94 [Docs] Tweak wording
   new  3c0fd75c5d Remove some obsolete aliases
   new  380073eea2 Fix a typo


Summary of changes:
 CHANGELOG.md  | 2 +-
 cider.el  | 6 +-
 doc/modules/ROOT/pages/index.adoc | 2 +-
 3 files changed, 3 insertions(+), 7 deletions(-)



[elpa] elpa-admin e443fbab86: elpa-admin.el: Created aggregated Atom feed

2024-05-07 Thread Stefan Monnier via
branch: elpa-admin
commit e443fbab86287c15a5469fdd4a11715bf3dfcdf7
Author: Stefan Monnier 
Commit: Stefan Monnier 

elpa-admin.el: Created aggregated Atom feed

* elpa-admin.el (elpaa--aggregated-feed-filename): New var.
(elpaa--html-make-pkg): Fix link's target name.
(elpaa--html-make-index): Add atom link to header.
(elpaa--rfc3339): New function.
(elpaa--render-atom): Use it.
(elpaa--make-aggregated-atom-feed): New function.
(elpaa-batch-html-make-index): Call it.  Also setup `elpaa--url`.
---
 elpa-admin.el | 70 +--
 1 file changed, 59 insertions(+), 11 deletions(-)

diff --git a/elpa-admin.el b/elpa-admin.el
index 929b95d90f..7b6f9b82d4 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -87,6 +87,8 @@ Can be set in elpa-config via `doc-dir'.")
 
 (defvar elpaa--sync-failures-dir "sync-failures/")
 
+(defvar elpaa--aggregated-feed-filename ".aggregated-feed.xml")
+
 (defvar elpaa--debug (getenv "ELPA_DEBUG")
   "Non-nil means to print debug messages.")
 
@@ -1922,7 +1924,7 @@ arbitrary code."
(format "%s ELPA - %s" elpaa--name name)
(format "%s ELPA - %s"
elpaa--name name)
-   (format ""
+   (format ""
name)))
   (insert (format "%s" name))
   (insert " ")
@@ -2008,8 +2010,11 @@ arbitrary code."
(nth 3 (elpaa--form-from-file-contents
elpaa--wsl-stats-file)
   (insert (elpaa--html-header
-   (concat elpaa--name " ELPA Packages")
-   nil elpaa--index-javascript-headers))
+   (concat elpaa--name " ELPA Packages") nil
+   (concat
+elpaa--index-javascript-headers
+(format ""
+elpaa--aggregated-feed-filename
   (insert "\n")
   (insert 
"PackageVersionDescriptionRank\n")
   (insert "")
@@ -2034,11 +2039,13 @@ arbitrary code."
 
 (defun elpaa-batch-html-make-index ()
   (let* ((ac-file (pop command-line-args-left))
- (elpaa--name (concat elpaa--name
-  (substring (pop command-line-args-left) 1)))
+ (devel (string-match "devel" (pop command-line-args-left)))
+ (elpaa--name (concat elpaa--name (if devel "-devel" "")))
+ (elpaa--url (if devel elpaa--devel-url elpaa--url))
  (ac (elpaa--form-from-file-contents ac-file))
  (default-directory (file-name-directory (expand-file-name ac-file
-(elpaa--html-make-index (cdr ac
+(elpaa--html-make-index (cdr ac))
+(elpaa--make-aggregated-atom-feed elpaa--aggregated-feed-filename)))
 
 ;;; Statistics from the web server log
 
@@ -3187,6 +3194,9 @@ relative to elpa root."
 
 ;;; Atom feed generation
 
+(defun elpaa--rfc3339 (time)
+  (format-time-string "%Y-%m-%dT%H:%M:%SZ" time))
+
 (defun elpaa--render-atom (title path articles)
   "Insert an Atom feed at point.
 TITLE sets the title of the feed, PATH is the request path
@@ -3196,9 +3206,8 @@ hosted.  ARTICLES is a list of plists, consisting of the 
keys
 `current-time'-format, `:path' is a root-relative HTTP path to
 the article."
   (cl-flet ((newer-p (a1 a2)
-  (time-less-p (plist-get a1 :time) (plist-get a2 :time)))
-(rfc3339 (time)
-  (format-time-string "%Y-%m-%dT%H:%M:%SZ" time)))
+  (time-less-p (plist-get a1 :time) (plist-get a2 :time
+;; FIXME: Why do we need to split elpaa--url into a domain and a path?
 (let* ((articles (sort articles #'newer-p))
(domain (if (string-match "\\`https?://\\([^/]+/\\)" elpaa--url)
(match-string 1 elpaa--url)
@@ -3212,14 +3221,14 @@ the article."
   (title nil ,title)
   (link ((href . ,self) (rel . "self")))
   (id nil ,self)
-  (updated nil ,(rfc3339 (plist-get :time (car articles
+  (updated nil ,(elpaa--rfc3339 (plist-get :time (car articles
   ,@(mapcar
  (pcase-lambda ((map (:title title) (:time time)
  (:path path) (:content content)))
`(entry
  nil
  (title nil ,title)
- (updated nil ,(rfc3339 time))
+ (updated nil ,(elpaa--rfc3339 time))
  (author
   nil
   (name nil "elpa-admin")
@@ -3237,6 +3246,45 @@ the article."
  (buffer-string)
  articles)))
 
+(defun elpaa--make-aggregated-atom-feed (filename)
+  (let* ((files (sort
+ (directory-files "." nil "\\.xml\\'" 'nosort)
+ (lambda (f1 f2)
+   (time-less-p
+(file-attribute-modification-time (file-attributes f2))
+(file-attribute-modification-time (file-attributes f1))
+ (tail (nthcdr 100 files))

[elpa] externals/eev 0aa0bf872d: Small fixes in (find-windows-beginner-intro).

2024-05-07 Thread ELPA Syncer
branch: externals/eev
commit 0aa0bf872d447d5cf8d4bd464ec59e432253dcc9
Author: Eduardo Ochs 
Commit: Eduardo Ochs 

Small fixes in (find-windows-beginner-intro).
---
 ChangeLog |  6 ++
 VERSION   |  4 ++--
 eev-brxxx.el  |  5 -
 eev-intro.el  | 17 +++--
 eev-plinks.el |  8 +++-
 eev-tlinks.el |  6 --
 6 files changed, 34 insertions(+), 12 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 899f81f4b3..7a8c3e8805 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2024-05-07  Eduardo Ochs  
+
+   * eev-plinks.el (find-lynx): new function.
+
+   * eev-brxxx.el (brlynx, brlynxl, brlynxd): new functions.
+
 2024-05-05  Eduardo Ochs  
 
* eev-intro.el (find-windows-beginner-intro): rewritten.
diff --git a/VERSION b/VERSION
index e32b22b29c..c34179eb62 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Mon May  6 01:18:05 GMT 2024
-Sun May  5 22:18:05 -03 2024
+Tue May  7 11:31:10 GMT 2024
+Tue May  7 08:31:10 -03 2024
diff --git a/eev-brxxx.el b/eev-brxxx.el
index faf6c69192..b8cd713ce4 100644
--- a/eev-brxxx.el
+++ b/eev-brxxx.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author: Eduardo Ochs 
 ;; Maintainer: Eduardo Ochs 
-;; Version:20230719
+;; Version:20240507
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://anggtwu.net/eev-current/eev-brxxx.el>
@@ -384,6 +384,9 @@ This should be made smarter - file:// urls should be 
returned unchanged."
 ;; (find-code-brurl 'find-eww  :remote 'brew  :local 'brewl  :dired 'brewd)
 (code-brurl 'find-eww  :remote 'brew  :local 'brewl  :dired 'brewd)
 
+;; (find-code-brurl 'find-lynx  :remote 'brlynx :local 'brlynxl :dired 
'brlynxd)
+(code-brurl 'find-lynx  :remote 'brlynx :local 'brlynxl :dired 
'brlynxd)
+
 ;; (find-code-brurl 'find-wget :remote 'brwget)
 (code-brurl 'find-wget :remote 'brwget)
 
diff --git a/eev-intro.el b/eev-intro.el
index c44980137e..8e6ede0f8f 100644
--- a/eev-intro.el
+++ b/eev-intro.el
@@ -15089,13 +15089,11 @@ and these sections on anchors and short hyperlinks:
 
 6. Test Maxima
 ==
-Here is a basic test of Maxima. The link with `find-maximanode' will
-open the manual of Maxima, and the eepitch block will define and plot
-two functions using an external program - GnuPlot. Type `q' on the
+Here is a basic test of Maxima. The eepitch block below will define
+three functions in Maxima and then plot two of them using an external
+program - GnuPlot - that uses an external window. Type `q' on the
 GnuPlot window to close it.
 
-# (find-maximanode \"plot2d\")
-
  (eepitch-maxima)
  (eepitch-kill)
  (eepitch-maxima)
@@ -15109,6 +15107,7 @@ plot3d (S(x,y), [x, 0, 6], [y, 0, 6]);
 
 
 
+
 7. Test Maxima with find-wget
 =
 This sexp
@@ -15117,12 +15116,18 @@ This sexp
 
 displays a temporary buffer with instructions for configuring certain
 elisp hyperlinks functions to make them use `find-wget'. Run the second
-progn block in it with `M-e', and then try this:
+progn block in it with `M-e', run this `code-c-d' to define
+`find-maximanode',
+
+  (code-c-d \"maxima\" \"/usr/share/maxima/5.47.0/\" \"maxima\")
+
+and then try:
 
   (find-es \"maxima\" \"eev-demo\")
 
 
 
+
 8. Videos
 =
 This sexp
diff --git a/eev-plinks.el b/eev-plinks.el
index 8a9690afab..c0e26176c9 100644
--- a/eev-plinks.el
+++ b/eev-plinks.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author: Eduardo Ochs 
 ;; Maintainer: Eduardo Ochs 
-;; Version:20240206
+;; Version:20240507
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: <http://anggtwu.net/eev-current/eev-plinks.el>
@@ -122,6 +122,7 @@
 ;; «.find-telegachat-msgc» (to "find-telegachat-msgc")
 ;; «.find-firefox» (to "find-firefox")
 ;; «.find-googlechrome»(to "find-googlechrome")
+;; «.find-lynx»(to "find-lynx")
 ;; «.find-lgrep»   (to "find-lgrep")
 ;; «.find-efunctionlgrep»  (to "find-efunctionlgrep")
 
@@ -550,6 +551,11 @@ also go to that message and highlight it."
 (defun find-firefox  (url) (find-bgprocess `(,ee-firefox-program  
,url)))
 (defun find-googlechrome (url) (find-bgprocess `(,ee-googlechrome-program 
,url)))
 
+;; «find-lynx»  (to ".find-lynx")
+(defun find-lynx (url  pos-spec-list)
+  (apply 'find-callprocess
+`("lynx" "-dump" "-width=205" ,url) pos-spec-list))
+
 
 
 
diff --git a/eev-tlinks.el b/eev-tlinks.el
index 60909e8616..4eb2afd914 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -3354,8 +3354,10 @@ This function is used by `ee-0x0-upload-region'."
  (find-eev-quick-intro "9. Shorter hyperlinks")
  (find-eev-quick-intro "9.1. `code-c-d'")
  (find-eev-quick-intro "9.2. Extra arguments to `code-c-d'" "to anchors")
- (find-20

[nongnu] elpa/yasnippet-snippets updated (e6ec9f1822 -> 6fafad13bb)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch elpa/yasnippet-snippets.

  from  e6ec9f1822 Fix yasnippet unknown directive warning (#488)
   new  38c8a5818c feat: links tsx-ts, markdown-ts and typescriptreact-mode 
(#497)
   new  a1877cb930 Add declare(strict_types=1); to PHP instead of ticks 
(#496)
   new  8af9224094 Alias js-ts-mode to js-mode (#494)
   new  3c09fa9135 Fix unknown directive warnings in c++-mode/class11 (#495)
   new  ed04a0b331 Make metadata section conform to existing directives 
(#493)
   new  6fafad13bb add some snippet (#469)


Summary of changes:
 snippets/bibtex-mode/bookinbook|  2 +-
 snippets/bibtex-mode/collection|  2 +-
 snippets/bibtex-mode/dataset   |  2 +-
 snippets/bibtex-mode/electronic|  2 +-
 snippets/bibtex-mode/inreference   |  2 +-
 snippets/bibtex-mode/mvbook|  2 +-
 snippets/bibtex-mode/mvcollection  |  2 +-
 snippets/bibtex-mode/mvreference   |  2 +-
 snippets/bibtex-mode/online|  2 +-
 snippets/bibtex-mode/patent|  2 +-
 snippets/bibtex-mode/periodical|  2 +-
 snippets/bibtex-mode/reference |  2 +-
 snippets/bibtex-mode/report|  2 +-
 snippets/bibtex-mode/set   |  2 +-
 snippets/bibtex-mode/suppbook  |  2 +-
 snippets/bibtex-mode/suppcollection|  2 +-
 snippets/bibtex-mode/suppperiodical|  2 +-
 snippets/bibtex-mode/thesis|  2 +-
 snippets/bibtex-mode/xdata |  2 +-
 snippets/c++-mode/class11  | 24 --
 snippets/{python-mode/cls => gdscript-mode/class}  |  0
 snippets/gdscript-mode/class_name  |  6 ++
 .../fun.yasnippet => gdscript-mode/const}  |  6 +++---
 snippets/{c++-mode => gdscript-mode}/enum  |  5 ++---
 snippets/{python-mode => gdscript-mode}/for|  2 +-
 snippets/gdscript-mode/func|  7 +++
 snippets/{python-mode => gdscript-mode}/if |  4 ++--
 snippets/{python-mode => gdscript-mode}/ife|  7 +++
 snippets/gdscript-mode/match   |  8 
 snippets/gdscript-mode/onready |  6 ++
 snippets/{python-mode => gdscript-mode}/print  |  2 +-
 snippets/{python-mode => gdscript-mode}/return |  2 +-
 snippets/gdscript-mode/setget  |  6 ++
 snippets/gdscript-mode/static_func |  7 +++
 snippets/{go-mode => gdscript-mode}/var|  4 ++--
 snippets/{python-mode => gdscript-mode}/while  |  2 +-
 snippets/{js2-mode => js-ts-mode}/.yas-parents |  0
 snippets/markdown-ts-mode/.yas-parents |  1 +
 snippets/php-mode/strict-types |  7 +++
 snippets/php-mode/ticks|  7 ---
 snippets/scala-mode/app|  2 +-
 snippets/scala-mode/case   |  2 +-
 snippets/scala-mode/cc |  2 +-
 snippets/scala-mode/co |  2 +-
 snippets/scala-mode/cons   |  2 +-
 snippets/scala-mode/def|  2 +-
 snippets/scala-mode/doc|  2 +-
 snippets/scala-mode/for|  2 +-
 snippets/scala-mode/if |  2 +-
 snippets/scala-mode/ls |  2 +-
 snippets/scala-mode/main   |  2 +-
 snippets/scala-mode/match  |  2 +-
 snippets/scala-mode/ob |  2 +-
 snippets/scala-mode/throw  |  2 +-
 snippets/scala-mode/try|  2 +-
 snippets/scala-mode/valueclass |  2 +-
 .../.yas-parents   |  0
 .../.yas-parents   |  0
 58 files changed, 112 insertions(+), 71 deletions(-)
 copy snippets/{python-mode/cls => gdscript-mode/class} (100%)
 create mode 100644 snippets/gdscript-mode/class_name
 copy snippets/{coq-mode/definitions/fun.yasnippet => gdscript-mode/const} (51%)
 copy snippets/{c++-mode => gdscript-mode}/enum (62%)
 copy snippets/{python-mode => gdscript-mode}/for (90%)
 create mode 100644 snippets/gdscript-mode/func
 copy snippets/{python-mode => gdscript-mode}/if (70%)
 copy snippets/{python-mode => gdscript-mode}/ife (58%)
 create mode 100644 snippets/gdscript-mode/match
 create mode 100644 snippets/gdscript-mode/onready
 copy snippets/{python-mode => gdscript-mode}/print (83%)
 copy snippets/{python-mode => gdscript-mode}/return (84%)
 create mode 100644 snippets/gdscript-mode/setget
 create mode 100644 snippets/gdscript-mode/static_func
 copy 

[nongnu] elpa/yasnippet-snippets a1877cb930 2/6: Add declare(strict_types=1); to PHP instead of ticks (#496)

2024-05-07 Thread ELPA Syncer
branch: elpa/yasnippet-snippets
commit a1877cb930a11f05d7897cf4b3a20c896fcd0dc0
Author: USAMI Kenta 
Commit: GitHub 

Add declare(strict_types=1); to PHP instead of ticks (#496)
---
 snippets/php-mode/strict-types | 7 +++
 snippets/php-mode/ticks| 7 ---
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/snippets/php-mode/strict-types b/snippets/php-mode/strict-types
new file mode 100644
index 00..69d64e2d82
--- /dev/null
+++ b/snippets/php-mode/strict-types
@@ -0,0 +1,7 @@
+-# -*- mode: snippet -*-
+-# contributor: USAMI Kenta 
+-# name: declare(strict_types=1)
+-# key: strict_types
+-# group: definitions
+-# --
+declare(strict_types=1);
diff --git a/snippets/php-mode/ticks b/snippets/php-mode/ticks
deleted file mode 100644
index c0a68c9950..00
--- a/snippets/php-mode/ticks
+++ /dev/null
@@ -1,7 +0,0 @@
-# -*- mode: snippet -*-
-# contributor: USAMI Kenta 
-# name: declare(ticks=)
-# key: ticks
-# group: definitions
-# --
-declare(ticks=${1:1});
\ No newline at end of file



[nongnu] elpa/yasnippet-snippets 38c8a5818c 1/6: feat: links tsx-ts, markdown-ts and typescriptreact-mode (#497)

2024-05-07 Thread ELPA Syncer
branch: elpa/yasnippet-snippets
commit 38c8a5818c1489aac6d360bd37415565c7c0f366
Author: Rahul M. Juliato 
Commit: GitHub 

feat: links tsx-ts, markdown-ts and typescriptreact-mode (#497)
---
 snippets/markdown-ts-mode/.yas-parents | 1 +
 snippets/tsx-ts-mode/.yas-parents  | 1 +
 snippets/typescriptreact-mode/.yas-parents | 1 +
 3 files changed, 3 insertions(+)

diff --git a/snippets/markdown-ts-mode/.yas-parents 
b/snippets/markdown-ts-mode/.yas-parents
new file mode 100644
index 00..903d0c7040
--- /dev/null
+++ b/snippets/markdown-ts-mode/.yas-parents
@@ -0,0 +1 @@
+markdown-mode
diff --git a/snippets/tsx-ts-mode/.yas-parents 
b/snippets/tsx-ts-mode/.yas-parents
new file mode 100644
index 00..a540072f15
--- /dev/null
+++ b/snippets/tsx-ts-mode/.yas-parents
@@ -0,0 +1 @@
+typescript-mode
diff --git a/snippets/typescriptreact-mode/.yas-parents 
b/snippets/typescriptreact-mode/.yas-parents
new file mode 100644
index 00..a540072f15
--- /dev/null
+++ b/snippets/typescriptreact-mode/.yas-parents
@@ -0,0 +1 @@
+typescript-mode



[nongnu] elpa/yasnippet-snippets 6fafad13bb 6/6: add some snippet (#469)

2024-05-07 Thread ELPA Syncer
branch: elpa/yasnippet-snippets
commit 6fafad13bb4689600285d9e38c61958dd63c356d
Author: xiliuya <67564860+xili...@users.noreply.github.com>
Commit: GitHub 

add some snippet (#469)
---
 snippets/gdscript-mode/class   | 7 +++
 snippets/gdscript-mode/class_name  | 6 ++
 snippets/gdscript-mode/const   | 6 ++
 snippets/gdscript-mode/enum| 6 ++
 snippets/gdscript-mode/for | 7 +++
 snippets/gdscript-mode/func| 7 +++
 snippets/gdscript-mode/if  | 7 +++
 snippets/gdscript-mode/ife | 9 +
 snippets/gdscript-mode/match   | 8 
 snippets/gdscript-mode/onready | 6 ++
 snippets/gdscript-mode/print   | 5 +
 snippets/gdscript-mode/return  | 5 +
 snippets/gdscript-mode/setget  | 6 ++
 snippets/gdscript-mode/static_func | 7 +++
 snippets/gdscript-mode/var | 6 ++
 snippets/gdscript-mode/while   | 7 +++
 16 files changed, 105 insertions(+)

diff --git a/snippets/gdscript-mode/class b/snippets/gdscript-mode/class
new file mode 100644
index 00..f857cdbd4b
--- /dev/null
+++ b/snippets/gdscript-mode/class
@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# name: class
+# key: cls
+# group: object oriented
+# --
+class ${1:class}:
+$0
diff --git a/snippets/gdscript-mode/class_name 
b/snippets/gdscript-mode/class_name
new file mode 100644
index 00..bfc9e184c5
--- /dev/null
+++ b/snippets/gdscript-mode/class_name
@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# name: class_name
+# key: clsn
+# group: object oriented
+# --
+class_name ${1:Item} = ${2:"res://icons/item.png"}
\ No newline at end of file
diff --git a/snippets/gdscript-mode/const b/snippets/gdscript-mode/const
new file mode 100644
index 00..47374c80f2
--- /dev/null
+++ b/snippets/gdscript-mode/const
@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# name: const
+# key: const
+# group: definitions
+# --
+const ${1:name} = $0
\ No newline at end of file
diff --git a/snippets/gdscript-mode/enum b/snippets/gdscript-mode/enum
new file mode 100644
index 00..0f2cae1cf3
--- /dev/null
+++ b/snippets/gdscript-mode/enum
@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# name: enum
+# key: enum
+# group: definitions
+# --
+enum $1 {$2}
\ No newline at end of file
diff --git a/snippets/gdscript-mode/for b/snippets/gdscript-mode/for
new file mode 100644
index 00..30cdf7ca67
--- /dev/null
+++ b/snippets/gdscript-mode/for
@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# name: for ... in ... : ...
+# key: for
+# group : control structure
+# --
+for ${var} in ${collection}:
+${0:pass}
\ No newline at end of file
diff --git a/snippets/gdscript-mode/func b/snippets/gdscript-mode/func
new file mode 100644
index 00..dd04a2
--- /dev/null
+++ b/snippets/gdscript-mode/func
@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# name: func
+# key: f
+# group: definitions
+# --
+func ${1:func_name} (${2:param}):
+${0:pass}
\ No newline at end of file
diff --git a/snippets/gdscript-mode/if b/snippets/gdscript-mode/if
new file mode 100644
index 00..72bf23b239
--- /dev/null
+++ b/snippets/gdscript-mode/if
@@ -0,0 +1,7 @@
+# -*- mode: snippet -*-
+# name: if
+# key: if
+# group : control structure
+# --
+if ${1:condition}:
+${0:pass}
\ No newline at end of file
diff --git a/snippets/gdscript-mode/ife b/snippets/gdscript-mode/ife
new file mode 100644
index 00..767d9c493f
--- /dev/null
+++ b/snippets/gdscript-mode/ife
@@ -0,0 +1,9 @@
+# -*- mode: snippet -*-
+# name: ife
+# key: ife
+# group : control structure
+# --
+if ${1:condition}:
+${2:pass}
+else:
+${3:pass}
\ No newline at end of file
diff --git a/snippets/gdscript-mode/match b/snippets/gdscript-mode/match
new file mode 100644
index 00..f4ca09ea10
--- /dev/null
+++ b/snippets/gdscript-mode/match
@@ -0,0 +1,8 @@
+# -*- mode: snippet -*-
+# name: match
+# key: match
+# group: control structure
+# --
+match ${1:expression}:
+${2:pattern}:
+${3:pass}
\ No newline at end of file
diff --git a/snippets/gdscript-mode/onready b/snippets/gdscript-mode/onready
new file mode 100644
index 00..ed381d29e0
--- /dev/null
+++ b/snippets/gdscript-mode/onready
@@ -0,0 +1,6 @@
+# -*- mode: snippet -*-
+# name: onready
+# key: onr
+# group: definitions
+# --
+onready var ${1:name} = $0
\ No newline at end of file
diff --git a/snippets/gdscript-mode/print b/snippets/gdscript-mode/print
new file mode 100644
index 00..cc1c797e4f
--- /dev/null
+++ b/snippets/gdscript-mode/print
@@ -0,0 +1,5 @@
+# -*- mode: snippet -*-
+# name: print
+# key: p
+# --
+print($0)
\ No newline at end of file
diff --git a/snippets/gdscript-mode/return b/snippets/gdscript-mode/return
new file mode 100644
index 00..641a308a32
--- /dev/null
+++ b/snippets/gdscript-mode/return
@@ -0,0 +1,5 @@
+# -*- mode: snippet -*-
+# name: return
+# key: r
+# --
+return $0
\ No newline at end of file
diff --git a/snippets/gdscript-mode/setget 

[nongnu] elpa/yasnippet-snippets ed04a0b331 5/6: Make metadata section conform to existing directives (#493)

2024-05-07 Thread ELPA Syncer
branch: elpa/yasnippet-snippets
commit ed04a0b331487a048d80f1f34485158a88ada251
Author: Pablo Stafforini 
Commit: GitHub 

Make metadata section conform to existing directives (#493)
---
 snippets/bibtex-mode/bookinbook | 2 +-
 snippets/bibtex-mode/collection | 2 +-
 snippets/bibtex-mode/dataset| 2 +-
 snippets/bibtex-mode/electronic | 2 +-
 snippets/bibtex-mode/inreference| 2 +-
 snippets/bibtex-mode/mvbook | 2 +-
 snippets/bibtex-mode/mvcollection   | 2 +-
 snippets/bibtex-mode/mvreference| 2 +-
 snippets/bibtex-mode/online | 2 +-
 snippets/bibtex-mode/patent | 2 +-
 snippets/bibtex-mode/periodical | 2 +-
 snippets/bibtex-mode/reference  | 2 +-
 snippets/bibtex-mode/report | 2 +-
 snippets/bibtex-mode/set| 2 +-
 snippets/bibtex-mode/suppbook   | 2 +-
 snippets/bibtex-mode/suppcollection | 2 +-
 snippets/bibtex-mode/suppperiodical | 2 +-
 snippets/bibtex-mode/thesis | 2 +-
 snippets/bibtex-mode/xdata  | 2 +-
 snippets/scala-mode/app | 2 +-
 snippets/scala-mode/case| 2 +-
 snippets/scala-mode/cc  | 2 +-
 snippets/scala-mode/co  | 2 +-
 snippets/scala-mode/cons| 2 +-
 snippets/scala-mode/def | 2 +-
 snippets/scala-mode/doc | 2 +-
 snippets/scala-mode/for | 2 +-
 snippets/scala-mode/if  | 2 +-
 snippets/scala-mode/ls  | 2 +-
 snippets/scala-mode/main| 2 +-
 snippets/scala-mode/match   | 2 +-
 snippets/scala-mode/ob  | 2 +-
 snippets/scala-mode/throw   | 2 +-
 snippets/scala-mode/try | 2 +-
 snippets/scala-mode/valueclass  | 2 +-
 35 files changed, 35 insertions(+), 35 deletions(-)

diff --git a/snippets/bibtex-mode/bookinbook b/snippets/bibtex-mode/bookinbook
index 2d4dc1eba3..e5ee3690fe 100644
--- a/snippets/bibtex-mode/bookinbook
+++ b/snippets/bibtex-mode/bookinbook
@@ -1,7 +1,7 @@
 # -*- mode: snippet -*-
 # name: bookinbook
 # key: bookinbook
-# author: Spenser Truex
+# contributor: Spenser Truex
 # --
 @bookinbook{ ${title},
 author= {${author}},
diff --git a/snippets/bibtex-mode/collection b/snippets/bibtex-mode/collection
index ddf7f86391..bc7acd21f4 100644
--- a/snippets/bibtex-mode/collection
+++ b/snippets/bibtex-mode/collection
@@ -1,7 +1,7 @@
 # -*- mode: snippet -*-
 # name: collection
 # key: collection
-# author: Spenser Truex
+# contributor: Spenser Truex
 # --
 @collection{ ${title},
   editor= {${editor}},
diff --git a/snippets/bibtex-mode/dataset b/snippets/bibtex-mode/dataset
index c03bb9f38f..f6004dd958 100644
--- a/snippets/bibtex-mode/dataset
+++ b/snippets/bibtex-mode/dataset
@@ -1,7 +1,7 @@
 # -*- mode: snippet -*-
 # name: dataset
 # key: dataset
-# author: Spenser Truex
+# contributor: Spenser Truex
 # --
 @dataset{ ${title}
   title= {${title}},
diff --git a/snippets/bibtex-mode/electronic b/snippets/bibtex-mode/electronic
index b5cefece7e..87d355ef30 100644
--- a/snippets/bibtex-mode/electronic
+++ b/snippets/bibtex-mode/electronic
@@ -1,7 +1,7 @@
 # -*- mode: snippet -*-
 # name: electronic
 # key: electronic
-# author: Spenser Truex
+# contributor: Spenser Truex
 # --
 @electronic{ ${title},
 author  = {${author}},
diff --git a/snippets/bibtex-mode/inreference b/snippets/bibtex-mode/inreference
index 20e3ccd96a..73b36fc286 100644
--- a/snippets/bibtex-mode/inreference
+++ b/snippets/bibtex-mode/inreference
@@ -1,7 +1,7 @@
 # -*- mode: snippet -*-
 # name: inreference
 # key: inreference
-# author: Spenser Truex
+# contributor: Spenser Truex
 # --
 @inreference{ ${title},
 author= {${author}},
diff --git a/snippets/bibtex-mode/mvbook b/snippets/bibtex-mode/mvbook
index b2761f8fb0..002d5a244b 100644
--- a/snippets/bibtex-mode/mvbook
+++ b/snippets/bibtex-mode/mvbook
@@ -1,7 +1,7 @@
 # -*- mode: snippet -*-
 # name: mvbook
 # key: mvbook
-# author: Spenser Truex
+# contributor: Spenser Truex
 # --
 @mvbook{ ${title},
   author= {${author}},
diff --git a/snippets/bibtex-mode/mvcollection 
b/snippets/bibtex-mode/mvcollection
index b54f46143f..c390d14998 100644
--- a/snippets/bibtex-mode/mvcollection
+++ b/snippets/bibtex-mode/mvcollection
@@ -1,7 +1,7 @@
 # -*- mode: snippet -*-
 # name: mvcollection
 # key: mvcollection
-# author: Spenser Truex
+# contributor: Spenser Truex
 # --
 @mvcollection{ ${title},
   editor= {${editor}},
diff --git a/snippets/bibtex-mode/mvreference b/snippets/bibtex-mode/mvreference
index d6380bc7bf..afabdfd488 100644
--- a/snippets/bibtex-mode/mvreference
+++ b/snippets/bibtex-mode/mvreference
@@ -1,7 +1,7 @@
 # -*- mode: snippet -*-
 # name: mvereference
 # key: mvreference
-# author: Spenser Truex
+# contributor: Spenser Truex
 # --
 @mvreference{ ${title},
 editor= {${editor}},
diff --git a/snippets/bibtex-mode/online b/snippets/bibtex-mode/online
index 35005a4614..04ed15789e 100644
--- a/snippets/bibtex-mode/online
+++ 

[nongnu] elpa/yasnippet-snippets 8af9224094 3/6: Alias js-ts-mode to js-mode (#494)

2024-05-07 Thread ELPA Syncer
branch: elpa/yasnippet-snippets
commit 8af9224094ed205f4740501bfb91472e1def898d
Author: Alec Troemel 
Commit: GitHub 

Alias js-ts-mode to js-mode (#494)
---
 snippets/js-ts-mode/.yas-parents | 1 +
 1 file changed, 1 insertion(+)

diff --git a/snippets/js-ts-mode/.yas-parents b/snippets/js-ts-mode/.yas-parents
new file mode 100644
index 00..27dab30043
--- /dev/null
+++ b/snippets/js-ts-mode/.yas-parents
@@ -0,0 +1 @@
+js-mode



[nongnu] elpa/yasnippet-snippets 3c09fa9135 4/6: Fix unknown directive warnings in c++-mode/class11 (#495)

2024-05-07 Thread ELPA Syncer
branch: elpa/yasnippet-snippets
commit 3c09fa913511ebd1fb5e5b014ec04067c9335f7b
Author: Stephen Hassard <2355041+shass...@users.noreply.github.com>
Commit: GitHub 

Fix unknown directive warnings in c++-mode/class11 (#495)

The following warnings are emitted by yasnippet:
```
Ignoring unknown directive "desc" in file: 
.../yasnippet-snippets/snippets/c++-mode/class11
Ignoring unknown directive "\\${[0-9N]*" in file: 
.../yasnippet-snippets/snippets/c++-mode/class11
Ignoring unknown directive "References" in file: 
.../yasnippet-snippets/snippets/c++-mode/class11
```

Use an unconventional ## to mark comments so yasnippet will ignore
lines that contain colons.
---
 snippets/c++-mode/class11 | 24 +---
 1 file changed, 13 insertions(+), 11 deletions(-)

diff --git a/snippets/c++-mode/class11 b/snippets/c++-mode/class11
index 815129952d..73390b09ba 100644
--- a/snippets/c++-mode/class11
+++ b/snippets/c++-mode/class11
@@ -4,17 +4,19 @@
 # group: c++11
 # uuid: d7c41f87-9b8a-479d-bb12-89f4cbdd46a7
 # contributor: Ved Vyas
-# desc: Snippet for C++11 classes based on c++-mode/class. Allows for Rule of
-# [0, All]. A choice between ";", " = default;", and " = delete;" is presented
-# for each method. The methods and some of the optional keywords/specifiers are
-# exposed as fields that users can easily skip-and-clear.
-# Hackish query-replace-regexp to renumber non-mirror fields in the region
-# between public and protected (can use N as a field number in the snippet):
-# \${[0-9N]*:\([^\$]\) -> ${\,(+ 2 \#):\1
-# References:
-# 1. http://en.cppreference.com/w/cpp/language/rule_of_three#Rule_of_five
-# 2. 
https://en.wikipedia.org/wiki/Rule_of_three_%28C%2B%2B_programming%29#Example_in_C.2B.2B
-# 3. http://stackoverflow.com/a/4782927
+#
+## Snippet for C++11 classes based on c++-mode/class. Allows for Rule of
+## [0, All]. A choice between ";", " = default;", and " = delete;" is presented
+## for each method. The methods and some of the optional keywords/specifiers 
are
+## exposed as fields that users can easily skip-and-clear.
+## Hackish query-replace-regexp to renumber non-mirror fields in the region
+## between public and protected (can use N as a field number in the snippet):
+## \${[0-9N]*:\([^\$]\) -> ${\,(+ 2 \#):\1
+##
+## References
+## 1. http://en.cppreference.com/w/cpp/language/rule_of_three#Rule_of_five
+## 2. 
https://en.wikipedia.org/wiki/Rule_of_three_%28C%2B%2B_programming%29#Example_in_C.2B.2B
+## 3. http://stackoverflow.com/a/4782927
 # --
 class ${1:Name}
 {



[nongnu] elpa/cider c62179965e 2/3: Update test data for Clojure 1.10

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit c62179965e6a506f15f8960fcd72c73e1ec3ffcd
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Update test data for Clojure 1.10
---
 cider-eval.el |  2 +-
 test/cider-error-parsing-tests.el | 10 +-
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/cider-eval.el b/cider-eval.el
index 6eb9ab4fc2..df66414f5a 100644
--- a/cider-eval.el
+++ b/cider-eval.el
@@ -698,7 +698,7 @@ See `compilation-error-regexp-alist' for help on their 
format.")
   (list
(when file
  (let ((val (match-string-no-properties file message)))
-   (unless (string= val "NO_SOURCE_PATH") val)))
+   (unless (or (string= val "REPL") (string= val "NO_SOURCE_PATH")) 
val)))
(when line (string-to-number (match-string-no-properties line message)))
(when col
  (let ((val (match-string-no-properties col message)))
diff --git a/test/cider-error-parsing-tests.el 
b/test/cider-error-parsing-tests.el
index 7de0746c91..4a887ac47a 100644
--- a/test/cider-error-parsing-tests.el
+++ b/test/cider-error-parsing-tests.el
@@ -45,7 +45,7 @@
   (it "extracts correct information from the error message"
 
 ;; test-cider-extract-error-info-14
-(let* ((message "CompilerException java.lang.RuntimeException: Unable to 
resolve symbol: dummy in this context, compiling:(/some/test/file/core.clj:31)")
+(let* ((message "Syntax error compiling at (/some/test/file/core.clj:31). 
Unable to resolve symbol: dummy in this context.")
(info (cider-extract-error-info cider-compilation-regexp message)))
   (expect (file-name info) :to-equal "/some/test/file/core.clj")
   (expect (line-num info) :to-equal 31)
@@ -53,7 +53,7 @@
   (expect (face info) :to-equal 'cider-error-highlight-face))
 
 ;; test-cider-extract-error-info-14-windows
-(let* ((message "CompilerException java.lang.RuntimeException: Unable to 
resolve symbol: dummy in this context, 
compiling:(c:\\some\\test\\file\\core.clj:31)")
+(let* ((message "Syntax error compiling at 
(c:\\some\\test\\file\\core.clj:31). Unable to resolve symbol: dummy in this 
context.")
(info (cider-extract-error-info cider-compilation-regexp message)))
   (expect (file-name info) :to-equal "c:\\some\\test\\file\\core.clj")
   (expect (line-num info) :to-equal 31)
@@ -61,7 +61,7 @@
   (expect (face info) :to-equal 'cider-error-highlight-face))
 
 ;; test-cider-extract-error-info-14-no-file
-(let* ((message "CompilerException java.lang.RuntimeException: Unable to 
resolve symbol: dummy in this context, compiling:(NO_SOURCE_PATH:31)")
+(let* ((message "Syntax error compiling at (REPL:31). Unable to resolve 
symbol: dummy in this context.")
(info (cider-extract-error-info cider-compilation-regexp message)))
   (expect (file-name info) :to-equal nil)
   (expect (line-num info) :to-equal 31)
@@ -86,7 +86,7 @@
   (expect (face info) :to-equal 'cider-warning-highlight-face))
 
 ;; test-cider-extract-error-info-15
-(let* ((message "CompilerException java.lang.RuntimeException: Unable to 
resolve symbol: dummy in this context, 
compiling:(/some/test/file/core.clj:31:3)")
+(let* ((message "Syntax error compiling at 
(/some/test/file/core.clj:31:3). Unable to resolve symbol: dummy in this 
context.")
(info (cider-extract-error-info cider-compilation-regexp message)))
   (expect (file-name info) :to-equal "/some/test/file/core.clj")
   (expect (line-num info) :to-equal 31)
@@ -94,7 +94,7 @@
   (expect (face info) :to-equal 'cider-error-highlight-face))
 
 ;; test-cider-extract-error-info-15-no-file
-(let* ((message "CompilerException java.lang.RuntimeException: Unable to 
resolve symbol: dummy in this context, compiling:(NO_SOURCE_PATH:31:3)")
+(let* ((message "Syntax error compiling at (REPL:31:3). Unable to resolve 
symbol: dummy in this context")
(info (cider-extract-error-info cider-compilation-regexp message)))
   (expect (file-name info) :to-equal nil)
   (expect (line-num info) :to-equal 31)



[nongnu] elpa/cider 160995b30e 1/3: Drop support for Clojure 1.9

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit 160995b30e06988ba4c57ee2390b40735d1c7e29
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Drop support for Clojure 1.9
---
 cider-eval.el   | 20 ++--
 cider.el|  6 +++---
 doc/modules/ROOT/pages/about/compatibility.adoc |  9 -
 doc/modules/ROOT/pages/usage/misc_features.adoc |  2 --
 test/cider-error-parsing-tests.el   |  6 --
 5 files changed, 13 insertions(+), 30 deletions(-)

diff --git a/cider-eval.el b/cider-eval.el
index b504e5b406..6eb9ab4fc2 100644
--- a/cider-eval.el
+++ b/cider-eval.el
@@ -562,11 +562,6 @@ It delegates the actual error content to the eval or op 
handler."
 (t (cider-default-err-eval-print-handler
 
 
-;; The format of the error messages emitted by Clojure's compiler changed in
-;; Clojure 1.10.  That's why we're trying to match error messages to both the
-;; old and the new format, by utilizing a combination of two different regular
-;; expressions.
-
 (defconst cider-clojure-1.10--location `((or "at ("
  (sequence "at "
(minimal-match 
(one-or-more anything)) ;; the fully-qualified name of the function that 
triggered the error
@@ -596,15 +591,6 @@ It delegates the actual error content to the eval or op 
handler."
(minimal-match (one-or-more 
anything)))
  cider-clojure-1.10--location))
 
-(defconst cider-clojure-1.9-error `(sequence
-(zero-or-more anything)
-", compiling:("
-(group-n 2 (minimal-match (zero-or-more 
anything)))
-":"
-(group-n 3 (one-or-more digit))
-(optional ":" (group-n 4 (one-or-more 
digit)))
-")"))
-
 (defconst cider-clojure-warning `(sequence
   (minimal-match (zero-or-more anything))
   (group-n 1 "warning")
@@ -619,8 +605,7 @@ It delegates the actual error content to the eval or op 
handler."
 ;; which is a subset of these regexes.
 (defconst cider-clojure-compilation-regexp
   (eval
-   `(rx bol (or ,cider-clojure-1.9-error
-,cider-clojure-warning
+   `(rx bol (or ,cider-clojure-warning
 ,cider-clojure-1.10-error
 ,cider-clojure-unexpected-error))
t)
@@ -633,8 +618,7 @@ lol in this context, compiling:(/foo/core.clj:10:1)\"
 
 (defconst cider-clojure-compilation-error-regexp
   (eval
-   `(rx bol (or ,cider-clojure-1.9-error
-,cider-clojure-1.10-error
+   `(rx bol (or ,cider-clojure-1.10-error
 ,cider-clojure-unexpected-error))
t)
   "Like `cider-clojure-compilation-regexp',
diff --git a/cider.el b/cider.el
index 8a7586803f..9629a17b40 100644
--- a/cider.el
+++ b/cider.el
@@ -141,7 +141,7 @@
(null (executable-find "clojure")))
   "powershell"
 "clojure")
-  "The command used to execute clojure with tools.deps (requires Clojure 1.9+).
+  "The command used to execute clojure with tools.deps.
 Don't use clj here, as it doesn't work when spawned from Emacs due to it
 using rlwrap.  If on Windows and no \"clojure\" executable is found we
 default to \"powershell\"."
@@ -535,10 +535,10 @@ the artifact.")
 (defconst cider-clojure-artifact-id "org.clojure/clojure"
   "Artifact identifier for Clojure.")
 
-(defconst cider-minimum-clojure-version "1.8.0"
+(defconst cider-minimum-clojure-version "1.10.0"
   "Minimum supported version of Clojure.")
 
-(defconst cider-latest-clojure-version "1.10.1"
+(defconst cider-latest-clojure-version "1.11.3"
   "Latest supported version of Clojure.")
 
 (defconst cider-required-middleware-version "0.47.0"
diff --git a/doc/modules/ROOT/pages/about/compatibility.adoc 
b/doc/modules/ROOT/pages/about/compatibility.adoc
index d550a03b97..a0304a1a12 100644
--- a/doc/modules/ROOT/pages/about/compatibility.adoc
+++ b/doc/modules/ROOT/pages/about/compatibility.adoc
@@ -28,7 +28,7 @@ You can find example commands in 
xref:troubleshooting.adoc#navigation-to-jdk-sou
 
 == Clojure
 
-CIDER targets Clojure 1.9+. As Clojure doesn't have the concept of supported 
releases
+CIDER targets Clojure 1.10+. As Clojure doesn't have the concept of supported 
releases
 we have to get a bit creative to determine the minimum version to target.
 
 The minimum required Clojure version is currently derived using data
@@ -175,6 +175,13 @@ Below you can find the official compatibility matrix for 
CIDER.
 | 8
 | 1.9
 
+| 1.14
+| 26.1
+| 1.0
+| 0.47
+| 8
+| 1.10
+
 |===
 
 TIP: You can also check the requirements of a particular CIDER version by 
inspecting
diff --git 

[nongnu] elpa/cider updated (4f51e9401c -> 4f53c0b1d4)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch elpa/cider.

  from  4f51e9401c Add a changelog entry about dropping Clojure 1.9 support
   new  160995b30e Drop support for Clojure 1.9
   new  c62179965e Update test data for Clojure 1.10
   new  4f53c0b1d4 Tweak a docstring


Summary of changes:
 cider-eval.el   | 22 +++---
 cider.el| 10 ++
 doc/modules/ROOT/pages/about/compatibility.adoc |  9 -
 doc/modules/ROOT/pages/usage/misc_features.adoc |  2 --
 test/cider-error-parsing-tests.el   | 16 +---
 5 files changed, 22 insertions(+), 37 deletions(-)



[nongnu] elpa/cider 4f53c0b1d4 3/3: Tweak a docstring

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit 4f53c0b1d43fa7ff7ee7155769e260adaace0a38
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Tweak a docstring
---
 cider.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/cider.el b/cider.el
index 9629a17b40..46bfadbae9 100644
--- a/cider.el
+++ b/cider.el
@@ -539,7 +539,9 @@ the artifact.")
   "Minimum supported version of Clojure.")
 
 (defconst cider-latest-clojure-version "1.11.3"
-  "Latest supported version of Clojure.")
+  "Latest (newest) version of Clojure.
+
+Used when `cider-jack-in-auto-inject-clojure' is set to `latest'.")
 
 (defconst cider-required-middleware-version "0.47.0"
   "The CIDER nREPL version that's known to work properly with CIDER.")



[elpa] externals/org 773bba92a8: doc/org-manual.org: Improve example of publishing configuration

2024-05-07 Thread ELPA Syncer
branch: externals/org
commit 773bba92a8e2b927427cf1daf374fa774fe834e0
Author: Ihor Radchenko 
Commit: Ihor Radchenko 

doc/org-manual.org: Improve example of publishing configuration

* doc/org-manual.org (Example: complex publishing configuration): Show
how to use evaluated expression with backquotes and `rx' macro in the
example.

Link: 
https://orgmode.org/list/lv8p223mb0920398f1619c446752bb1e1a2...@lv8p223mb0920.namp223.prod.outlook.com
---
 doc/org-manual.org | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/doc/org-manual.org b/doc/org-manual.org
index 1feb5ed603..5c4932f28d 100644
--- a/doc/org-manual.org
+++ b/doc/org-manual.org
@@ -17415,12 +17415,12 @@ place on the web server, and publishing images to it.
 
 #+begin_src emacs-lisp
 (setq org-publish-project-alist
-  '(("orgfiles"
+  `(("orgfiles"
  :base-directory "~/org/"
  :base-extension "org"
  :publishing-directory "/ssh:user@host:~/html/notebook/"
  :publishing-function org-html-publish-to-html
- :exclude "PrivatePage.org" ;; regexp
+ :exclude ,(rx (or "PrivateFile.org" (seq line-start "private/"))) ;; 
regexp
  :headline-levels 3
  :section-numbers nil
  :with-toc nil



[nongnu] elpa/typescript-mode 1cf78d7ef8 2/2: Merge pull request #189 from kisaragi-hiu/satisfies

2024-05-07 Thread ELPA Syncer
branch: elpa/typescript-mode
commit 1cf78d7ef8e0a1684a2cf265539c54ccff4068c0
Merge: 4fcb459481 06bb4d5090
Author: Jostein Kjønigsen 
Commit: GitHub 

Merge pull request #189 from kisaragi-hiu/satisfies
---
 typescript-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/typescript-mode.el b/typescript-mode.el
index aa7e5b2234..838129467b 100644
--- a/typescript-mode.el
+++ b/typescript-mode.el
@@ -270,8 +270,8 @@ Match group 1 is MUMBLE.")
  "enum" "export" "extends" "extern" "false" "finally" "for"
  "function" "from" "get" "goto" "if" "implements" "import" "in" "infer" 
"instanceof"
  "interface" "keyof" "let" "module" "namespace" "never" "new" "null" 
"number" "object" "of"
- "override" "private" "protected" "public" "readonly" "return" "set" 
"static" "string"
- "super" "switch"  "this" "throw" "true"
+ "override" "private" "protected" "public" "readonly" "return" "satisfies" 
"set" "static"
+ "string" "super" "switch" "this" "throw" "true"
  "try" "type" "typeof" "unknown" "var" "void"
  "while")) ; yield is handled separately
   "Regexp matching any typescript keyword.")



[nongnu] elpa/typescript-mode 06bb4d5090 1/2: feat: highlight TS 4.9 satisfies as a keyword

2024-05-07 Thread ELPA Syncer
branch: elpa/typescript-mode
commit 06bb4d5090a439692be3194f72d0206d82beb279
Author: Kisaragi Hiu 
Commit: Kisaragi Hiu 

feat: highlight TS 4.9 satisfies as a keyword
---
 typescript-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/typescript-mode.el b/typescript-mode.el
index aa7e5b2234..838129467b 100644
--- a/typescript-mode.el
+++ b/typescript-mode.el
@@ -270,8 +270,8 @@ Match group 1 is MUMBLE.")
  "enum" "export" "extends" "extern" "false" "finally" "for"
  "function" "from" "get" "goto" "if" "implements" "import" "in" "infer" 
"instanceof"
  "interface" "keyof" "let" "module" "namespace" "never" "new" "null" 
"number" "object" "of"
- "override" "private" "protected" "public" "readonly" "return" "set" 
"static" "string"
- "super" "switch"  "this" "throw" "true"
+ "override" "private" "protected" "public" "readonly" "return" "satisfies" 
"set" "static"
+ "string" "super" "switch" "this" "throw" "true"
  "try" "type" "typeof" "unknown" "var" "void"
  "while")) ; yield is handled separately
   "Regexp matching any typescript keyword.")



[nongnu] elpa/cider 4f51e9401c 2/2: Add a changelog entry about dropping Clojure 1.9 support

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit 4f51e9401c771b579b958df23d62d5d31cc8a678
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Add a changelog entry about dropping Clojure 1.9 support
---
 CHANGELOG.md | 1 +
 1 file changed, 1 insertion(+)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 70fc2ecf0e..c8810f0b6f 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -23,6 +23,7 @@
   - Updates 
[Orchard](https://github.com/clojure-emacs/orchard/blob/v0.23.2/CHANGELOG.md#0232-2024-03-10).
   - Updates 
[Logjam](https://github.com/clojure-emacs/logjam/blob/v0.3.0/CHANGELOG.md#030-2024-03-03).
   - Updates 
[Compliment](https://github.com/alexander-yakushev/compliment/blob/951604/CHANGELOG.md#master-unreleased).
+- [orchard#245](https://github.com/clojure-emacs/orchard/pull/245), 
[cider-nrepl#868](https://github.com/clojure-emacs/cider-nrepl/pull/868): Drop 
support for Clojure 1.9.
 
 ### Bugs fixed
 



[nongnu] elpa/cider updated (1cd6ab7b7c -> 4f51e9401c)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch elpa/cider.

  from  1cd6ab7b7c Use enrich-classpath 1.19.3 (#3649)
   new  641a9eade1 Tweak some changelog entries
   new  4f51e9401c Add a changelog entry about dropping Clojure 1.9 support


Summary of changes:
 CHANGELOG.md | 14 +++---
 1 file changed, 7 insertions(+), 7 deletions(-)



[nongnu] elpa/cider 641a9eade1 1/2: Tweak some changelog entries

2024-05-07 Thread ELPA Syncer
branch: elpa/cider
commit 641a9eade16ad1dc7e5339f3725cf8752fdafc94
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Tweak some changelog entries
---
 CHANGELOG.md | 13 ++---
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 2c79e28105..70fc2ecf0e 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -4,8 +4,8 @@
 
 ### New features
 
-- [#3632](https://github.com/clojure-emacs/cider/pull/3623): Add new 
configuration variable `cider-clojure-cli-global-aliases`
-- [#3366](https://github.com/clojure-emacs/cider/pull/3366): Support display 
of error overlays with #dbg! and #break! reader macros.
+- [#3632](https://github.com/clojure-emacs/cider/pull/3623): Add new 
configuration variable `cider-clojure-cli-global-aliases`.
+- [#3366](https://github.com/clojure-emacs/cider/pull/3366): Support display 
of error overlays with `#dbg!` and `#break!` reader macros.
 - [#3622](https://github.com/clojure-emacs/cider/pull/3461): Basic support for 
using CIDER from 
[clojure-ts-mode](https://github.com/clojure-emacs/clojure-ts-mode).
   - The `clojure-mode` dependency is still required for CIDER to function.
   - Some features like `cider-dynamic-indentation` and 
`cider-font-lock-dynamically` do not work with `clojure-ts-mode` (yet).
@@ -26,16 +26,15 @@
 
 ### Bugs fixed
 
-- [#3600](https://github.com/clojure-emacs/cider/pull/3600): Fix scittle jack 
in when using `cider-jack-in-clj`.
-
+- [#3600](https://github.com/clojure-emacs/cider/pull/3600): Fix scittle 
jack-in when using `cider-jack-in-clj`.
 
 ## 1.13.1 (2024-02-01)
 
 ### Bugs fixed
 
-- [#3605](https://github.com/clojure-emacs/cider/issues/3605): avoid 
`cider--error-phase-of-last-exception` recursive loop.
-- [#3613](https://github.com/clojure-emacs/cider/issues/3613): adapt 
`cider-completion-context.el` to upstream changes in Compliment.
-- [#3587](https://github.com/clojure-emacs/cider/issues/3587): avoid overlays 
and `message`s on stderr that is unrelated to exception handling.
+- [#3605](https://github.com/clojure-emacs/cider/issues/3605): Avoid 
`cider--error-phase-of-last-exception` recursive loop.
+- [#3613](https://github.com/clojure-emacs/cider/issues/3613): Adapt 
`cider-completion-context.el` to upstream changes in Compliment.
+- [#3587](https://github.com/clojure-emacs/cider/issues/3587): Avoid overlays 
and `message`s on stderr that is unrelated to exception handling.
 
 ## 1.13.0 (2024-01-14)
 



[elpa] externals/wrap-search ca5f1d62f6: Tue May 7 08:54:16 AM CEST 2024

2024-05-07 Thread ELPA Syncer
branch: externals/wrap-search
commit ca5f1d62f6b96fbe34788b9d8929c14b06fc49ef
Author: Emanuel Berg 
Commit: Emanuel Berg 

Tue May  7 08:54:16 AM CEST 2024
---
 wrap-search.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/wrap-search.el b/wrap-search.el
index 8ccb722c5b..4b89f314d8 100644
--- a/wrap-search.el
+++ b/wrap-search.el
@@ -7,7 +7,7 @@
 ;; Keywords: matching
 ;; License: GPL3+
 ;; URL: https://dataswamp.org/~incal/emacs-init/wrap-search.el
-;; Version: 4.14.11
+;; Version: 4.15.11
 ;;
 ;; This file is part of GNU Emacs.
 ;;
@@ -43,8 +43,8 @@
 ;; To use the package without keyboard shortcuts isn't
 ;; recommended. Instead, do for example
 ;;
-;;   (global-set-key "\C-s" #'wrap-search)
-;;   (global-set-key "\C-r" #'wrap-search-again)
+;;   (keymap-global-set "C-s" #'wrap-search)
+;;   (keymap-global-set "C-r" #'wrap-search-again)
 ;;
 ;; One can use the `universal-argument' key, which is
 ;; typically C-u, before those functions to set two search



[elpa] externals/notmuch-indicator 62a7da6659 2/3: Merge pull request #4 from sdelafond/escape-query-for-shell

2024-05-07 Thread ELPA Syncer
branch: externals/notmuch-indicator
commit 62a7da665990b5fa10db30277eaa63a4918ce577
Merge: c1c91a57f8 6b90b34220
Author: Protesilaos Stavrou 
Commit: GitHub 

Merge pull request #4 from sdelafond/escape-query-for-shell

Escape query in case it contains special shell characters (Comment: #3)
---
 notmuch-indicator.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/notmuch-indicator.el b/notmuch-indicator.el
index 2f9ebae643..2ee27866d7 100644
--- a/notmuch-indicator.el
+++ b/notmuch-indicator.el
@@ -228,7 +228,7 @@ example that uses the `tab-bar-mode'."
   (format "%s --config=%S count %s"
   notmuch-indicator-notmuch-binary
   notmuch-indicator-notmuch-config-file
-  terms)
+  (shell-quote-argument terms))
 
 (declare-function
  notmuch-search "notmuch"



[elpa] externals/notmuch-indicator 6b90b34220 1/3: Escape query in case it contains special shell characters (Comment: #3)

2024-05-07 Thread ELPA Syncer
branch: externals/notmuch-indicator
commit 6b90b34220e8ece3306638240e42289dae751d39
Author: Sébastien Delafond 
Commit: Sébastien Delafond 

Escape query in case it contains special shell characters (Comment: #3)
---
 notmuch-indicator.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/notmuch-indicator.el b/notmuch-indicator.el
index 2f9ebae643..2ee27866d7 100644
--- a/notmuch-indicator.el
+++ b/notmuch-indicator.el
@@ -228,7 +228,7 @@ example that uses the `tab-bar-mode'."
   (format "%s --config=%S count %s"
   notmuch-indicator-notmuch-binary
   notmuch-indicator-notmuch-config-file
-  terms)
+  (shell-quote-argument terms))
 
 (declare-function
  notmuch-search "notmuch"



[elpa] externals/notmuch-indicator 490a3a0cec 3/3: Acknowledge Sébastien Delafond for commit 62a7da6

2024-05-07 Thread ELPA Syncer
branch: externals/notmuch-indicator
commit 490a3a0cecfd3ae755bd871f0b9293defa884574
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Acknowledge Sébastien Delafond for commit 62a7da6

This was done in pull request 4: 
.

The change is small and thus requires no copyright assignment to the
Free Software Foundation.
---
 README.org | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/README.org b/README.org
index e609c998ac..1d66e23e1f 100644
--- a/README.org
+++ b/README.org
@@ -317,7 +317,7 @@ of help matters.
 + Author/maintainer :: Protesilaos Stavrou.
 
 + Contributions to code or user feedback :: Henrik Kjerringvåg, MikeS,
-  Mohamed Suliman, Stefan Monnier, Yusef Aslam.
+  Mohamed Suliman, Sébastien Delafond, Stefan Monnier, Yusef Aslam.
 
 * GNU Free Documentation License
 :PROPERTIES:



[elpa] externals/notmuch-indicator updated (c1c91a57f8 -> 490a3a0cec)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch externals/notmuch-indicator.

  from  c1c91a57f8 Update development links
   new  6b90b34220 Escape query in case it contains special shell 
characters (Comment: #3)
   new  62a7da6659 Merge pull request #4 from 
sdelafond/escape-query-for-shell
   new  490a3a0cec Acknowledge Sébastien Delafond for commit 62a7da6


Summary of changes:
 README.org   | 2 +-
 notmuch-indicator.el | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)



[elpa] externals/dired-preview 2f0a4055f5 14/15: Update to dired-preview version 0.2.0

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 2f0a4055f575bdecd93798155f44d935a4f2cb6b
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Update to dired-preview version 0.2.0
---
 CHANGELOG.org| 103 +++
 README.org   |   6 ++--
 dired-preview.el |   2 +-
 3 files changed, 107 insertions(+), 4 deletions(-)

diff --git a/CHANGELOG.org b/CHANGELOG.org
index c2cc9e6351..9c3d97b195 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -9,6 +9,109 @@ project's main git repository: 
.
 The newest release is at the top.  For further details, please consult
 the manual: .
 
+* 0.2.0 on 2024-05-07
+:PROPERTIES:
+:CUSTOM_ID: h:4225d638-f5bb-4855-85c7-972ff40aad6d
+:END:
+
+This release brings many small improvements and fixes some bugs.
+
+** The preview shows up right away on new directories
+:PROPERTIES:
+:CUSTOM_ID: h:e3652b69-aa81-4b71-9887-81052ff7f9f7
+:END:
+
+In the past, entering a new directory would not trigger a preview: it
+would wait for some motion before doing so. This could make it seem
+that the mode was not enabled in the current buffer. Now, the preview
+shows up immediately.
+
+Thanks to Nofint for the initial contribution in pull request 8:
+. The changes are
+small and do not require copyright assignment to the Free Software
+Foundation.
+
+** Directories are previewed as well
+:PROPERTIES:
+:CUSTOM_ID: h:8dae8cba-3ca7-43be-a4ba-5dd938b37f82
+:END:
+
+The contents are displayed in a Dired buffer, using the current
+settings for it. This means that colours are possible icons are shown
+too.
+
+** Large files are previewed in ~hexl-mode~
+:PROPERTIES:
+:CUSTOM_ID: h:b4928def-5392-4e7b-8cb5-ed5c238b1b5e
+:END:
+
+As the documentation of this mode suggests:
+
+#+begin_quote
+A mode for editing binary files in hex dump format.
+This is not an ordinary major mode; it alters some aspects
+of the current mode’s behavior, but not all; also, you can exit
+Hexl mode and return to the previous mode using C-c C-c.
+#+end_quote
+
+The =C-c C-c= key binding toggles the mode, in case you want to see
+the raw output.
+
+Thanks to Karthik Chikmagalur for the contribution. This was done on
+the now defunct mailing list:
+.
+
+** Previews are displayed in a full-featured mode
+:PROPERTIES:
+:CUSTOM_ID: h:ea324fd1-f808-420f-b019-250e161465ff
+:END:
+
+Before, we would delay the execution of the mode hooks to speed things
+up. Though this came at the cost of (i) making the buffer less capable
+and (ii) forcing us to handle the execution of those hooks at a later
+stage when they would be needed, which proved to be error-prone in a
+number of scenaria.
+
+** Files without an extension are still previewed
+:PROPERTIES:
+:CUSTOM_ID: h:a4d6b125-5ef6-409d-aded-e7b1971ac87d
+:END:
+
+This is a bug fix. Before, they would be considered as part of the
+files to be ignored, per ~dired-preview-ignored-extensions-regexp~.
+
+** Previews are not added to what ~recentf-mode~ tracks
+:PROPERTIES:
+:CUSTOM_ID: h:67d61ed2-3e16-49a9-bd3a-61950d9ab81b
+:END:
+
+Thanks to Juergen Hoetzel for reporting this issue and for tweaking my
+suggested patch for it. This was done in pull request 12:
+. The change is
+small, so Juergen does not need to assign copyright to the Free
+Software Foundation.
+
+** A nil value for ~split-width-threshold~ still works
+:PROPERTIES:
+:CUSTOM_ID: h:493488b1-0f7d-4b44-b96d-4cd9a6bde352
+:END:
+
+We no longer consider this an error and adapt the preview accordingly.
+Thanks to Juergen Hoetzel for the contribution. This was done in pull
+request 11 and does not require copyright assignment:
+.
+
+** For developers: previews are done with ~cl-defmethod~
+:PROPERTIES:
+:CUSTOM_ID: h:d8c42eea-a540-44fd-91b4-138fdba47288
+:END:
+
+Each file type will thus have its own method on how to display the
+contents in a buffer. The idea is to make this easier to extend. The
+goal is to have methods that can preview PDFs and images without
+blocking Emacs. Other file types can be considered as well, though
+those two are the immediate priority.
+
 * 0.1.0 on 2023-07-08
 :PROPERTIES:
 :CUSTOM_ID: h:99cbb3dd-a0f1-4d2b-a945-58531f4ab189
diff --git a/README.org b/README.org
index 96a22bdf5c..6a37dfa31b 100644
--- a/README.org
+++ b/README.org
@@ -4,9 +4,9 @@
 #+language: en
 #+options: ':t toc:nil author:t email:t num:t
 #+startup: content
-#+macro: stable-version 0.1.0
-#+macro: release-date 2023-07-08
-#+macro: development-version 0.2.0-dev
+#+macro: stable-version 0.2.0
+#+macro: release-date 2024-05-07
+#+macro: development-version 0.3.0-dev
 #+macro: file @@texinfo:@file{@@$1@@texinfo:}@@
 #+macro: space @@texinfo:@: @@
 #+macro: kbd 

[elpa] externals/dired-preview 7057c8ba40 13/15: Tweak the backronym

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 7057c8ba406c8f4c9296dd211c8d5f07ffe97dc6
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Tweak the backronym
---
 README.md  | 5 +++--
 README.org | 5 +++--
 2 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/README.md b/README.md
index 671763b55a..a8400cc822 100644
--- a/README.md
+++ b/README.md
@@ -12,5 +12,6 @@ behaviour.
 + Git repositories:
   + GitHub: 
   + GitLab: 
-+ Backronym: Directories Invariably Render Everything Decently; PDFs
-  Require Extra Viewing Instructions for Emacs to Work.
++ Backronym: Directories Invariably Render Everything Decently ...
+  preview; dired ... PDFs Require Extra Viewing Instructions for Emacs
+  to Work.
diff --git a/README.org b/README.org
index 651b0b6391..96a22bdf5c 100644
--- a/README.org
+++ b/README.org
@@ -39,8 +39,9 @@ Current development target is {{{development-version}}}.
 + Git repositories:
   + GitHub: 
   + GitLab: 
-+ Backronym: Directories Invariably Render Everything Decently; PDFs
-  Require Extra Viewing Instructions for Emacs to Work.
++ Backronym: Directories Invariably Render Everything Decently ...
+  preview; dired ... PDFs Require Extra Viewing Instructions for Emacs
+  to Work.
 
 #+toc: headlines 8 insert TOC here, with eight headline levels
 



[elpa] externals/dired-preview fbca1bbede 15/15: Make minor rewording to the README

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit fbca1bbede76da63b063863301306de0ce501c6a
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Make minor rewording to the README
---
 README.md | 11 +--
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/README.md b/README.md
index a8400cc822..909ce300d0 100644
--- a/README.md
+++ b/README.md
@@ -1,11 +1,10 @@
 # dired-preview for Emacs
 
-This is a simple and robust package to automatically preview in a side
-window the file at point in Dired buffers.  Preview windows are closed
-when they are no longer relevant, while preview buffers are killed if
-they have not been used for other purposes beside previewing.  The
-package provides several customisation options to control its
-behaviour.
+This is a simple package to automatically preview in a side window the
+file at point in Dired buffers. Preview windows are closed when they
+are no longer relevant, while preview buffers are killed if they have
+not been used for other purposes beside previewing. The package
+provides several customisation options to control its behaviour.
 
 + Package name (GNU ELPA): `dired-preview`
 + Official manual: 



[elpa] externals/dired-preview 383d20ba0a 11/15: Fix indentation

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 383d20ba0a99dfe41c3731249a8d072a20c42e1d
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Fix indentation
---
 dired-preview.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/dired-preview.el b/dired-preview.el
index 8a5c1d851c..816aeaf5c3 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -298,7 +298,7 @@ The size of the leading chunk is specified by
 
 (cl-defmethod dired-preview--get-buffer ((file (head ignore)))
   "Get preview buffer for ignored FILE."
-(message "No preview method for `%s'" (cdr file)))
+  (message "No preview method for `%s'" (cdr file)))
 
 (cl-defmethod dired-preview--get-buffer ((file (head directory)))
   "Get preview buffer for directory FILE type."
@@ -358,7 +358,7 @@ checked against `split-width-threshold' or
 (defun dired-preview-display-action-side ()
   "Pick a side window that is appropriate for the given frame."
   (if-let (split-width-threshold
-   (width (window-body-width))
+   (width (window-body-width))
((>= width (window-body-height)))
((>= width split-width-threshold)))
   `(:side right :dimension window-width :size 
,(dired-preview-get-window-size :width))



[elpa] externals/dired-preview 889965fd52 10/15: Simplify note about hexl-mode

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 889965fd52d0e5e759094945b0fb949ecaf54315
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Simplify note about hexl-mode
---
 README.org | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/README.org b/README.org
index a161f70870..651b0b6391 100644
--- a/README.org
+++ b/README.org
@@ -95,9 +95,8 @@ PDFs, and EPUBs.
 [ In the near future, we may find ways to quickly preview any file
   type without affecting the performance of Emacs. ]
 
-Binary files are previewed in ~hexl-mode~ mode. This is more useful
-than the raw, unreadable output. The user can disable this mode by
-typing =C-c C-c=.
+Large files are previewed in ~hexl-mode~ mode. The user can disable
+this mode by typing =C-c C-c=.
 
 I took inspiration for ~dired-preview~ from the now unmaintained
 ~peep-dired~ package by Adam Sokolnicki: .



[elpa] externals/dired-preview feb98f3f53 08/15: Tweak dired-preview-trigger to be more readable

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit feb98f3f5393b250f65a6f96db63594a48c53247
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Tweak dired-preview-trigger to be more readable
---
 dired-preview.el | 19 ++-
 1 file changed, 10 insertions(+), 9 deletions(-)

diff --git a/dired-preview.el b/dired-preview.el
index 7733493510..039f46b81e 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -436,18 +436,19 @@ With optional NO-DELAY do not start a timer.  Otherwise 
produce
 the preview with `dired-preview-delay' of idleness."
   (add-hook 'window-state-change-hook 
#'dired-preview--close-previews-outside-dired)
   (dired-preview--cancel-timer)
-  (if-let ((file (dired-file-name-at-point))
-   ((dired-preview--preview-p file))
-   ((memq this-command dired-preview-trigger-commands)))
+  (let* ((file (dired-file-name-at-point))
+ (preview (dired-preview--preview-p file)))
+(cond
+ ((and preview (memq this-command dired-preview-trigger-commands))
   (if no-delay
   (dired-preview-display-file file)
 (setq dired-preview--timer
-  (run-with-idle-timer dired-preview-delay nil 
#'dired-preview-display-file file)))
-(if (and file (dired-preview--preview-p file))
-(dired-preview-start file)
-  (if (not (memq this-command dired-preview-trigger-commands))
-  nil
-(dired-preview--delete-windows)))
+  (run-with-idle-timer dired-preview-delay nil 
#'dired-preview-display-file file
+ ((and file preview)
+  (dired-preview-start file))
+ ((and (not preview)
+   (memq this-command dired-preview-trigger-commands))
+  (dired-preview--delete-windows)))
 (dired-preview--close-previews-outside-dired)))
 
 (defun dired-preview-disable-preview ()



[elpa] externals/dired-preview 24459a7c90 06/15: Add check for directory in dired-preview--preview-p

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 24459a7c907d979a83e07df6899b4978e45f92e6
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Add check for directory in dired-preview--preview-p
---
 dired-preview.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/dired-preview.el b/dired-preview.el
index 52c012406f..aeb6c9491a 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -418,7 +418,7 @@ Only do it with the current major mode is Dired."
 (defun dired-preview--preview-p (file)
   "Return non-nil if FILE can be previewed."
   (and file
-   (file-regular-p file)
+   (or (file-regular-p file) (file-directory-p file))
(file-readable-p file)
(not (dired-preview--file-displayed-p file))
(not (dired-preview--file-ignored-p file



[elpa] externals/dired-preview 3e4fd8ccdf 03/15: Make small stylistic tweak

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 3e4fd8ccdfff16d632daf169bc409ef43ddfcc7d
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Make small stylistic tweak
---
 dired-preview.el | 6 +-
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/dired-preview.el b/dired-preview.el
index 0699db925a..ee5a98b80f 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -440,11 +440,7 @@ the preview with `dired-preview-delay' of idleness."
   (if no-delay
   (dired-preview-display-file file)
 (setq dired-preview--timer
-  (run-with-idle-timer
-   dired-preview-delay
-   nil
-   #'dired-preview-display-file
-   file)))
+  (run-with-idle-timer dired-preview-delay nil 
#'dired-preview-display-file file)))
 (if (and file (dired-preview--preview-p file))
 (dired-preview-start file)
   (if (not (memq this-command dired-preview-trigger-commands))



[elpa] externals/dired-preview 3291795347 04/15: Clarify a doc string

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 3291795347d05f0526942f42429c20c7dd255a27
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Clarify a doc string
---
 dired-preview.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/dired-preview.el b/dired-preview.el
index ee5a98b80f..5f5261edf9 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -393,7 +393,7 @@ aforementioned user option."
   (dired-preview--kill-large-buffers))
 
 (defun dired-preview--close-previews-outside-dired ()
-  "Call `dired-preview--close-previews' if BUFFER is not in Dired mode."
+  "Call `dired-preview--close-previews' if the current buffer is not in Dired 
mode."
   (unless (eq major-mode 'dired-mode)
 (dired-preview--close-previews)
 (remove-hook 'window-state-change-hook 
#'dired-preview--close-previews-outside-dired)



[elpa] externals/dired-preview a2126aefff 05/15: Check if file exists while testing if it can be previewed

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit a2126aefff63fea055ff1fe4981b1d8c37ef6397
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Check if file exists while testing if it can be previewed
---
 dired-preview.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/dired-preview.el b/dired-preview.el
index 5f5261edf9..52c012406f 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -417,7 +417,8 @@ Only do it with the current major mode is Dired."
 
 (defun dired-preview--preview-p (file)
   "Return non-nil if FILE can be previewed."
-  (and (file-regular-p file)
+  (and file
+   (file-regular-p file)
(file-readable-p file)
(not (dired-preview--file-displayed-p file))
(not (dired-preview--file-ignored-p file



[elpa] externals/dired-preview e30b859ba9 01/15: Remove needless option for hexl-mode

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit e30b859ba9bbdcfafe1027dcca6672cd763eddfd
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Remove needless option for hexl-mode

We simply document that C-c C-c toggles it.
---
 README.org   |  4 
 dired-preview.el | 12 +---
 2 files changed, 5 insertions(+), 11 deletions(-)

diff --git a/README.org b/README.org
index 209a372b20..a161f70870 100644
--- a/README.org
+++ b/README.org
@@ -95,6 +95,10 @@ PDFs, and EPUBs.
 [ In the near future, we may find ways to quickly preview any file
   type without affecting the performance of Emacs. ]
 
+Binary files are previewed in ~hexl-mode~ mode. This is more useful
+than the raw, unreadable output. The user can disable this mode by
+typing =C-c C-c=.
+
 I took inspiration for ~dired-preview~ from the now unmaintained
 ~peep-dired~ package by Adam Sokolnicki: .
 My original plan was to volunteer to maintain ~peep-dired~ but I
diff --git a/dired-preview.el b/dired-preview.el
index 2acc917afd..6ca1c7afe4 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -109,15 +109,6 @@ details."
   :group 'dired-preview
   :type 'natnum)
 
-(defcustom dired-preview-binary-as-hexl t
-  "Whether non-text (binary) files should be previewed in `hexl-mode'.
-
-Irrespective of this option, you can switch between raw/hexl
-views at any time using `dired-preview-hexl-toggle'."
-  :group 'dired-preview
-  :package-version '(dired-preview . "0.2.0")
-  :type 'boolean)
-
 (defvar dired-preview--buffers nil
   "List with buffers of previewed files.")
 
@@ -295,8 +286,7 @@ The size of the leading chunk is specified by
   ;; We create a buffer with a partial preview
   (buffer-disable-undo)
   (insert-file-contents file nil 1 dired-preview-chunk-size 'replace)
-  (when (and (eq buffer-file-coding-system 'no-conversion)
- dired-preview-binary-as-hexl)
+  (when (eq buffer-file-coding-system 'no-conversion)
 (hexl-mode))
   (dired-preview--add-truncation-message)
   (read-only-mode t)



[elpa] externals/dired-preview 951734fdff 02/15: Untabify the file

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 951734fdff5801c9b5476e8b77f9c51937bebcc4
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Untabify the file
---
 dired-preview.el | 8 
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/dired-preview.el b/dired-preview.el
index 6ca1c7afe4..0699db925a 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -358,7 +358,7 @@ checked against `split-width-threshold' or
 (defun dired-preview-display-action-side ()
   "Pick a side window that is appropriate for the given frame."
   (if-let (split-width-threshold
-  (width (window-body-width))
+   (width (window-body-width))
((>= width (window-body-height)))
((>= width split-width-threshold)))
   `(:side right :dimension window-width :size 
,(dired-preview-get-window-size :width))
@@ -446,10 +446,10 @@ the preview with `dired-preview-delay' of idleness."
#'dired-preview-display-file
file)))
 (if (and file (dired-preview--preview-p file))
-   (dired-preview-start file)
+(dired-preview-start file)
   (if (not (memq this-command dired-preview-trigger-commands))
- nil
-   (dired-preview--delete-windows)))
+  nil
+(dired-preview--delete-windows)))
 (dired-preview--close-previews-outside-dired)))
 
 (defun dired-preview-disable-preview ()



[elpa] externals/dired-preview 10d761722c 09/15: Revert commit 491fb79

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 10d761722c3b7c8a944f9711aae2578a3caa992e
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Revert commit 491fb79

We will find another way to handle this better, because some files
which are not writable in practice (like mp3) do pass the
file-writable-p check.
---
 dired-preview.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/dired-preview.el b/dired-preview.el
index 039f46b81e..8a5c1d851c 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -221,8 +221,7 @@ FILE."
  ((and (not (string-empty-p ext))
(string-match-p ext dired-preview-ignored-extensions-regexp))
   (cons 'ignore file))
- ((or (dired-preview--file-large-p file)
-  (not (file-writable-p file))) ; FIXME 2024-05-07: We should probably 
decouple those
+ ((dired-preview--file-large-p file)
   (cons 'large file))
  ((and (not (string-empty-p ext))
(string-match-p ext dired-preview-image-extensions-regexp))



[elpa] externals/dired-preview a04a271834 12/15: Make the scroll commands trigger a preview

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit a04a27183485f243795875fff5407c8c9fbf3a40
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Make the scroll commands trigger a preview
---
 dired-preview.el | 11 ++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/dired-preview.el b/dired-preview.el
index 816aeaf5c3..1bde6e1cbb 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -374,7 +374,16 @@ aforementioned user option."
   (,(plist-get properties :dimension) . ,(plist-get properties :size)
 
 (defvar dired-preview-trigger-commands
-  '(dired-next-line dired-previous-line dired-mark dired-unmark 
dired-unmark-backward dired-del-marker dired-goto-file dired-find-file)
+  '( dired-next-line
+ dired-previous-line
+ dired-mark
+ dired-unmark
+ dired-unmark-backward
+ dired-del-marker
+ dired-goto-file
+ dired-find-file
+ scroll-up-command
+ scroll-down-command)
   "List of Dired commands that trigger a preview.")
 
 (defvar dired-preview--timer nil



[elpa] externals/dired-preview updated (ecb75b5f71 -> fbca1bbede)

2024-05-07 Thread ELPA Syncer
elpasync pushed a change to branch externals/dired-preview.

  from  ecb75b5f71 Assume text type to be the fallback in 
dired-preview--infer-type
   new  e30b859ba9 Remove needless option for hexl-mode
   new  951734fdff Untabify the file
   new  3e4fd8ccdf Make small stylistic tweak
   new  3291795347 Clarify a doc string
   new  a2126aefff Check if file exists while testing if it can be previewed
   new  24459a7c90 Add check for directory in dired-preview--preview-p
   new  491fb79dd6 Treat binary files the same as "large" for now
   new  feb98f3f53 Tweak dired-preview-trigger to be more readable
   new  10d761722c Revert commit 491fb79
   new  889965fd52 Simplify note about hexl-mode
   new  383d20ba0a Fix indentation
   new  a04a271834 Make the scroll commands trigger a preview
   new  7057c8ba40 Tweak the backronym
   new  2f0a4055f5 Update to dired-preview version 0.2.0
   new  fbca1bbede Make minor rewording to the README


Summary of changes:
 CHANGELOG.org| 103 +++
 README.md|  16 -
 README.org   |  14 +---
 dired-preview.el |  57 +++---
 4 files changed, 147 insertions(+), 43 deletions(-)



[elpa] externals/dired-preview 491fb79dd6 07/15: Treat binary files the same as "large" for now

2024-05-07 Thread ELPA Syncer
branch: externals/dired-preview
commit 491fb79dd6815fd09b070474e74f02435682b7e9
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Treat binary files the same as "large" for now
---
 dired-preview.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/dired-preview.el b/dired-preview.el
index aeb6c9491a..7733493510 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -221,7 +221,8 @@ FILE."
  ((and (not (string-empty-p ext))
(string-match-p ext dired-preview-ignored-extensions-regexp))
   (cons 'ignore file))
- ((dired-preview--file-large-p file)
+ ((or (dired-preview--file-large-p file)
+  (not (file-writable-p file))) ; FIXME 2024-05-07: We should probably 
decouple those
   (cons 'large file))
  ((and (not (string-empty-p ext))
(string-match-p ext dired-preview-image-extensions-regexp))



[elpa] externals/denote c79da89b23: Clarify that denote-org-extras.el is part of Denote and autoloadable

2024-05-07 Thread ELPA Syncer
branch: externals/denote
commit c79da89b2377cdfd1c72f20a2feffd9a5e445fdb
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Clarify that denote-org-extras.el is part of Denote and autoloadable

Thanks to Julian Hoch for asking for this clarification. This was done
in issue 337: .
---
 README.org | 24 +---
 1 file changed, 13 insertions(+), 11 deletions(-)

diff --git a/README.org b/README.org
index c63ad577a2..6580c28114 100644
--- a/README.org
+++ b/README.org
@@ -590,11 +590,13 @@ to collect thoughts in a single document and produce 
longer standalone
 notes out of them upon review.
 
 #+findex: denote-org-extras-extract-org-subtree
-The command ~denote-org-extras-extract-org-subtree~ (part of the
-optional =denote-org-extras.el= extension) is used for this purpose.
-It creates a new Denote note using the current Org subtree. In doing
-so, it removes the subtree from its current file and moves its
-contents into a new file.
+The command ~denote-org-extras-extract-org-subtree~ is used for this
+purpose. It creates a new Denote note using the current Org subtree.
+In doing so, it removes the subtree from its current file and moves
+its contents into a new file. This command is part of the optional
+=denote-org-extras.el= extension, which is part of the ~denote~
+package. It is loaded automatically as soon as one of its commands is
+invoked.
 
 The text of the subtree's heading becomes the =#+title= of the new
 note. Everything else is inserted as-is.
@@ -5410,12 +5412,12 @@ Denote is meant to be a collective effort.  Every bit 
of help matters.
   Cassou, Elias Storms, Federico Stilman, Florian, Frédéric Willem
   Frank Ehmsen, Glenna D., Guo Yong, Hanspeter Gisler Harold Ollivier,
   Jack Baty, Jay Rajput, Jean-Charles Bagneris, Jens Östlund, Jeremy
-  Friesen, Jonathan Sahar, Johan Bolmsjö, Jousimies, Juanjo Presa, Kai
-  von Fintel, Kaushal Modi, M. Hadi Timachi, Mark Olson, Mirko
-  Hernandez, Niall Dooley, Paul van Gelder, Peter Prevos, Peter Smith,
-  Suhail Singh, Shreyas Ragavan, Stefan Thesing, Summer Emacs, Sven
-  Seebeck, Taoufik, TJ Stankus, Vick (VicZz), Viktor Haag, Wade
-  Mealing, Yi Liu, Ypot, atanasj, babusri, doolio, drcxd,
+  Friesen, Jonathan Sahar, Johan Bolmsjö, Jousimies, Juanjo Presa,
+  Julian Hoch, Kai von Fintel, Kaushal Modi, M. Hadi Timachi, Mark
+  Olson, Mirko Hernandez, Niall Dooley, Paul van Gelder, Peter Prevos,
+  Peter Smith, Suhail Singh, Shreyas Ragavan, Stefan Thesing, Summer
+  Emacs, Sven Seebeck, Taoufik, TJ Stankus, Vick (VicZz), Viktor Haag,
+  Wade Mealing, Yi Liu, Ypot, atanasj, babusri, doolio, drcxd,
   fingerknight, hpgisler, mentalisttraceur, pRot0ta1p, rbenit68,
   relict007, sienic, sundar bp.
 



[elpa] externals/beframe 60593ffc1e: Do not try to rename if there is no frame

2024-05-07 Thread ELPA Syncer
branch: externals/beframe
commit 60593ffc1edd7d467cb22aee39f1d3fb778b45fb
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Do not try to rename if there is no frame

This is relevant for the initial frame when the daemon is already
running.

Thanks to Valentino for reporting the bug in issue 3:
.
---
 README.org |  2 +-
 beframe.el | 15 ---
 2 files changed, 9 insertions(+), 8 deletions(-)

diff --git a/README.org b/README.org
index c569f15ec0..05a046f495 100644
--- a/README.org
+++ b/README.org
@@ -404,7 +404,7 @@ matters.
 + Contributions to code or the manual :: Edgar Vincent, Tony Zorman.
 
 + Ideas and/or user feedback :: Derek Passen, Karan Ahlawat, Karthik
-  Chikmagalur.
+  Chikmagalur, Valentino.
 
 * COPYING
 :PROPERTIES:
diff --git a/beframe.el b/beframe.el
index d33f8444a9..f1c5ebc361 100644
--- a/beframe.el
+++ b/beframe.el
@@ -618,13 +618,14 @@ Also see the variable `beframe-prefix-map'."
 (defun beframe-infer-frame-name (frame name)
   "Infer a suitable name for FRAME with given NAME.
 See `beframe-rename-frame'."
-  (let* ((buffer (car (frame-parameter frame 'buffer-list)))
- (file-name (when (bufferp buffer) (buffer-file-name buffer)))
- (buf-name (buffer-name buffer))
- (dir (with-current-buffer buffer (or (vc-root-dir) 
default-directory)))
- (projectp (and (bound-and-true-p project--list)
-(listp project--list)
-(member (list dir) project--list
+  (when-let (((frame-list))
+ (buffer (car (frame-parameter frame 'buffer-list)))
+ (file-name (when (bufferp buffer) (buffer-file-name buffer)))
+ (buf-name (buffer-name buffer))
+ (dir (with-current-buffer buffer (or (vc-root-dir) 
default-directory)))
+ (projectp (and (bound-and-true-p project--list)
+(listp project--list)
+(member (list dir) project--list
 (cond
  ((and name (stringp name))
   name)