[elpa] externals/detached acac8bd3eb 02/10: Update to correct order of criteria

[ELPA Syncer]

branch: externals/detached
commit acac8bd3eb7de409b3870838540c65f6a421204e
Author: Niklas Eklund 
Commit: Niklas Eklund 

Update to correct order of criteria

Previously criteria was applied in the reverse order. That could yield
the same result as the correct order, but not always.
---
 detached-list.el | 90 +---
 1 file changed, 47 insertions(+), 43 deletions(-)

diff --git a/detached-list.el b/detached-list.el
index f02a4baede..e17ef9ae30 100644
--- a/detached-list.el
+++ b/detached-list.el
@@ -139,7 +139,7 @@ Optionally initialize ALL session-directories."
   (interactive)
   (if detached-list--narrow-criteria
   (detached-list-narrow-sessions
-   (cdr detached-list--narrow-criteria))
+   (butlast detached-list--narrow-criteria))
 (message "No criterion to remove")))
 
 (defun detached-list-widen ()
@@ -240,15 +240,15 @@ Optionally SUPPRESS-OUTPUT."
   (when time-threshold
 (if-let ((parsed-threshold (detached--list-parse-time time-threshold)))
 (detached-list-narrow-sessions
- `((,(format "+%s" time-threshold) .
+ `(,@detached-list--narrow-criteria
+   (,(format "+%s" time-threshold) .
 ,(lambda (sessions)
(let ((current-time (time-to-seconds (current-time
  (seq-filter (lambda (it)
(< (- current-time
  (plist-get (detached--session-time it) 
:start))
   parsed-threshold))
- sessions
-   ,@detached-list--narrow-criteria))
+ sessions))
   (message "Cannot parse time"
 
 (defun detached-list-narrow-before-time (time-threshold)
@@ -259,15 +259,15 @@ Optionally SUPPRESS-OUTPUT."
   (when time-threshold
 (if-let ((parsed-threshold (detached--list-parse-time time-threshold)))
   (detached-list-narrow-sessions
-   `((,(format "-%s" time-threshold) .
+   `(,@detached-list--narrow-criteria
+ (,(format "-%s" time-threshold) .
   ,(lambda (sessions)
  (let ((current-time (time-to-seconds (current-time
(seq-filter (lambda (it)
  (> (- current-time
(plist-get (detached--session-time it) 
:start))
 parsed-threshold))
-   sessions
- ,@detached-list--narrow-criteria))
+   sessions))
   (message "Cannot parse time"
 
 (defun detached-list-narrow-host (hostname)
@@ -284,13 +284,13 @@ Optionally SUPPRESS-OUTPUT."
hostnames
   (when hostname
 (detached-list-narrow-sessions
- `((,(concat "Host: " hostname) .
+ `(,@detached-list--narrow-criteria
+   (,(concat "Host: " hostname) .
 ,(lambda (sessions)
(seq-filter (lambda (it)
  (string-match hostname
(car (detached--session-host it
-   sessions)))
-   ,@detached-list--narrow-criteria
+   sessions)))
 
 (defun detached-list-narrow-output-regexp (regexp)
   "Narrow to sessions which output contain REGEXP."
@@ -299,25 +299,30 @@ Optionally SUPPRESS-OUTPUT."
   "Filter session outputs containing (regexp): ")))
   (when regexp
 (detached-list-narrow-sessions
- `((,(concat "Output: " regexp) .
+ `(,@detached-list--narrow-criteria
+   (,(concat "Output: " regexp) .
 ,(lambda (sessions)
-   (detached--grep-sesssions-output sessions regexp)))
-   ,@detached-list--narrow-criteria
+   (detached--grep-sesssions-output sessions regexp)))
 
 (defun detached-list-narrow-regexp (regexp)
   "Narrow to sessions which command match REGEXP."
   (interactive
-   (list (read-regexp
-  "Filter session commands containing (regexp): ")))
+   (list
+(if current-prefix-arg
+(regexp-quote
+ (detached--session-command
+  (detached--get-session major-mode)))
+(read-regexp
+  "Filter session commands containing (regexp): "
   (when regexp
 (detached-list-narrow-sessions
- `((,(concat "Regexp: " regexp) .
+ `(,@detached-list--narrow-criteria
+   (,(concat "Command: " regexp) .
 ,(lambda (sessions)
(seq-filter (lambda (it)
  (string-match regexp
(detached--session-command it)))
-   sessions)))
-   ,@detached-list--narrow-criteria
+   sessions)))
 
 (defun detached-list-narrow-annotation-regexp (regexp)
   "Narrow to sessions which annotation match REGEXP."
@@ -326,31 +331,31 @@ Optionally SUPPRESS-OUTPUT."
   "Filter session annotations containing (regexp): ")))
   (when regexp
 (detached-list-

[elpa] externals/detached a3a7cd963c 05/10: Remove regexp suffix for some criteria

[ELPA Syncer]

branch: externals/detached
commit a3a7cd963c28a3800204a3c42778c2504b157d00
Author: Niklas Eklund 
Commit: Niklas Eklund 

Remove regexp suffix for some criteria
---
 detached-list.el | 13 +++--
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/detached-list.el b/detached-list.el
index 444e346707..29de7fcdc5 100644
--- a/detached-list.el
+++ b/detached-list.el
@@ -329,7 +329,7 @@ Optionally SUPPRESS-OUTPUT."
(car (detached--session-host it
sessions)))
 
-(defun detached-list-narrow-output-regexp (regexp)
+(defun detached-list-narrow-output (regexp)
   "Narrow to sessions which output contain REGEXP."
   (interactive
(list (read-regexp
@@ -341,7 +341,7 @@ Optionally SUPPRESS-OUTPUT."
 ,(lambda (sessions)
(detached--grep-sesssions-output sessions regexp)))
 
-(defun detached-list-narrow-regexp (regexp)
+(defun detached-list-narrow-command (regexp)
   "Narrow to sessions which command match REGEXP."
   (interactive
(list
@@ -361,7 +361,7 @@ Optionally SUPPRESS-OUTPUT."
(detached--session-command it)))
sessions)))
 
-(defun detached-list-narrow-annotation-regexp (regexp)
+(defun detached-list-narrow-annotation (regexp)
   "Narrow to sessions which annotation match REGEXP."
   (interactive
(list (read-regexp
@@ -791,12 +791,13 @@ If prefix-argument is provided unmark instead of mark."
 (define-key map (kbd "n o") #'detached-list-narrow-origin)
 (define-key map (kbd "n r") #'detached-list-narrow-remote)
 (define-key map (kbd "n s") #'detached-list-narrow-success)
+;; Narrow
+(define-key map (kbd "n c") #'detached-list-narrow-command)
+(define-key map (kbd "n n") #'detached-list-narrow-annotation)
+(define-key map (kbd "n o") #'detached-list-narrow-output)
 (define-key map (kbd "n u") #'detached-list-narrow-unique)
 (define-key map (kbd "n +") #'detached-list-narrow-after-time)
 (define-key map (kbd "n -") #'detached-list-narrow-before-time)
-(define-key map (kbd "n /") #'detached-list-narrow-output-regexp)
-(define-key map (kbd "n % a") #'detached-list-narrow-annotation-regexp)
-(define-key map (kbd "n % c") #'detached-list-narrow-regexp)
 (define-key map (kbd "q") #'detached-list-quit)
 (define-key map (kbd "r") #'detached-list-rerun-session)
 (define-key map (kbd "t") #'detached-list-toggle-mark-session)

[elpa] externals/mmm-mode updated (ed4bcdcbe4 -> 328b6a9c67)

[ELPA Syncer]

elpasync pushed a change to branch externals/mmm-mode.

  from  ed4bcdcbe4 Merge pull request #129 from snogge/info-modernization
   new  4faf89cebb Add .elpaignore file
   new  7912c8bab7 mmm.texi: Use @ifnottex around the top node
   new  0d4aaf963d mmm.texi: Set correct documentencoding UTF-8
   new  328b6a9c67 Merge pull request #132 from snogge/texinfo-fixes


Summary of changes:
 .elpaignore | 32 
 mmm.texi|  6 +++---
 2 files changed, 35 insertions(+), 3 deletions(-)
 create mode 100644 .elpaignore

[elpa] externals/mmm-mode 328b6a9c67 4/4: Merge pull request #132 from snogge/texinfo-fixes

[ELPA Syncer]

branch: externals/mmm-mode
commit 328b6a9c677e6f32f4a7729d122b77d3fb3ce04c
Merge: ed4bcdcbe4 0d4aaf963d
Author: Dmitry Gutov 
Commit: GitHub 

Merge pull request #132 from snogge/texinfo-fixes

Texinfo fixes and .elpaignore file
---
 .elpaignore | 32 
 mmm.texi|  6 +++---
 2 files changed, 35 insertions(+), 3 deletions(-)

diff --git a/.elpaignore b/.elpaignore
new file mode 100644
index 00..b7ad567bf4
--- /dev/null
+++ b/.elpaignore
@@ -0,0 +1,32 @@
+.elpaignore
+.github
+.gitignore
+AUTHORS
+ChangeLog
+Checklist
+FAQ
+INSTALL
+Makefile
+Makefile.am
+Makefile.in
+NEWS
+README
+README.Mason
+TODO
+acinclude.m4
+aclocal.m4
+autogen.sh
+autom4te.cache
+configure
+configure.ac
+configure.in
+elisp-comp
+ert-driver
+install-sh
+mdate-sh
+missing
+mkinstalldirs
+mmm-mode.spec
+mmm.texi
+tests
+texinfo.tex
diff --git a/mmm.texi b/mmm.texi
index 421fdc7b9a..12b2ae6bba 100644
--- a/mmm.texi
+++ b/mmm.texi
@@ -1,6 +1,6 @@
 \input texinfo
 @c %**start of header
-@documentencoding utf-8
+@documentencoding UTF-8
 @setfilename mmm.info
 @settitle MMM Mode Manual
 @c %**end of header
@@ -67,14 +67,14 @@ approved by the Free Software Foundation.
 
 @end titlepage
 
-@ifinfo
+@ifnottex
 @node Top
 @top MMM Mode
 
 MMM Mode is a minor mode for Emacs which allows Multiple Major Modes to
 coexist in a single buffer.
 
-@end ifinfo
+@end ifnottex
 
 @menu
 * Overview::An overview and introduction to MMM Mode.

[elpa] externals/mmm-mode 0d4aaf963d 3/4: mmm.texi: Set correct documentencoding UTF-8

[ELPA Syncer]

branch: externals/mmm-mode
commit 0d4aaf963d86c751883760f93de7af27bb205a54
Author: Ola Nilsson 
Commit: Ola Nilsson 

mmm.texi: Set correct documentencoding UTF-8

Lower case is not understood by tools like pdfTeX.
---
 mmm.texi | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mmm.texi b/mmm.texi
index 2e573ed84c..12b2ae6bba 100644
--- a/mmm.texi
+++ b/mmm.texi
@@ -1,6 +1,6 @@
 \input texinfo
 @c %**start of header
-@documentencoding utf-8
+@documentencoding UTF-8
 @setfilename mmm.info
 @settitle MMM Mode Manual
 @c %**end of header

[elpa] externals/mmm-mode 7912c8bab7 2/4: mmm.texi: Use @ifnottex around the top node

[ELPA Syncer]

branch: externals/mmm-mode
commit 7912c8bab712389bcdb1be16491d4567d1e723b3
Author: Ola Nilsson 
Commit: Ola Nilsson 

mmm.texi: Use @ifnottex around the top node

@ifinfo breaks the generation of html.
---
 mmm.texi | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mmm.texi b/mmm.texi
index 421fdc7b9a..2e573ed84c 100644
--- a/mmm.texi
+++ b/mmm.texi
@@ -67,14 +67,14 @@ approved by the Free Software Foundation.
 
 @end titlepage
 
-@ifinfo
+@ifnottex
 @node Top
 @top MMM Mode
 
 MMM Mode is a minor mode for Emacs which allows Multiple Major Modes to
 coexist in a single buffer.
 
-@end ifinfo
+@end ifnottex
 
 @menu
 * Overview::An overview and introduction to MMM Mode.

[nongnu] elpa/projectile a0105e7c40 1/4: [Fix #1591] Add project.el integration

[ELPA Syncer]

branch: elpa/projectile
commit a0105e7c40d30f10bc42fd271e2583587a1f5ae4
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

[Fix #1591] Add project.el integration
---
 CHANGELOG.md  |  4 
 doc/modules/ROOT/pages/usage.adoc | 14 ++
 projectile.el | 32 
 3 files changed, 50 insertions(+)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 096128f293..bd1b060b96 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,6 +2,10 @@
 
 ## master (unreleased)
 
+### New features
+
+* [#1591](https://github.com/bbatsov/projectile/issues/1591): Add `project.el` 
integration that will make Projectile the default provider for project lookup.
+
 ## 2.6.0 (2022-10-25)
 
 ### New features
diff --git a/doc/modules/ROOT/pages/usage.adoc 
b/doc/modules/ROOT/pages/usage.adoc
index ac1b8e6830..4178f956ed 100644
--- a/doc/modules/ROOT/pages/usage.adoc
+++ b/doc/modules/ROOT/pages/usage.adoc
@@ -379,3 +379,17 @@ You can add additional commands to the commander like this:
 
 
 Place such snippets after ``projectile-mode``'s init code.
+
+== Using Projectile with project.el
+
+Starting with version 2.7 Projectile bundles some integration with
+`project.el` that makes `project.el` use by default Projectile's
+project lookup function (`projectile-project-root`) and project file
+lookup function (`projectile-project-files`).
+
+That's useful as some packages (e.g. `eglot`) support natively only
+`project.el`'s API for project discovery. Fortunately, `project.el`
+makes it easy to install additional project lookup functions and that's
+exactly what Projectile does.
+
+TIP: You can read more about the integration 
https://github.com/bbatsov/projectile/issues/1591[here].
diff --git a/projectile.el b/projectile.el
index 80a5dd6029..8f36c013c1 100644
--- a/projectile.el
+++ b/projectile.el
@@ -5987,6 +5987,38 @@ Otherwise behave as if called interactively.
 ;;;###autoload
 (define-obsolete-function-alias 'projectile-global-mode 'projectile-mode "1.0")
 
+ project.el integration
+;;
+;; Projectile will become the default provider for
+;; project.el project and project files lookup.
+;; See https://github.com/bbatsov/projectile/issues/1591 for
+;; more details.
+
+;; it's safe to require this directly, as it was added in Emacs 25.1
+(require 'project)
+
+(cl-defmethod project-root ((project (head projectile)))
+  (cdr project))
+
+(cl-defmethod project-files ((project (head projectile)) &optional dirs)
+  (let ((root (project-root project)))
+;; Make paths absolute and ignore the optional dirs argument,
+;; see 
https://github.com/bbatsov/projectile/issues/1591#issuecomment-896423965
+;; That's needed because Projectile uses relative paths for project files
+;; and project.el expects them to be absolute.
+;; FIXME: That's probably going to be very slow in large projects.
+(mapcar (lambda (f)
+  (concat f root))
+(projectile-project-files root
+
+(defun project-projectile (dir)
+  "Return Projectile project of form ('projectile . root-dir) for DIR."
+  (let ((root (projectile-project-root dir)))
+(when root
+  (cons 'projectile root
+
+(add-hook 'project-find-functions #'project-projectile)
+
 (provide 'projectile)
 
 ;;; projectile.el ends here

[nongnu] elpa/projectile 00cda4c76f 3/4: Bump the docs version

[ELPA Syncer]

branch: elpa/projectile
commit 00cda4c76f89e94f360792e7a388cbc1843b342a
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Bump the docs version

I totally forgot to do this at release time. :(
---
 doc/antora.yml | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/doc/antora.yml b/doc/antora.yml
index 3c534fb743..ae0c9811e5 100644
--- a/doc/antora.yml
+++ b/doc/antora.yml
@@ -1,5 +1,7 @@
 name: projectile
 title: Projectile
-version: master
+# We always provide version without patch here (e.g. 1.1),
+# as patch versions should not appear in the docs.
+version: 2.6
 nav:
 - modules/ROOT/nav.adoc

[nongnu] elpa/projectile updated (c8eee2199a -> 1c8edb9bf5)

[ELPA Syncer]

elpasync pushed a change to branch elpa/projectile.

  from  c8eee2199a Tweak a couple of changelog entries
   new  a0105e7c40 [Fix #1591] Add project.el integration
   new  eb1881ba82 Bump the dev version
   new  00cda4c76f Bump the docs version
   new  1c8edb9bf5 Switch back the docs version


Summary of changes:
 CHANGELOG.md  |  4 
 doc/antora.yml|  4 +++-
 doc/modules/ROOT/pages/usage.adoc | 14 ++
 projectile.el | 36 ++--
 4 files changed, 55 insertions(+), 3 deletions(-)

[nongnu] elpa/projectile eb1881ba82 2/4: Bump the dev version

[ELPA Syncer]

branch: elpa/projectile
commit eb1881ba826fb43b97c2b18e1441c6326b55
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Bump the dev version
---
 projectile.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/projectile.el b/projectile.el
index 8f36c013c1..4515693114 100644
--- a/projectile.el
+++ b/projectile.el
@@ -5,7 +5,7 @@
 ;; Author: Bozhidar Batsov 
 ;; URL: https://github.com/bbatsov/projectile
 ;; Keywords: project, convenience
-;; Version: 2.6.0
+;; Version: 2.7.0-snapshot
 ;; Package-Requires: ((emacs "25.1"))
 
 ;; This file is NOT part of GNU Emacs.
@@ -850,7 +850,7 @@ Should be set via .dir-locals.el.")
 
 ;;; Version information
 
-(defconst projectile-version "2.6.0"
+(defconst projectile-version "2.7.0-snapshot"
   "The current version of Projectile.")
 
 (defun projectile--pkg-version ()

[nongnu] elpa/projectile 1c8edb9bf5 4/4: Switch back the docs version

[ELPA Syncer]

branch: elpa/projectile
commit 1c8edb9bf5d7b0cfd3c6bb16fa0581972b4a3696
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Switch back the docs version
---
 doc/antora.yml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/doc/antora.yml b/doc/antora.yml
index ae0c9811e5..c17811ed4e 100644
--- a/doc/antora.yml
+++ b/doc/antora.yml
@@ -2,6 +2,6 @@ name: projectile
 title: Projectile
 # We always provide version without patch here (e.g. 1.1),
 # as patch versions should not appear in the docs.
-version: 2.6
+version: ~
 nav:
 - modules/ROOT/nav.adoc

[elpa] externals/mmm-mode 4faf89cebb 1/4: Add .elpaignore file

[ELPA Syncer]

branch: externals/mmm-mode
commit 4faf89cebbbc494899d1b8f54d04a2fa868a1b9e
Author: Ola Nilsson 
Commit: Ola Nilsson 

Add .elpaignore file
---
 .elpaignore | 32 
 1 file changed, 32 insertions(+)

diff --git a/.elpaignore b/.elpaignore
new file mode 100644
index 00..b7ad567bf4
--- /dev/null
+++ b/.elpaignore
@@ -0,0 +1,32 @@
+.elpaignore
+.github
+.gitignore
+AUTHORS
+ChangeLog
+Checklist
+FAQ
+INSTALL
+Makefile
+Makefile.am
+Makefile.in
+NEWS
+README
+README.Mason
+TODO
+acinclude.m4
+aclocal.m4
+autogen.sh
+autom4te.cache
+configure
+configure.ac
+configure.in
+elisp-comp
+ert-driver
+install-sh
+mdate-sh
+missing
+mkinstalldirs
+mmm-mode.spec
+mmm.texi
+tests
+texinfo.tex

[nongnu] elpa/projectile e2ccf0ea2b: Try to appease the byte-compiler

[ELPA Syncer]

branch: elpa/projectile
commit e2ccf0ea2be3e8db21e852f12924d1ed0b37c975
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Try to appease the byte-compiler
---
 projectile.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/projectile.el b/projectile.el
index 4515693114..cf39932d01 100644
--- a/projectile.el
+++ b/projectile.el
@@ -6000,7 +6000,7 @@ Otherwise behave as if called interactively.
 (cl-defmethod project-root ((project (head projectile)))
   (cdr project))
 
-(cl-defmethod project-files ((project (head projectile)) &optional dirs)
+(cl-defmethod project-files ((project (head projectile)) &optional _dirs)
   (let ((root (project-root project)))
 ;; Make paths absolute and ignore the optional dirs argument,
 ;; see 
https://github.com/bbatsov/projectile/issues/1591#issuecomment-896423965

[elpa] externals/detached updated (d0dc9d0f92 -> 565d7bf8d7)

[ELPA Syncer]

elpasync pushed a change to branch externals/detached.

  from  d0dc9d0f92 Merge status and state in detached-list
   new  a1f0a58bd5 Update detached-list bindings
   new  565d7bf8d7 Update eldoc signature


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

[elpa] externals/detached a1f0a58bd5 1/2: Update detached-list bindings

[ELPA Syncer]

branch: externals/detached
commit a1f0a58bd552abce8903b5132754f5999c2ec727
Author: Niklas Eklund 
Commit: Niklas Eklund 

Update detached-list bindings
---
 detached-list.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/detached-list.el b/detached-list.el
index 609a0d5265..5d3688567e 100644
--- a/detached-list.el
+++ b/detached-list.el
@@ -870,13 +870,13 @@ If prefix-argument is provided unmark instead of mark."
 (define-key map (kbd "k") #'detached-list-kill-session)
 (define-key map (kbd "m") #'detached-list-mark-session)
 ;; Narrow
+(define-key map (kbd "n a") #'detached-list-narrow-annotation)
 (define-key map (kbd "n c") #'detached-list-narrow-command)
 (define-key map (kbd "n d") #'detached-list-narrow-session-directory)
 ;; Host
 (define-key map (kbd "n h h") #'detached-list-narrow-host)
 (define-key map (kbd "n h l") #'detached-list-narrow-local)
 (define-key map (kbd "n h r") #'detached-list-narrow-remote)
-(define-key map (kbd "n n") #'detached-list-narrow-annotation)
 (define-key map (kbd "n o") #'detached-list-narrow-output)
 (define-key map (kbd "n O") #'detached-list-narrow-origin)
 ;; State

[elpa] externals/detached 565d7bf8d7 2/2: Update eldoc signature

[ELPA Syncer]

branch: externals/detached
commit 565d7bf8d7c5153d6b3f4c6abc5f989deac1e8b9
Author: Niklas Eklund 
Commit: Niklas Eklund 

Update eldoc signature
---
 detached-list.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/detached-list.el b/detached-list.el
index 5d3688567e..c0002da400 100644
--- a/detached-list.el
+++ b/detached-list.el
@@ -108,9 +108,9 @@ detached list implements."
   "A member of `eldoc-documentation-functions', for signatures."
   (let ((session (tabulated-list-get-id)))
 (when (detached-session-p session)
-  (let ((strs `(,(detached--session-command session)
-,(when-let  ((annotation (detached--session-annotation 
session)))
-   (propertize annotation 'face 
'detached-annotation-face)
+  (let ((strs `(,(when-let  ((annotation (detached--session-annotation 
session)))
+   (propertize annotation 'face 'detached-annotation-face))
+,(detached--session-command session
 (string-join (seq-remove #'null strs) "\n")
 
 (defun detached-list-session-identifier (session)

[nongnu] elpa/projectile 054dce48ef: [Docs] Add a note about the project.el integration in the FAQ

[ELPA Syncer]

branch: elpa/projectile
commit 054dce48ef28bf975089e7dca7e1f2be8b578249
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

[Docs] Add a note about the project.el integration in the FAQ
---
 doc/modules/ROOT/pages/faq.adoc | 7 +++
 1 file changed, 7 insertions(+)

diff --git a/doc/modules/ROOT/pages/faq.adoc b/doc/modules/ROOT/pages/faq.adoc
index 60471d48be..55d098eb20 100644
--- a/doc/modules/ROOT/pages/faq.adoc
+++ b/doc/modules/ROOT/pages/faq.adoc
@@ -27,6 +27,13 @@ yourselves.
 One under-appreciated advantage of Projectile is that it has way more 
documentation.
 Okay, that's only an advantage if you're one of those rare people who enjoy 
reading it.
 
+== Does Projectile provide any integration with `project.el`?
+
+Starting with Projectile 2.7, Projectile will plug automatically its
+project discovery functions in `project.el`. You can find more
+information on the subject in the xref:usage.adoc["Usage"] section of
+the documentation.
+
 == Does Projectile work with TRAMP?
 
 Yeah, it does. I don't use TRAMP myself, however, so I never paid that

[elpa] externals/hiddenquote 8f5ffd27b9: Make hiddenquote-after-last-character-hook a defcustom

[ELPA Syncer]

branch: externals/hiddenquote
commit 8f5ffd27b950f704ecacdcc46c9c3d4a8c02bfe9
Author: Mauro Aranda 
Commit: Mauro Aranda 

Make hiddenquote-after-last-character-hook a defcustom

* hiddenquote.el (hiddenquote-after-last-character-hook): Move it and
make it a defcustom.
---
 hiddenquote.el | 52 +++-
 1 file changed, 27 insertions(+), 25 deletions(-)

diff --git a/hiddenquote.el b/hiddenquote.el
index 4b35099d8b..ed22d637b0 100644
--- a/hiddenquote.el
+++ b/hiddenquote.el
@@ -173,6 +173,16 @@ Syllables window."
 do (set-window-parameter (get-buffer-window buff)
  'no-other-window val)
 
+(defcustom hiddenquote-after-last-character-hook nil
+  "Hook that runs after entering the last character in a word.
+
+Note that this doesn't mean the word is the right word.
+
+It can be handy to run `other-window' in this hook, so you can go directly
+to the syllables buffer."
+  :type 'hook
+  :package-version '(hiddenquote . "1.3"))  
+
 (defgroup hiddenquote-faces nil
   "Faces used by `hiddenquote'."
   :group 'hiddenquote)
@@ -381,23 +391,6 @@ Used locally in the definitions buffer, to 
highlight/unhighlight them.")
   (unless (eobp)
 (forward-char 1)))
 
-(defun hiddenquote--get-quote-length ()
-  "Return the quote length, by looking each word in the widget."
-  ;; We have to do this when the qquote slot is empty.
-  (let* ((puzzle (widget-get hiddenquote-current :hiddenquote))
- (words (widget-get hiddenquote-current :children))
- (arrows (split-string (oref puzzle arrows) ","))
- (len (* (length arrows) (length words)))
- (first-word (car words))
- (last-word (car (last words
-(unless (> (widget-get last-word :hiddenquote-word-length)
-   (string-to-number (car (last arrows
-  (setq len (1- len)))
-(unless (> (widget-get first-word :hiddenquote-word-length)
-   (string-to-number (car arrows)))
-  (setq len (1- len)))
-len))
-
 ;; Classes.
 ;; A `hiddenquote-hidden-quote-puzzle' represents a hidden quote puzzle,
 ;; following closely its ipuz spec.
@@ -938,14 +931,6 @@ Notify the widget between FROM and TO about a change."
 (error "Change in different fields"))
   (widget-apply field :notify field (list 'after-change from to)
 
-(defvar hiddenquote-after-last-character-hook nil
-  "Hook that runs after entering the last character in a word.
-
-Note that this doesn't mean the word is the right word.
-
-It can be handy to run `other-window' in this hook, so you can go directly
-to the syllables buffer.")
-
 (defun hiddenquote-word-notify (widget child event)
   "Notify the `hiddenquote-word' widget WIDGET about a change in CHILD.
 
@@ -1132,6 +1117,23 @@ Return `hiddenquote-used-syllable' if WIDGET's value is 
non-nil,
 (hiddenquote-timer-stop-timer)))
 
 ;; Functions.
+(defun hiddenquote--get-quote-length ()
+  "Return the quote length, by looking each word in the widget."
+  ;; We have to do this when the qquote slot is empty.
+  (let* ((puzzle (widget-get hiddenquote-current :hiddenquote))
+ (words (widget-get hiddenquote-current :children))
+ (arrows (split-string (oref puzzle arrows) ","))
+ (len (* (length arrows) (length words)))
+ (first-word (car words))
+ (last-word (car (last words
+(unless (> (widget-get last-word :hiddenquote-word-length)
+   (string-to-number (car (last arrows
+  (setq len (1- len)))
+(unless (> (widget-get first-word :hiddenquote-word-length)
+   (string-to-number (car arrows)))
+  (setq len (1- len)))
+len))
+
 (defun hiddenquote-puzzle-from-ipuz (ipuz)
   "Return a `hiddenquote-hidden-quote-puzzle' instance specified by IPUZ."
   (let* ((json (json-read-from-string ipuz))

[nongnu] elpa/lua-mode 3e783c93aa 2/2: Merge pull request #203 from hillu/lexical-test

[ELPA Syncer]

branch: elpa/lua-mode
commit 3e783c93aa8a3d3ca985686438aa8d140cbddae6
Merge: d17a00ca50 348e69b3a5
Author: immerrr again 
Commit: GitHub 

Merge pull request #203 from hillu/lexical-test

Enable lexical-binding for tests as required by buttercup
---
 test/test-electric-mode.el| 2 +-
 test/test-fill.el | 2 +-
 test/test-font-lock.el| 2 +-
 test/test-funcname-at-point.el| 2 +-
 test/test-generic.el  | 2 +-
 test/test-indentation.el  | 2 +-
 test/test-inferior-process.el | 2 +-
 test/test-process.el  | 2 +-
 test/test-strings-and-comments.el | 2 +-
 test/utils.el | 3 ++-
 10 files changed, 11 insertions(+), 10 deletions(-)

diff --git a/test/test-electric-mode.el b/test/test-electric-mode.el
index d88b4a3dca..39a32bf8e1 100644
--- a/test/test-electric-mode.el
+++ b/test/test-electric-mode.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
diff --git a/test/test-fill.el b/test/test-fill.el
index 75089f8906..44de7619e7 100644
--- a/test/test-fill.el
+++ b/test/test-fill.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
   "utils.el") nil 'nomessage 'nosuffix)
diff --git a/test/test-font-lock.el b/test/test-font-lock.el
index 8fbb9747fc..7fa5f58580 100644
--- a/test/test-font-lock.el
+++ b/test/test-font-lock.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
diff --git a/test/test-funcname-at-point.el b/test/test-funcname-at-point.el
index 0ca220a5a0..3368d1edf5 100644
--- a/test/test-funcname-at-point.el
+++ b/test/test-funcname-at-point.el
@@ -1,4 +1,4 @@
-;;; test-funcname-at-point.el --- Test `lua-funcname-at-point'
+;;; test-funcname-at-point.el --- Test `lua-funcname-at-point'  -*- 
lexical-binding:t -*-
 
 ;;; Commentary:
 
diff --git a/test/test-generic.el b/test/test-generic.el
index 796db3bee6..a4e1ac3a27 100644
--- a/test/test-generic.el
+++ b/test/test-generic.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
   "utils.el") nil 'nomessage 'nosuffix)
diff --git a/test/test-indentation.el b/test/test-indentation.el
index d58150445f..fff9bdd6e6 100644
--- a/test/test-indentation.el
+++ b/test/test-indentation.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 ;; -*- lexical-binding: t -*-
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
diff --git a/test/test-inferior-process.el b/test/test-inferior-process.el
index 2d160a078e..6a4083e731 100644
--- a/test/test-inferior-process.el
+++ b/test/test-inferior-process.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
   "utils.el") nil 'nomessage 'nosuffix)
diff --git a/test/test-process.el b/test/test-process.el
index 5f3870e2b1..a6ab026cf4 100644
--- a/test/test-process.el
+++ b/test/test-process.el
@@ -1,4 +1,4 @@
-;;; test-funcname-at-point.el --- Test the repl functions
+;;; test-funcname-at-point.el --- Test the repl functions -*- 
lexical-binding:t -*-
 
 ;;; Commentary:
 
diff --git a/test/test-strings-and-comments.el 
b/test/test-strings-and-comments.el
index cf928ebe24..c2f334721a 100644
--- a/test/test-strings-and-comments.el
+++ b/test/test-strings-and-comments.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
diff --git a/test/utils.el b/test/utils.el
index b8f26be548..60515c7f74 100644
--- a/test/utils.el
+++ b/test/utils.el
@@ -1,4 +1,5 @@
-;;

[nongnu] elpa/lua-mode 348e69b3a5 1/2: Enable lexical-binding for tests as required by buttercup

[ELPA Syncer]

branch: elpa/lua-mode
commit 348e69b3a5b8b0ebaac1da8dfedcd4c7c79fe7d8
Author: Hilko Bengen 
Commit: Hilko Bengen 

Enable lexical-binding for tests as required by buttercup

Tests broke using buttercup 1.26, this commit fixes the breakage by
simply enabling lexical binding in all test-related files.

See also: https://github.com/jorgenschaefer/emacs-buttercup/issues/226
---
 test/test-electric-mode.el| 2 +-
 test/test-fill.el | 2 +-
 test/test-font-lock.el| 2 +-
 test/test-funcname-at-point.el| 2 +-
 test/test-generic.el  | 2 +-
 test/test-indentation.el  | 2 +-
 test/test-inferior-process.el | 2 +-
 test/test-process.el  | 2 +-
 test/test-strings-and-comments.el | 2 +-
 test/utils.el | 3 ++-
 10 files changed, 11 insertions(+), 10 deletions(-)

diff --git a/test/test-electric-mode.el b/test/test-electric-mode.el
index d88b4a3dca..39a32bf8e1 100644
--- a/test/test-electric-mode.el
+++ b/test/test-electric-mode.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
diff --git a/test/test-fill.el b/test/test-fill.el
index 75089f8906..44de7619e7 100644
--- a/test/test-fill.el
+++ b/test/test-fill.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
   "utils.el") nil 'nomessage 'nosuffix)
diff --git a/test/test-font-lock.el b/test/test-font-lock.el
index 8fbb9747fc..7fa5f58580 100644
--- a/test/test-font-lock.el
+++ b/test/test-font-lock.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
diff --git a/test/test-funcname-at-point.el b/test/test-funcname-at-point.el
index 0ca220a5a0..3368d1edf5 100644
--- a/test/test-funcname-at-point.el
+++ b/test/test-funcname-at-point.el
@@ -1,4 +1,4 @@
-;;; test-funcname-at-point.el --- Test `lua-funcname-at-point'
+;;; test-funcname-at-point.el --- Test `lua-funcname-at-point'  -*- 
lexical-binding:t -*-
 
 ;;; Commentary:
 
diff --git a/test/test-generic.el b/test/test-generic.el
index 796db3bee6..a4e1ac3a27 100644
--- a/test/test-generic.el
+++ b/test/test-generic.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
   "utils.el") nil 'nomessage 'nosuffix)
diff --git a/test/test-indentation.el b/test/test-indentation.el
index d58150445f..fff9bdd6e6 100644
--- a/test/test-indentation.el
+++ b/test/test-indentation.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 ;; -*- lexical-binding: t -*-
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
diff --git a/test/test-inferior-process.el b/test/test-inferior-process.el
index 2d160a078e..6a4083e731 100644
--- a/test/test-inferior-process.el
+++ b/test/test-inferior-process.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))
   "utils.el") nil 'nomessage 'nosuffix)
diff --git a/test/test-process.el b/test/test-process.el
index 5f3870e2b1..a6ab026cf4 100644
--- a/test/test-process.el
+++ b/test/test-process.el
@@ -1,4 +1,4 @@
-;;; test-funcname-at-point.el --- Test the repl functions
+;;; test-funcname-at-point.el --- Test the repl functions -*- 
lexical-binding:t -*-
 
 ;;; Commentary:
 
diff --git a/test/test-strings-and-comments.el 
b/test/test-strings-and-comments.el
index cf928ebe24..c2f334721a 100644
--- a/test/test-strings-and-comments.el
+++ b/test/test-strings-and-comments.el
@@ -1,4 +1,4 @@
-;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) -*-
+;; -*- flycheck-disabled-checkers: (emacs-lisp-checkdoc) ; lexical-binding:t 
-*-
 
 (load (concat (file-name-directory (or load-file-name (buffer-file-name)
default-directory))

[elpa] externals/denote updated (ee69daee74 -> 68d8ea7d03)

[ELPA Syncer]

elpasync pushed a change to branch externals/denote.

  from  ee69daee74 Update sample configuration, per b313dfc
   new  20e5870af9 Update xrefs-alist -> xref-alist
   new  68d8ea7d03 Remove superfluous 'funcall'


Summary of changes:
 denote.el | 32 
 1 file changed, 16 insertions(+), 16 deletions(-)

[elpa] externals/denote 68d8ea7d03 2/2: Remove superfluous 'funcall'

[ELPA Syncer]

branch: externals/denote
commit 68d8ea7d035f3d2487af72358b758037dc375a9a
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Remove superfluous 'funcall'

Thanks to Noboru Ota for pointing it out:

.
---
 denote.el | 8 
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/denote.el b/denote.el
index 1b25aa5f52..8a6b2e1d0f 100644
--- a/denote.el
+++ b/denote.el
@@ -2606,8 +2606,8 @@ from point (relevant when `denote-backlinks-show-context' 
is
 nil)."
   (interactive "p" denote-backlinks-mode)
   (if denote-backlinks-show-context
-  (funcall #'xref-next-line)
-(funcall #'forward-button n)))
+  (xref-next-line)
+(forward-button n)))
 
 (defun denote-backlinks-prev (&optional n)
   "Use appropriate command for backward motion in backlinks buffer.
@@ -2616,8 +2616,8 @@ from point (relevant when `denote-backlinks-show-context' 
is
 nil)."
   (interactive "p" denote-backlinks-mode)
   (if denote-backlinks-show-context
-  (funcall #'xref-prev-line)
-(funcall #'backward-button n)))
+  (xref-prev-line)
+(backward-button n)))
 
 (defvar denote-backlinks-mode-map
   (let ((m (make-sparse-keymap)))

[elpa] externals/denote 20e5870af9 1/2: Update xrefs-alist -> xref-alist

[ELPA Syncer]

branch: externals/denote
commit 20e5870af99d091e795bfc1ff3a33d0d4715001b
Author: Noboru Ota 
Commit: Protesilaos Stavrou 

Update xrefs-alist -> xref-alist

No functional change. 'xref-alist' is the convention that Xref follows.
---
 denote.el | 24 
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/denote.el b/denote.el
index a2a0a14b5b..1b25aa5f52 100644
--- a/denote.el
+++ b/denote.el
@@ -1154,14 +1154,14 @@ The xrefs are returned as an alist."
(lambda (x)
  (xref-location-group (xref-item-location x)
 
-(defun denote--retrieve-files-in-xrefs (xrefs-alist)
-  "Return sorted, deduplicated file names from XREFS-ALIST."
+(defun denote--retrieve-files-in-xrefs (xref-alist)
+  "Return sorted, deduplicated file names from XREF-ALIST."
   (sort
-   (delete-dups (mapcar #'car xrefs-alist))
+   (delete-dups (mapcar #'car xref-alist))
#'string-lessp))
 
 (defun denote--retrieve-process-grep (identifier)
-  "Process lines matching IDENTIFIER and return list of xrefs-alist."
+  "Process lines matching IDENTIFIER and return list of xref-alist."
   (assoc-delete-all (buffer-file-name)
 (denote--retrieve-xrefs identifier)))
 
@@ -2636,8 +2636,8 @@ nil)."
 
 (make-obsolete-variable 'denote-backlink-mode 'denote-backlinks-mode "0.6.0")
 
-(defun denote-link--prepare-backlinks (id xrefs-alist &optional title)
-  "Create backlinks' buffer for ID using XREFS-ALIST.
+(defun denote-link--prepare-backlinks (id xref-alist &optional title)
+  "Create backlinks' buffer for ID using XREF-ALIST.
 Use optional TITLE for a prettier heading."
   (let ((inhibit-read-only t)
 (buf (format "*denote-backlinks to %s*" id))
@@ -2653,18 +2653,18 @@ Use optional TITLE for a prettier heading."
 (insert (format "%s\n%s\n\n" heading (make-string l ?-
   ;;; We could have a user option to use the current backlink buffer
   (if denote-backlinks-show-context
-  (denote-xref--insert-xrefs xrefs-alist)
+  (denote-xref--insert-xrefs xref-alist)
 (mapc (lambda (x)
 (insert (denote-get-file-name-relative-to-denote-directory 
(car x)))
 (make-button (line-beginning-position) (line-end-position) 
:type 'denote-link-backlink-button)
 (newline))
-  xrefs-alist))
+  xref-alist))
   (goto-char (point-min))
   (setq-local revert-buffer-function
   (lambda (_ignore-auto _noconfirm)
 (when-let ((buffer-file-name file)
-   (xrefs-alist (denote--retrieve-process-grep 
id)))
-  (denote-link--prepare-backlinks id xrefs-alist title)
+   (xref-alist (denote--retrieve-process-grep id)))
+  (denote-link--prepare-backlinks id xref-alist title)
 (denote-link--display-buffer buf)))
 
 (defun denote-xref--insert-xrefs (xref-alist)
@@ -2739,9 +2739,9 @@ default, it will show up below the current window."
   (let* ((id (denote-retrieve-filename-identifier file))
  (file-type (denote-filetype-heuristics file))
  (title (denote-retrieve-title-value file file-type)))
-(if-let ((xrefs-alist (denote--retrieve-process-grep id)))
+(if-let ((xref-alist (denote--retrieve-process-grep id)))
 (progn (xref--push-markers)
-   (denote-link--prepare-backlinks id xrefs-alist title))
+   (denote-link--prepare-backlinks id xref-alist title))
   (user-error "No links to the current note"))
 
 (defalias 'denote-link-show-backlinks-buffer (symbol-function 
'denote-link-backlinks))

[nongnu] elpa/php-mode 9424e19eb5 3/4: Update CHANGELOG

[ELPA Syncer]

branch: elpa/php-mode
commit 9424e19eb5b2916b5e4fe1ab70b9408734f78462
Author: USAMI Kenta 
Commit: USAMI Kenta 

Update CHANGELOG
---
 CHANGELOG.md | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 426174e365..27b4cbde58 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -8,6 +8,7 @@ All notable changes of the PHP Mode 1.19.1 release series are 
documented in this
 
  * **New feature: `php-complete`**
* Add `php-complete-complete-function` to autocomplete function names 
([#708])
+ * Supports PHPDoc tags and types for static analysis tools ([#710])
 
 ### Changed
 
@@ -22,6 +23,7 @@ All notable changes of the PHP Mode 1.19.1 release series are 
documented in this
 [#704]: https://github.com/emacs-php/php-mode/pull/704
 [#707]: https://github.com/emacs-php/php-mode/pull/707
 [#708]: https://github.com/emacs-php/php-mode/pull/708
+[#710]: https://github.com/emacs-php/php-mode/pull/710
 
 ## [1.24.1] - 2022-10-08
 

[nongnu] elpa/projectile updated (054dce48ef -> f5a2a3ab26)

[ELPA Syncer]

elpasync pushed a change to branch elpa/projectile.

  from  054dce48ef [Docs] Add a note about the project.el integration in 
the FAQ
   new  18b48d7faa [Fix #1754] `projectile-open-projects` lists projects 
for which all buffers are closed
   new  f5a2a3ab26 [Fix #1804] Make it possible to ignore special project 
buffers


Summary of changes:
 CHANGELOG.md|  5 +
 projectile.el   | 36 ++--
 test/projectile-test.el | 14 ++
 3 files changed, 53 insertions(+), 2 deletions(-)

[nongnu] elpa/projectile 18b48d7faa 1/2: [Fix #1754] `projectile-open-projects` lists projects for which all buffers are closed

[ELPA Syncer]

branch: elpa/projectile
commit 18b48d7faa27a3113558e389a60d912e739d0526
Author: Miles Liu 
Commit: Bozhidar Batsov 

[Fix #1754] `projectile-open-projects` lists projects for which all buffers 
are closed
---
 CHANGELOG.md  | 4 
 projectile.el | 5 +++--
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index bd1b060b96..11d16b0ce9 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -6,6 +6,10 @@
 
 * [#1591](https://github.com/bbatsov/projectile/issues/1591): Add `project.el` 
integration that will make Projectile the default provider for project lookup.
 
+### Bug fixed
+
+* [#1799](https://github.com/bbatsov/projectile/pull/1799): Fix 
`projectile-open-projects` lists projects for which all buffers are closed.
+
 ## 2.6.0 (2022-10-25)
 
 ### New features
diff --git a/projectile.el b/projectile.el
index cf39932d01..8e8b34a2eb 100644
--- a/projectile.el
+++ b/projectile.el
@@ -5192,8 +5192,9 @@ An open project is a project with any open buffers."
(delq nil
  (mapcar (lambda (buffer)
(with-current-buffer buffer
- (when (projectile-project-p)
-   (abbreviate-file-name (projectile-project-root)
+ (when-let ((project-root (projectile-project-root)))
+   (when (projectile-project-buffer-p buffer project-root)
+ (abbreviate-file-name project-root)
  (buffer-list)
 
 (defun projectile--remove-current-project (projects)

[nongnu] elpa/php-mode 0526c4310a 4/4: Merge pull request #710 from emacs-php/feature/phpdoc-type-names

[ELPA Syncer]

branch: elpa/php-mode
commit 0526c4310ae9c6be8e70553b8d894f5e4e7f117e
Merge: 29bbf49cd5 9424e19eb5
Author: USAMI Kenta 
Commit: GitHub 

Merge pull request #710 from emacs-php/feature/phpdoc-type-names

Supports PHPDoc tags and types for static analysis tools
---
 CHANGELOG.md |  2 ++
 lisp/php-mode.el | 12 ++--
 tests/lang/doc-comment/return-type.php.faces | 20 +++-
 3 files changed, 27 insertions(+), 7 deletions(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 426174e365..27b4cbde58 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -8,6 +8,7 @@ All notable changes of the PHP Mode 1.19.1 release series are 
documented in this
 
  * **New feature: `php-complete`**
* Add `php-complete-complete-function` to autocomplete function names 
([#708])
+ * Supports PHPDoc tags and types for static analysis tools ([#710])
 
 ### Changed
 
@@ -22,6 +23,7 @@ All notable changes of the PHP Mode 1.19.1 release series are 
documented in this
 [#704]: https://github.com/emacs-php/php-mode/pull/704
 [#707]: https://github.com/emacs-php/php-mode/pull/707
 [#708]: https://github.com/emacs-php/php-mode/pull/708
+[#710]: https://github.com/emacs-php/php-mode/pull/710
 
 ## [1.24.1] - 2022-10-08
 
diff --git a/lisp/php-mode.el b/lisp/php-mode.el
index 241e2c9697..e1ee50d8b9 100644
--- a/lisp/php-mode.el
+++ b/lisp/php-mode.el
@@ -1279,7 +1279,15 @@ for \\[find-tag] (which see)."
   (list "string" "integer" "int" "boolean" "bool" "float"
 "double" "object" "mixed" "array" "resource"
 "void" "null" "false" "true" "self" "static"
-"callable" "iterable" "number"))
+"callable" "iterable" "number"
+;; PHPStan and Psalm types
+"array-key" "associative-array" "callable-array" "callable-object"
+"callable-string" "class-string" "empty" "enum-string" "list"
+"literal-string" "negative-int" "non-positive-int" "non-negative-int"
+"never" "never-return" "never-returns" "no-return" "non-empty-array"
+"non-empty-list" "non-empty-string" "non-falsy-string"
+"numeric" "numeric-string" "positive-int" "scalar"
+"trait-string" "truthy-string"))
 
 (defconst php-phpdoc-type-tags
   (list "package" "param" "property" "property-read" "property-write"
@@ -1293,7 +1301,7 @@ for \\[find-tag] (which see)."
  (1 'php-doc-variable-sigil prepend nil)
  (2 'php-variable-name prepend nil))
 ("\\(\\$\\)\\(this\\)\\>" (1 'php-doc-$this-sigil prepend nil) (2 
'php-doc-$this prepend nil))
-(,(concat "\\s-@" (regexp-opt php-phpdoc-type-tags) "\\s-+"
+(,(concat "\\s-@" (rx (? (or "phpstan" "psalm") "-")) (regexp-opt 
php-phpdoc-type-tags) "\\s-+"
   "\\(" (rx (+ (? "?") (? "\\") (+ (in "0-9A-Z_a-z")) (? "[]") (? 
"|"))) "\\)+")
  1 'php-string prepend nil)
 (,(concat "\\(?:|\\|\\?\\|\\s-\\)\\("
diff --git a/tests/lang/doc-comment/return-type.php.faces 
b/tests/lang/doc-comment/return-type.php.faces
index 13d08f2fc8..7bc8a8ec17 100644
--- a/tests/lang/doc-comment/return-type.php.faces
+++ b/tests/lang/doc-comment/return-type.php.faces
@@ -32,7 +32,9 @@
  (" " . font-lock-doc-face)
  ("int" font-lock-type-face php-string font-lock-doc-face)
  ("[]" php-string font-lock-doc-face)
- (" A list of " . font-lock-doc-face)
+ (" A " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of " . font-lock-doc-face)
  ("integer" font-lock-type-face font-lock-doc-face)
  (" values */" . font-lock-doc-face)
  ("\n\n\n")
@@ -59,7 +61,9 @@
  ("@return" php-doc-annotation-tag font-lock-doc-face)
  (" " . font-lock-doc-face)
  ("DateTime[]" php-string font-lock-doc-face)
- (" A list of DateTime " . font-lock-doc-face)
+ (" A " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of DateTime " . font-lock-doc-face)
  ("object" font-lock-type-face font-lock-doc-face)
  (" values */" . font-lock-doc-face)
  ("\n\n\n")
@@ -86,7 +90,9 @@
  ("@return" php-doc-annotation-tag font-lock-doc-face)
  (" " . font-lock-doc-face)
  ("stdClass[]" php-string font-lock-doc-face)
- (" A list of stdClass " . font-lock-doc-face)
+ (" A " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of stdClass " . font-lock-doc-face)
  ("object" font-lock-type-face font-lock-doc-face)
  (" values */" . font-lock-doc-face)
  ("\n\n")
@@ -113,7 +119,9 @@
  ("@return" php-doc-annotation-tag font-lock-doc-face)
  (" " . font-lock-doc-face)
  ("\\App\\User[]" php-string font-lock-doc-face)
- (" A list of \\App\\User " . font-lock-doc-face)
+ (" A " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of \\App\\User " . font-lock-doc-face)
  ("object" font-lock-type-face font-lock-doc-face)
  (" values */" . font-lock-doc-face)
  ("\n\n")
@@ -138,7 +146,9 @@
  ("int" font-lock-type-face php-string font-lock-doc-face)
  ("[]|" php-string font-lock-doc-face)
  ("string" font-lock-type-face php-st

[nongnu] elpa/php-mode updated (29bbf49cd5 -> 0526c4310a)

[ELPA Syncer]

elpasync pushed a change to branch elpa/php-mode.

  from  29bbf49cd5 Update Cask
   new  6abc9964d9 Add PHPStan and Psalm type names to 
php-phpdoc-type-keywords
   new  fa8a969bb1 Support prefixed tags in phpstan- and psalm-
   new  9424e19eb5 Update CHANGELOG
   new  0526c4310a Merge pull request #710 from 
emacs-php/feature/phpdoc-type-names


Summary of changes:
 CHANGELOG.md |  2 ++
 lisp/php-mode.el | 12 ++--
 tests/lang/doc-comment/return-type.php.faces | 20 +++-
 3 files changed, 27 insertions(+), 7 deletions(-)

[nongnu] elpa/php-mode fa8a969bb1 2/4: Support prefixed tags in phpstan- and psalm-

[ELPA Syncer]

branch: elpa/php-mode
commit fa8a969bb1e7e2a2723a0d146fb71a2602662877
Author: USAMI Kenta 
Commit: USAMI Kenta 

Support prefixed tags in phpstan- and psalm-
---
 lisp/php-mode.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/php-mode.el b/lisp/php-mode.el
index 82ee54dbcb..e1ee50d8b9 100644
--- a/lisp/php-mode.el
+++ b/lisp/php-mode.el
@@ -1301,7 +1301,7 @@ for \\[find-tag] (which see)."
  (1 'php-doc-variable-sigil prepend nil)
  (2 'php-variable-name prepend nil))
 ("\\(\\$\\)\\(this\\)\\>" (1 'php-doc-$this-sigil prepend nil) (2 
'php-doc-$this prepend nil))
-(,(concat "\\s-@" (regexp-opt php-phpdoc-type-tags) "\\s-+"
+(,(concat "\\s-@" (rx (? (or "phpstan" "psalm") "-")) (regexp-opt 
php-phpdoc-type-tags) "\\s-+"
   "\\(" (rx (+ (? "?") (? "\\") (+ (in "0-9A-Z_a-z")) (? "[]") (? 
"|"))) "\\)+")
  1 'php-string prepend nil)
 (,(concat "\\(?:|\\|\\?\\|\\s-\\)\\("

[nongnu] elpa/php-mode 6abc9964d9 1/4: Add PHPStan and Psalm type names to php-phpdoc-type-keywords

[ELPA Syncer]

branch: elpa/php-mode
commit 6abc9964d9611c557d81c0b34733a22096523ed7
Author: USAMI Kenta 
Commit: USAMI Kenta 

Add PHPStan and Psalm type names to php-phpdoc-type-keywords
---
 lisp/php-mode.el | 10 +-
 tests/lang/doc-comment/return-type.php.faces | 20 +++-
 2 files changed, 24 insertions(+), 6 deletions(-)

diff --git a/lisp/php-mode.el b/lisp/php-mode.el
index 241e2c9697..82ee54dbcb 100644
--- a/lisp/php-mode.el
+++ b/lisp/php-mode.el
@@ -1279,7 +1279,15 @@ for \\[find-tag] (which see)."
   (list "string" "integer" "int" "boolean" "bool" "float"
 "double" "object" "mixed" "array" "resource"
 "void" "null" "false" "true" "self" "static"
-"callable" "iterable" "number"))
+"callable" "iterable" "number"
+;; PHPStan and Psalm types
+"array-key" "associative-array" "callable-array" "callable-object"
+"callable-string" "class-string" "empty" "enum-string" "list"
+"literal-string" "negative-int" "non-positive-int" "non-negative-int"
+"never" "never-return" "never-returns" "no-return" "non-empty-array"
+"non-empty-list" "non-empty-string" "non-falsy-string"
+"numeric" "numeric-string" "positive-int" "scalar"
+"trait-string" "truthy-string"))
 
 (defconst php-phpdoc-type-tags
   (list "package" "param" "property" "property-read" "property-write"
diff --git a/tests/lang/doc-comment/return-type.php.faces 
b/tests/lang/doc-comment/return-type.php.faces
index 13d08f2fc8..7bc8a8ec17 100644
--- a/tests/lang/doc-comment/return-type.php.faces
+++ b/tests/lang/doc-comment/return-type.php.faces
@@ -32,7 +32,9 @@
  (" " . font-lock-doc-face)
  ("int" font-lock-type-face php-string font-lock-doc-face)
  ("[]" php-string font-lock-doc-face)
- (" A list of " . font-lock-doc-face)
+ (" A " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of " . font-lock-doc-face)
  ("integer" font-lock-type-face font-lock-doc-face)
  (" values */" . font-lock-doc-face)
  ("\n\n\n")
@@ -59,7 +61,9 @@
  ("@return" php-doc-annotation-tag font-lock-doc-face)
  (" " . font-lock-doc-face)
  ("DateTime[]" php-string font-lock-doc-face)
- (" A list of DateTime " . font-lock-doc-face)
+ (" A " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of DateTime " . font-lock-doc-face)
  ("object" font-lock-type-face font-lock-doc-face)
  (" values */" . font-lock-doc-face)
  ("\n\n\n")
@@ -86,7 +90,9 @@
  ("@return" php-doc-annotation-tag font-lock-doc-face)
  (" " . font-lock-doc-face)
  ("stdClass[]" php-string font-lock-doc-face)
- (" A list of stdClass " . font-lock-doc-face)
+ (" A " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of stdClass " . font-lock-doc-face)
  ("object" font-lock-type-face font-lock-doc-face)
  (" values */" . font-lock-doc-face)
  ("\n\n")
@@ -113,7 +119,9 @@
  ("@return" php-doc-annotation-tag font-lock-doc-face)
  (" " . font-lock-doc-face)
  ("\\App\\User[]" php-string font-lock-doc-face)
- (" A list of \\App\\User " . font-lock-doc-face)
+ (" A " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of \\App\\User " . font-lock-doc-face)
  ("object" font-lock-type-face font-lock-doc-face)
  (" values */" . font-lock-doc-face)
  ("\n\n")
@@ -138,7 +146,9 @@
  ("int" font-lock-type-face php-string font-lock-doc-face)
  ("[]|" php-string font-lock-doc-face)
  ("string" font-lock-type-face php-string font-lock-doc-face)
- ("  Multiple types by list of " . font-lock-doc-face)
+ ("  Multiple types by " . font-lock-doc-face)
+ ("list" font-lock-type-face font-lock-doc-face)
+ (" of " . font-lock-doc-face)
  ("int" font-lock-type-face font-lock-doc-face)
  (" and " . font-lock-doc-face)
  ("string" font-lock-type-face font-lock-doc-face)

[nongnu] elpa/projectile f5a2a3ab26 2/2: [Fix #1804] Make it possible to ignore special project buffers

[ELPA Syncer]

branch: elpa/projectile
commit f5a2a3ab268b905c796de255e04790e6e69a61ab
Author: Miles Liu 
Commit: Bozhidar Batsov 

[Fix #1804] Make it possible to ignore special project buffers
---
 CHANGELOG.md|  1 +
 projectile.el   | 31 +++
 test/projectile-test.el | 14 ++
 3 files changed, 46 insertions(+)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 11d16b0ce9..086e48553c 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -5,6 +5,7 @@
 ### New features
 
 * [#1591](https://github.com/bbatsov/projectile/issues/1591): Add `project.el` 
integration that will make Projectile the default provider for project lookup.
+* [#1799](https://github.com/bbatsov/projectile/pull/1799): Make it possible 
to ignore special project buffers.
 
 ### Bug fixed
 
diff --git a/projectile.el b/projectile.el
index 8e8b34a2eb..9041cd9ad3 100644
--- a/projectile.el
+++ b/projectile.el
@@ -822,6 +822,27 @@ If the value is nil, there is no limit to the opend 
buffers count."
   :type 'integer
   :package-version '(projectile . "2.2.0"))
 
+(defcustom projectile-ignore-special-project-buffers t
+  "When t ignore special project buffers.
+
+See `projectile-ignored-project-buffers'."
+  :group 'projectile
+  :type 'boolean
+  :package-version '(projectile . "2.7.0"))
+
+(defcustom projectile-ignored-project-buffers
+  '(
+"*scratch*"  ; Lisp Interaction Buffer
+"*lsp-log*"  ; LSP Mode Troubleshooting Buffer
+)
+  "A list of buffers considered that should never be killed or
+associated with any specific project.
+
+See `projectile-ignore-special-project-buffers'."
+  :group 'projectile
+  :type '(repeat string)
+  :package-version '(projectile . "2.7.0"))
+
 (defvar projectile-project-test-suffix nil
   "Use this variable to override the current project's test-suffix property.
 It takes precedence over the test-suffix for the project type when set.
@@ -1641,12 +1662,22 @@ If PROJECT is not specified the command acts on the 
current project."
default-directory)))
   (and (not (string-prefix-p " " (buffer-name buffer)))
(not (projectile-ignored-buffer-p buffer))
+   (not (projectile-ignored-project-buffers-p buffer))
directory
(string-equal (file-remote-p directory)
  (file-remote-p project-root))
(not (string-match-p "^http\\(s\\)?://" directory))
(string-prefix-p project-root (file-truename directory) (eq 
system-type 'windows-nt))
 
+(defun projectile-ignored-project-buffers-p (buffer)
+  "Check if BUFFER should never associated with any specific project"
+  (when projectile-ignore-special-project-buffers
+(with-current-buffer buffer
+  (cl-some
+   (lambda (name)
+ (string-match-p name (buffer-name)))
+   projectile-ignored-project-buffers
+
 (defun projectile-ignored-buffer-p (buffer)
   "Check if BUFFER should be ignored.
 
diff --git a/test/projectile-test.el b/test/projectile-test.el
index 875b01ec52..cf445a10f3 100644
--- a/test/projectile-test.el
+++ b/test/projectile-test.el
@@ -1038,6 +1038,20 @@ Just delegates OPERATION and ARGS for all operations 
except for`shell-command`'.
 
   (expect (current-buffer) :to-be (get-file-buffer 
"project/file")))
 
+(describe "projectile-ignored-project-buffers-p"
+  (it "checks if buffer should never associated with any specific project"
+(let ((projectile-ignore-special-project-buffers t)
+  (projectile-ignored-project-buffers '("*nrepl messages*" 
"*something*")))
+  (expect (projectile-ignored-project-buffers-p (get-buffer-create "*nrepl 
messages*")) :to-be-truthy)
+  (expect (projectile-ignored-project-buffers-p (get-buffer-create 
"*something*")) :to-be-truthy)
+  (expect (projectile-ignored-project-buffers-p (get-buffer-create 
"test")) :not :to-be-truthy)))
+  (it "check if buffer should not ignored when not enabled"
+(let ((projectile-ignore-special-project-buffers nil)
+  (projectile-ignored-project-buffers '("*nrepl messages*" 
"*something*")))
+  (expect (projectile-ignored-project-buffers-p (get-buffer-create "*nrepl 
messages*")) :not :to-be-truthy)
+  (expect (projectile-ignored-project-buffers-p (get-buffer-create 
"*something*")) :not :to-be-truthy)
+  (expect (projectile-ignored-project-buffers-p (get-buffer-create 
"test")) :not :to-be-truthy
+
 (describe "projectile-ignored-buffer-p"
   (it "checks if buffer should be ignored"
 (let ((projectile-globally-ignored-buffers '("*nrepl messages*" 
"*something*")))

[elpa] main f020b5af01: * elpa-packages (use-package): Add `:readme`

[Stefan Monnier via]

branch: main
commit f020b5af01e200445ce5bf5da892d04156b6d1bd
Author: Stefan Monnier 
Commit: Stefan Monnier 

* elpa-packages (use-package): Add `:readme`
---
 elpa-packages | 1 +
 1 file changed, 1 insertion(+)

diff --git a/elpa-packages b/elpa-packages
index e184cca173..708994004c 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -750,6 +750,7 @@
  ("url-http-ntlm"  :url nil)
  ("use-package":url "https://github.com/jwiegley/use-package";
   :ignored-files ("LICENSE" "bind-*" "use-package-chords.el")
+  :readme "README.md"
   :doc "use-package.texi"
   :news "NEWS.md"
   :auto-sync t)

[elpa] externals/greader updated (ae6e7524b9 -> bc45d253f9)

[ELPA Syncer]

elpasync pushed a change to branch externals/greader.

  from  ae6e7524b9 Merge branch 'experimental'
   new  0d34f66a9c Replaced identifiers containing "actual-backend" with 
"current-backend".
   new  6177afd174 Merge branch 'experimental'
   new  bc45d253f9 Cleanup


Summary of changes:
 greader.el | 84 ++
 1 file changed, 41 insertions(+), 43 deletions(-)

[elpa] externals/greader 0d34f66a9c 1/3: Replaced identifiers containing "actual-backend" with

[ELPA Syncer]

branch: externals/greader
commit 0d34f66a9cd3e108624575a2f880bd3b8f29e0b2
Author: Michelangelo Rodriguez 
Commit: Michelangelo Rodriguez 

Replaced identifiers containing "actual-backend" with
"current-backend".
---
 greader.el | 12 ++--
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/greader.el b/greader.el
index e11f5da90a..49843cc8c2 100644
--- a/greader.el
+++ b/greader.el
@@ -270,7 +270,7 @@ backends."
(completing-read"back-end:" (greader--get-backends)
   (if (functionp backend)
   (if (memq backend greader-backends)
- (setq-local greader-actual-backend backend)
+ (setq-local greader-current-backend backend)
(error "%s" "The function you have specified is not a greader's 
back-end.")))
   (if (stringp backend)
   (progn
@@ -281,17 +281,17 @@ backends."
 (get elem 'greader-backend-name) backend)
(setq result elem)))
  (if result
- (setq-local greader-actual-backend result)
+ (setq-local greader-current-backend result)
(error "%s" "the function name you have specified is not a 
greader's back-end.")
   (if (not backend)
   (let
- ((index (seq-position greader-backends greader-actual-backend))
+ ((index (seq-position greader-backends greader-current-backend))
   (len (length greader-backends)))
(if
(= (+ index 1) len)
-   (setq-local greader-actual-backend (elt greader-backends 0))
- (setq-local greader-actual-backend (elt greader-backends (+ index 
1))
-  (message "Actual back-end is %s." (get greader-actual-backend 
'greader-backend-name)))
+   (setq-local greader-current-backend (elt greader-backends 0))
+ (setq-local greader-current-backend (elt greader-backends (+ index 
1))
+  (message "Current back-end is %s." (get greader-current-backend 
'greader-backend-name)))
 
 (defun greader-load-backends ()
   "Load backends taken from `greader-backends'."

[elpa] externals/greader 6177afd174 2/3: Merge branch 'experimental'

[ELPA Syncer]

branch: externals/greader
commit 6177afd174db7f2ca1538c0bf3f79fcdab96256e
Merge: ae6e7524b9 0d34f66a9c
Author: Michelangelo Rodriguez 
Commit: Michelangelo Rodriguez 

Merge branch 'experimental'
---
 greader.el | 12 ++--
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/greader.el b/greader.el
index dd9b177e11..8b71376317 100644
--- a/greader.el
+++ b/greader.el
@@ -262,7 +262,7 @@ backends."
(completing-read"back-end:" (greader--get-backends)
   (if (functionp backend)
   (if (memq backend greader-backends)
- (setq-local greader-actual-backend backend)
+ (setq-local greader-current-backend backend)
(error "%s" "The function you have specified is not a greader's 
back-end.")))
   (if (stringp backend)
   (progn
@@ -273,17 +273,17 @@ backends."
 (get elem 'greader-backend-name) backend)
(setq result elem)))
  (if result
- (setq-local greader-actual-backend result)
+ (setq-local greader-current-backend result)
(error "%s" "the function name you have specified is not a 
greader's back-end.")
   (if (not backend)
   (let
- ((index (seq-position greader-backends greader-actual-backend))
+ ((index (seq-position greader-backends greader-current-backend))
   (len (length greader-backends)))
(if
(= (+ index 1) len)
-   (setq-local greader-actual-backend (elt greader-backends 0))
- (setq-local greader-actual-backend (elt greader-backends (+ index 
1))
-  (message "Actual back-end is %s." (get greader-actual-backend 
'greader-backend-name)))
+   (setq-local greader-current-backend (elt greader-backends 0))
+ (setq-local greader-current-backend (elt greader-backends (+ index 
1))
+  (message "Current back-end is %s." (get greader-current-backend 
'greader-backend-name)))
 
 (defun greader-load-backends ()
   "Load backends taken from `greader-backends'."

[elpa] externals/greader bc45d253f9 3/3: Cleanup

[ELPA Syncer]

branch: externals/greader
commit bc45d253f9aef05f3a1489871ec8cc8ed69ffb7f
Author: Michelangelo Rodriguez 
Commit: Michelangelo Rodriguez 

Cleanup
---
 greader.el | 72 ++
 1 file changed, 35 insertions(+), 37 deletions(-)

diff --git a/greader.el b/greader.el
index 8b71376317..49843cc8c2 100644
--- a/greader.el
+++ b/greader.el
@@ -183,6 +183,14 @@ if set to t, when you call function `greader-read', that 
function sets a
   :type 'boolean
   :tag "use register")
 
+(defun greader-set-reading-keymap ()
+  "Set greader's keymap when reading."
+  (setq greader--reading t))
+
+(defun greader-set-greader-keymap ()
+  "Set greader's keymap when not reading."
+  (setq greader--reading nil))
+
 (define-obsolete-variable-alias 'greader-map 'greader-mode-map "2022")
 (defvar greader-mode-map
   (let ((map (make-sparse-keymap)))
@@ -287,7 +295,7 @@ backends."
 
 (defun greader-load-backends ()
   "Load backends taken from `greader-backends'."
-  (mapcar #'require greader-backends))
+  (mapcar 'require greader-backends))
 
 (defun greader-read-asynchronous (txt)
   "Read the text given in TXT."
@@ -405,17 +413,11 @@ Optional argument PROMPT variable not used."
t
   nil)))
 
-(defun greader-read-dissociated (&optional arg)
+(defun greader-read-dissociated ()
   "Use `dissociated-press to read a text dissociately.
 \(Helpful for
-mindfullness!). If ARG is nil, it will be chosen randomly (from 1 to
-10) to pass to `dissociated-press'. You can specify which contiguity
-you want by calling this function with a prefix."
-  (interactive "P")
-  (if (not arg)
-  (progn
-   (while (or (equal arg 0) (not arg))
- (setq arg (random 10)
+mindfullness!)."
+  (interactive)
   (setq greader-orig-buffer (current-buffer))
   (setq greader-dissoc-buffer (get-buffer-create "*Dissociation*"))
   (unwind-protect
@@ -423,9 +425,13 @@ you want by calling this function with a prefix."
(fset 'greader-temp-function (symbol-function 'y-or-n-p))
(fset 'y-or-n-p (symbol-function
 'greader-response-for-dissociate))
-   (dissociated-press arg)
+   (let ((arg (random 10)))
+ (while (equal arg 0)
+   (setq arg (random 10)))
+ (dissociated-press arg))
(switch-to-buffer greader-dissoc-buffer)
(goto-char (point-min))
+
(greader-mode 1)
(greader-read))
 (fset 'y-or-n-p (symbol-function 'greader-temp-function
@@ -513,10 +519,10 @@ Optional argument STRING contains the string passed to
 
 (defun greader-set-language (lang)
   "Set language of tts.
-LANG must be in ISO code, for example `en' for english or `fr' for
+LANG must be in ISO code, for example 'en' for english or 'fr' for
 french.  This function set the language of tts local for current
-buffer, so if you want to set it globally, please use
-M-x customize-option RET greader-language RET"
+buffer, so if you want to set it globally, please use 'm-x
+`customize-option'  greader-language '."
   (interactive "sset language to:")
   (greader-call-backend 'lang lang))
 (defun greader-set-punctuation (flag)
@@ -591,12 +597,8 @@ Optional argument TIMER-IN-MINS timer in minutes 
(integer)."
   (catch 'timer-is-nil
 (cond
  ((greader-timer-flag-p)
-  (setq-local greader-stop-timer
-  (run-at-time (- (greader-convert-mins-to-secs greader-timer)
-  greader-elapsed-time)
-   nil #'greader-stop-timer-callback))
-  (setq-local greader-elapsed-timer
-  (run-at-time 1 1 #'greader-elapsed-time)))
+  (setq-local greader-stop-timer (run-at-time (- 
(greader-convert-mins-to-secs greader-timer) greader-elapsed-time) nil 
'greader-stop-timer-callback))
+  (setq-local greader-elapsed-timer (run-at-time 1 1 
'greader-elapsed-time)))
  ((not (greader-timer-flag-p))
   (throw 'timer-is-nil nil
   t)
@@ -688,13 +690,14 @@ Enabling tired mode implicitly enables timer also."
   (greader-toggle-tired-flag)
   (message "tired mode disabled in current buffer"
 
-(defun greader--setup-tired-timer ()
+(defun greader-setup-tired-timer ()
+  "Not documented, internal use."
   (if greader-tired-flag
   (run-with-idle-timer
(time-add
(current-idle-time)
-   (seconds-to-time greader-tired-time))
-   nil #'greader-tired-mode-callback)))
+   (seconds-to-time
+greader-tired-time)) nil 'greader-tired-mode-callback)))
 
 (defun greader-tired-mode-callback ()
   "Not documented, internal use."
@@ -711,8 +714,7 @@ Enabling tired mode implicitly enables timer also."
   (progn
(if (not greader-tired-flag)
(greader-toggle-tired-mode))
-   (setq-local greader-auto-tired-timer
-   (run-at-time nil 1 #'greader-auto-tired-callback)))
+   (setq-local greader-auto-tired-timer(run-at-time nil 1 
'greader-auto-tired-callback

[elpa] externals/ef-themes 4555374a96: Make ef-themes-load-random report name of loaded theme

[ELPA Syncer]

branch: externals/ef-themes
commit 4555374a965175094b6d1ed770f53d713550afe7
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Make ef-themes-load-random report name of loaded theme

Thanks to Federico Stilman for sharing with me the idea of reporting
the name of the randomly loaded theme.  This information is shared
with permission, as it was done via a private channel.
---
 README.org   | 5 +++--
 ef-themes.el | 8 
 2 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/README.org b/README.org
index f1c4aee603..65f3972895 100644
--- a/README.org
+++ b/README.org
@@ -1252,8 +1252,9 @@ matters.
   Philip Kaludercic.
 
 + Ideas and/or user feedback :: Alan Schmitt, Anthony Chavez, Daniel
-  Mendler, Iris Garcia, Jean-Philippe Gagné Guay, Jonas Collberg,
-  Spike-Leung, Steve Molitor, Summer Emacs, Sven Seebeck, Zoltán Király.
+  Mendler, Federico Stilman, Iris Garcia, Jean-Philippe Gagné Guay,
+  Jonas Collberg, Spike-Leung, Steve Molitor, Summer Emacs, Sven
+  Seebeck, Zoltán Király.
 
 * GNU Free Documentation License
 :PROPERTIES:
diff --git a/ef-themes.el b/ef-themes.el
index 3bf9d231ce..67414949b8 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -456,10 +456,10 @@ symbol."
   (interactive (list (when current-prefix-arg (ef-themes--choose-subset
   (let* ((themes (ef-themes--minus-current variant))
  (n (random (length themes)))
- (pick (nth n themes)))
-(if (null pick)
-(ef-themes--load-theme (car themes))
-  (ef-themes--load-theme pick
+ (pick (nth n themes))
+ (loaded (if (null pick) (car themes) pick)))
+(ef-themes--load-theme loaded)
+(message "Loaded `%s'" loaded)))
 
 (defun ef-themes--preview-colors-render (buffer theme &rest _)
   "Render colors in BUFFER from THEME.

[nongnu] elpa/projectile 0515f1b647 3/3: Extend the project.el integration docs

[ELPA Syncer]

branch: elpa/projectile
commit 0515f1b647be953183336074cffd02497c7f86b9
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Extend the project.el integration docs
---
 doc/modules/ROOT/pages/usage.adoc | 9 -
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/doc/modules/ROOT/pages/usage.adoc 
b/doc/modules/ROOT/pages/usage.adoc
index 63922d52c0..a383b393c5 100644
--- a/doc/modules/ROOT/pages/usage.adoc
+++ b/doc/modules/ROOT/pages/usage.adoc
@@ -391,9 +391,16 @@ Starting with version 2.7 Projectile bundles some 
integration with
 project lookup function (`projectile-project-root`) and project file
 lookup function (`projectile-project-files`).
 
+TIP: You can read more about the integration 
https://github.com/bbatsov/projectile/issues/1591[here].
+
 That's useful as some packages (e.g. `eglot`) support natively only
 `project.el`'s API for project discovery. Fortunately, `project.el`
 makes it easy to install additional project lookup functions and that's
 exactly what Projectile does.
 
-TIP: You can read more about the integration 
https://github.com/bbatsov/projectile/issues/1591[here].
+The popular `xref` package also relies on `project.el` to infers the project
+for use commands like `xref-find-references` (kbd:[M-?]), so it's useful to 
teach it
+about Projectile's project discovery logic.
+
+TIP: Projectile provides its own alternative to `xref-find-references` that's 
named
+`projectile-find-references` (kbd:[s-p ?] or kbd:[s-p s-x]) and is using 
`xref` internally.

[nongnu] elpa/projectile 73e5da8d97 2/3: Document projectile-find-references

[ELPA Syncer]

branch: elpa/projectile
commit 73e5da8d979901a653f616c4544d53810f7c9fca
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Document projectile-find-references
---
 doc/modules/ROOT/pages/usage.adoc | 4 
 1 file changed, 4 insertions(+)

diff --git a/doc/modules/ROOT/pages/usage.adoc 
b/doc/modules/ROOT/pages/usage.adoc
index 4178f956ed..63922d52c0 100644
--- a/doc/modules/ROOT/pages/usage.adoc
+++ b/doc/modules/ROOT/pages/usage.adoc
@@ -74,6 +74,7 @@ You need to know only a handful of Projectile commands to 
start benefiting from
 * Switch project (kbd:[s-p p]) (you can also switch between open projects with 
kbd:[s-p q])
 * Grep (search for text/regexp) in project (kbd:[s-p s g])
 * Replace in project (kbd:[s-p r])
+* Find references in project (kbd:[s-p ?] or kbd:[s-p s x])
 * Invoke any Projectile command via the Projectile Commander (kbd:[s-p m])
 * Toggle between implementation and test (kbd:[s-p t])
 * Toggle between related files (e.g. `foo.h` <-> `foo.c` and `Gemfile` <-> 
`Gemfile.lock`) (kbd:[s-p a])
@@ -142,6 +143,9 @@ Here's a list of the interactive Emacs Lisp functions, 
provided by Projectile:
 | kbd:[s-p s r]
 | Runs `rg` (`ripgrep`) on the project, performing a literal search. Requires 
the presence of `rg.el` or `ripgrep.el`. With a prefix argument it will perform 
a regex search.
 
+| kbd:[s-p s x]
+| Find references to the symbol at point within the project. Uses internally 
the `xref` library.
+
 | kbd:[s-p v]
 | Run `vc-dir` on the root directory of the project.
 

[nongnu] elpa/xml-rpc aefa28cea4 01/10: Fix byte-compiler warnings in Emacs 29

[ELPA Syncer]

branch: elpa/xml-rpc
commit aefa28cea42e0afa75d7266b0a4a9ddb9c06bf4a
Author: Stefan Kangas 
Commit: Stefan Kangas 

Fix byte-compiler warnings in Emacs 29
---
 xml-rpc.el | 15 ---
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/xml-rpc.el b/xml-rpc.el
index 46e4772a1f..90d88e52f5 100644
--- a/xml-rpc.el
+++ b/xml-rpc.el
@@ -12,7 +12,7 @@
 ;; Created: May 13 2001
 ;; Keywords: xml rpc network
 ;; URL: http://github.com/xml-rpc-el/xml-rpc-el
-;; Last Modified: <2020-09-06 20:07:23 mah>
+;; Last Modified: <2022-10-04 18:13:55 skangas>
 
 (defconst xml-rpc-version "1.6.15"
   "Current version of xml-rpc.el")
@@ -51,7 +51,7 @@
   :type 'symbol :group 'xml-rpc)
 
 (defcustom xml-rpc-allow-unicode-string (coding-system-p 'utf-8)
-  "If non-nil, non-ASCII data is composed as 'value' instead of 'base64'.
+  "If non-nil, non-ASCII data is composed as `value' instead of `base64'.
 And this option overrides `xml-rpc-base64-encode-unicode' and
 `xml-rpc-base64-decode-unicode' if set as non-nil."
   :type 'boolean :group 'xml-rpc)
@@ -200,7 +200,7 @@ Return nil otherwise."
   (or (string-equal value "true") (string-equal value "1")))
 
 (defun xml-rpc-caddar-safe (list)
-  "Assume that LIST is '((value nil REST)) and return REST.  If
+  "Assume that LIST is \\='((value nil REST)) and return REST.  If
 REST is nil, then return \"\""
   (let ((rest (car-safe (cdr-safe (cdr-safe (car-safe list))
 (if rest
@@ -355,9 +355,9 @@ functions in xml.el."
 ;;
 
 (defsubst xml-rpc-response-errorp (response)
-  "An 'xml-rpc-method-call'  result value is always a list, where the first
+  "An `xml-rpc-method-call' result value is always a list, where the first
 element in RESPONSE is either nil or if an error occured, a cons pair
-according to (errnum .  \"Error string\"),"
+according to (errnum . \"Error string\")."
   (eq 'fault (car-safe (caddar response
 
 (defsubst xml-rpc-response-error-code (response)
@@ -422,8 +422,9 @@ or nil if called with ASYNC-CALLBACK-FUNCTION."
(with-temp-buffer
  (xml-print xml)
  (if xml-rpc-allow-unicode-string
- (string-as-unibyte
- (encode-coding-string (buffer-string) 'utf-8))
+ (encode-coding-string
+  (encode-coding-string (buffer-string) 'utf-8)
+  'raw-text t)
(buffer-string)))
"\n"))
   (url-mime-charset-string "utf-8;q=1, iso-8859-1;q=0.5")

[nongnu] elpa/helm 612b64b6ca: Fix toggling helm-ff-icon-mode in the helm-ff-nohighlight-matches setter

[ELPA Syncer]

branch: elpa/helm
commit 612b64b6ca18e7f51ec3636e0d2655e77cd59f6a
Author: Thierry Volpiatto 
Commit: Thierry Volpiatto 

Fix toggling helm-ff-icon-mode in the helm-ff-nohighlight-matches setter
---
 helm-files.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/helm-files.el b/helm-files.el
index ed1d57e1a2..d9a11d3a5a 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -829,7 +829,8 @@ present in this list."
   :set (lambda (var val)
  (set var val)
  (setq helm-source-find-files nil)
- (helm-ff-icon-mode helm-ff-icon-mode)))
+ (when helm-ff-icon-mode
+   (helm-ff-icon-mode 1
 
 ;;; Faces
 ;;

[nongnu] elpa/xml-rpc 50d6a7470e 05/10: Fix link in NonGNU ELPA badge

[ELPA Syncer]

branch: elpa/xml-rpc
commit 50d6a7470edc984a6e0e40da1ddc94a585cae1b5
Author: Stefan Kangas 
Commit: Stefan Kangas 

Fix link in NonGNU ELPA badge
---
 README.org | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/README.org b/README.org
index 75920bba81..cc9487edd2 100644
--- a/README.org
+++ b/README.org
@@ -1,4 +1,4 @@
-[[http://github.com/xml-rpc-el/xml-rpc-el][https://elpa.nongnu.org/nongnu/xml-rpc.svg]]
+[[https://elpa.nongnu.org/nongnu/xml-rpc.html][https://elpa.nongnu.org/nongnu/xml-rpc.svg]]
 
[[https://stable.melpa.org/#/xml-rpc][file:https://stable.melpa.org/packages/xml-rpc-badge.svg]]
 
[[https://melpa.org/#/xml-rpc][file:https://melpa.org/packages/xml-rpc-badge.svg]]
 
[[https://github.com/xml-rpc-el/xml-rpc-el/actions][https://github.com/xml-rpc-el/xml-rpc-el/workflows/CI/badge.svg]]

[nongnu] elpa/xml-rpc ce3d947798 07/10: Merge pull request #23 from skangas/silence-compiler

[ELPA Syncer]

branch: elpa/xml-rpc
commit ce3d94779882c788f023b989ee67262e64b24a8d
Merge: b8c9c31470 fc0c82eb5c
Author: Mark A. Hershberger 
Commit: GitHub 

Merge pull request #23 from skangas/silence-compiler

Silence byte-compiler in Emacs 29
---
 xml-rpc.el | 21 +++--
 1 file changed, 11 insertions(+), 10 deletions(-)

diff --git a/xml-rpc.el b/xml-rpc.el
index 46e4772a1f..4affcfae85 100644
--- a/xml-rpc.el
+++ b/xml-rpc.el
@@ -8,14 +8,14 @@
 
 ;; Maintainer: Mark A. Hershberger 
 ;; Original Author: Daniel Lundin 
-;; Version: 1.6.15
+;; Version: 1.6.16
 ;; Created: May 13 2001
 ;; Keywords: xml rpc network
 ;; URL: http://github.com/xml-rpc-el/xml-rpc-el
-;; Last Modified: <2020-09-06 20:07:23 mah>
+;; Last Modified: <2022-10-04 18:14:42 skangas>
 
-(defconst xml-rpc-version "1.6.15"
-  "Current version of xml-rpc.el")
+(defconst xml-rpc-version "1.6.16"
+  "Current version of xml-rpc.el.")
 
 ;; This file is NOT (yet) part of GNU Emacs.
 
@@ -51,7 +51,7 @@
   :type 'symbol :group 'xml-rpc)
 
 (defcustom xml-rpc-allow-unicode-string (coding-system-p 'utf-8)
-  "If non-nil, non-ASCII data is composed as 'value' instead of 'base64'.
+  "If non-nil, non-ASCII data is composed as `value' instead of `base64'.
 And this option overrides `xml-rpc-base64-encode-unicode' and
 `xml-rpc-base64-decode-unicode' if set as non-nil."
   :type 'boolean :group 'xml-rpc)
@@ -200,7 +200,7 @@ Return nil otherwise."
   (or (string-equal value "true") (string-equal value "1")))
 
 (defun xml-rpc-caddar-safe (list)
-  "Assume that LIST is '((value nil REST)) and return REST.  If
+  "Assume that LIST is \\='((value nil REST)) and return REST.  If
 REST is nil, then return \"\""
   (let ((rest (car-safe (cdr-safe (cdr-safe (car-safe list))
 (if rest
@@ -355,9 +355,9 @@ functions in xml.el."
 ;;
 
 (defsubst xml-rpc-response-errorp (response)
-  "An 'xml-rpc-method-call'  result value is always a list, where the first
+  "An `xml-rpc-method-call' result value is always a list, where the first
 element in RESPONSE is either nil or if an error occured, a cons pair
-according to (errnum .  \"Error string\"),"
+according to (errnum . \"Error string\")."
   (eq 'fault (car-safe (caddar response
 
 (defsubst xml-rpc-response-error-code (response)
@@ -422,8 +422,9 @@ or nil if called with ASYNC-CALLBACK-FUNCTION."
(with-temp-buffer
  (xml-print xml)
  (if xml-rpc-allow-unicode-string
- (string-as-unibyte
- (encode-coding-string (buffer-string) 'utf-8))
+ (encode-coding-string
+  (encode-coding-string (buffer-string) 'utf-8)
+  'raw-text t)
(buffer-string)))
"\n"))
   (url-mime-charset-string "utf-8;q=1, iso-8859-1;q=0.5")

[nongnu] elpa/xml-rpc f1612629e2 06/10: Add NonGNU ELPA to installation instructions

[ELPA Syncer]

branch: elpa/xml-rpc
commit f1612629e251bc303ce815fbb9125c566ccf1d4d
Author: Stefan Kangas 
Commit: Stefan Kangas 

Add NonGNU ELPA to installation instructions
---
 README.org | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index cc9487edd2..e9317b0028 100644
--- a/README.org
+++ b/README.org
@@ -13,9 +13,9 @@ xml-rpc.el represents XML-RPC datatypes as lisp values, 
automatically converting
 
 * Installation:
 
-If you use [[http://elpa.gnu.org/][ELPA]], and have configured the 
[[https://melpa.org/][MELPA]] repository, then =M-x package-install RET xml-rpc 
RET= interface. This is preferrable as you will have access to updates 
automatically.
+If you use [[http://elpa.gnu.org/][ELPA]], and have configured the 
[[https://elpa.nongnu.org/][NonGNU ELPA]] or [[https://melpa.org/][MELPA]] 
repository, then =M-x package-install RET xml-rpc RET= interface. This is 
preferrable as you will have access to updates automatically.
 
-If you would like to use ELPA, but this is your first time to use it or MELPA, 
then try evaluating the following code in emacs:
+If you would like to use ELPA, but this is your first time to use it, or 
NonGNU ELPA/MELPA, then try evaluating the following code in emacs:
 #+begin_src elisp
   (progn
 (require 'package)

[nongnu] elpa/php-mode b82b978f54 1/2: php-doc-annotation-tag inherits font-lock-doc-markup-face if defined

[ELPA Syncer]

branch: elpa/php-mode
commit b82b978f54d3a02574d1d2ea499e5cac476d7fad
Author: USAMI Kenta 
Commit: USAMI Kenta 

php-doc-annotation-tag inherits font-lock-doc-markup-face if defined
---
 CHANGELOG.md | 2 ++
 lisp/php-face.el | 5 -
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 27b4cbde58..cd522ba1bd 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -14,6 +14,7 @@ All notable changes of the PHP Mode 1.19.1 release series are 
documented in this
 
  * Make continued expressions inside lists (arguments and arrays, etc.) have 
the same indent width as outside the list ([#703])
  * (internal) Improved readability of test failures about indentation ([#707])
+ * `php-doc-annotation-tag` inherits `font-lock-doc-markup-face` if defined in 
Emacs 28 ([#711])
 
 ### Fixed
 
@@ -24,6 +25,7 @@ All notable changes of the PHP Mode 1.19.1 release series are 
documented in this
 [#707]: https://github.com/emacs-php/php-mode/pull/707
 [#708]: https://github.com/emacs-php/php-mode/pull/708
 [#710]: https://github.com/emacs-php/php-mode/pull/710
+[#711]: https://github.com/emacs-php/php-mode/pull/711
 
 ## [1.24.1] - 2022-10-08
 
diff --git a/lisp/php-face.el b/lisp/php-face.el
index ca7524c7d4..13fd0f6d4e 100644
--- a/lisp/php-face.el
+++ b/lisp/php-face.el
@@ -175,7 +175,10 @@
   :group 'php-faces
   :tag "PHP php Tag")
 
-(defface php-doc-annotation-tag '((t . (:inherit font-lock-constant-face)))
+(defface php-doc-annotation-tag (eval-when-compile
+  (if (eval-when-compile (boundp 
'font-lock-doc-markup-face))
+  '((t . (:inherit 
font-lock-doc-markup-face)))
+'((t . (:inherit 
font-lock-constant-face)
   "Face used to highlight annotation tags in doc-comment."
   :group 'php-faces
   :tag "PHPDoc Annotation Tag")

[nongnu] elpa/xml-rpc fc0c82eb5c 02/10: Bump version to 1.6.16

[ELPA Syncer]

branch: elpa/xml-rpc
commit fc0c82eb5c8a5d5d837a21bca50f7c8169165f03
Author: Stefan Kangas 
Commit: Stefan Kangas 

Bump version to 1.6.16
---
 xml-rpc.el | 8 
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/xml-rpc.el b/xml-rpc.el
index 90d88e52f5..4affcfae85 100644
--- a/xml-rpc.el
+++ b/xml-rpc.el
@@ -8,14 +8,14 @@
 
 ;; Maintainer: Mark A. Hershberger 
 ;; Original Author: Daniel Lundin 
-;; Version: 1.6.15
+;; Version: 1.6.16
 ;; Created: May 13 2001
 ;; Keywords: xml rpc network
 ;; URL: http://github.com/xml-rpc-el/xml-rpc-el
-;; Last Modified: <2022-10-04 18:13:55 skangas>
+;; Last Modified: <2022-10-04 18:14:42 skangas>
 
-(defconst xml-rpc-version "1.6.15"
-  "Current version of xml-rpc.el")
+(defconst xml-rpc-version "1.6.16"
+  "Current version of xml-rpc.el.")
 
 ;; This file is NOT (yet) part of GNU Emacs.
 

[nongnu] elpa/xml-rpc 6d5892d910 04/10: Add file header to xml-rpc-test.el

[ELPA Syncer]

branch: elpa/xml-rpc
commit 6d5892d910b718dc1e8c2672c92e0723426f4465
Author: Stefan Kangas 
Commit: Stefan Kangas 

Add file header to xml-rpc-test.el
---
 xml-rpc-test.el | 27 +++
 1 file changed, 27 insertions(+)

diff --git a/xml-rpc-test.el b/xml-rpc-test.el
index 43dad0d11d..3c1767255f 100644
--- a/xml-rpc-test.el
+++ b/xml-rpc-test.el
@@ -1,3 +1,28 @@
+;;; xml-rpc-test.el --- Tests for xml-rpc.el  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2015-2022 xml-rpc.el contributors
+
+;; Maintainer: Mark A. Hershberger 
+
+;; This file is NOT (yet) part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by the Free
+;; Software Foundation, either version 3 of the License, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see .
+
+;;; Commentary:
+
+;;; Code:
+
 (require 'ert)
 
 (load-file "xml-rpc.el")
@@ -59,3 +84,5 @@ Content-Length: 152
 (insert data)
 (should (equal (xml-rpc-request-process-buffer (current-buffer))
xml-rpc-test-result))
+
+;;; xml-rpc-test.el ends here

[nongnu] elpa/php-mode c3c442a3fa 2/2: Merge pull request #711 from emacs-php/feature/emacs28-font-lock-doc-markup-face

[ELPA Syncer]

branch: elpa/php-mode
commit c3c442a3fa8714b17f166fb1f60f3326d583a22e
Merge: 0526c4310a b82b978f54
Author: USAMI Kenta 
Commit: GitHub 

Merge pull request #711 from 
emacs-php/feature/emacs28-font-lock-doc-markup-face

php-doc-annotation-tag inherits font-lock-doc-markup-face if defined
---
 CHANGELOG.md | 2 ++
 lisp/php-face.el | 5 -
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 27b4cbde58..cd522ba1bd 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -14,6 +14,7 @@ All notable changes of the PHP Mode 1.19.1 release series are 
documented in this
 
  * Make continued expressions inside lists (arguments and arrays, etc.) have 
the same indent width as outside the list ([#703])
  * (internal) Improved readability of test failures about indentation ([#707])
+ * `php-doc-annotation-tag` inherits `font-lock-doc-markup-face` if defined in 
Emacs 28 ([#711])
 
 ### Fixed
 
@@ -24,6 +25,7 @@ All notable changes of the PHP Mode 1.19.1 release series are 
documented in this
 [#707]: https://github.com/emacs-php/php-mode/pull/707
 [#708]: https://github.com/emacs-php/php-mode/pull/708
 [#710]: https://github.com/emacs-php/php-mode/pull/710
+[#711]: https://github.com/emacs-php/php-mode/pull/711
 
 ## [1.24.1] - 2022-10-08
 
diff --git a/lisp/php-face.el b/lisp/php-face.el
index ca7524c7d4..13fd0f6d4e 100644
--- a/lisp/php-face.el
+++ b/lisp/php-face.el
@@ -175,7 +175,10 @@
   :group 'php-faces
   :tag "PHP php Tag")
 
-(defface php-doc-annotation-tag '((t . (:inherit font-lock-constant-face)))
+(defface php-doc-annotation-tag (eval-when-compile
+  (if (eval-when-compile (boundp 
'font-lock-doc-markup-face))
+  '((t . (:inherit 
font-lock-doc-markup-face)))
+'((t . (:inherit 
font-lock-constant-face)
   "Face used to highlight annotation tags in doc-comment."
   :group 'php-faces
   :tag "PHPDoc Annotation Tag")

[nongnu] elpa/xml-rpc f46d18108c 09/10: Merge pull request #21 from skangas/nongnu-elpa-badge

[ELPA Syncer]

branch: elpa/xml-rpc
commit f46d18108ca63822b163b24efb07de39c6123f22
Merge: b96150b775 f1612629e2
Author: Mark A. Hershberger 
Commit: GitHub 

Merge pull request #21 from skangas/nongnu-elpa-badge

NonGNU ELPA fixes part 2
---
 README.org | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/README.org b/README.org
index 75920bba81..e9317b0028 100644
--- a/README.org
+++ b/README.org
@@ -1,4 +1,4 @@
-[[http://github.com/xml-rpc-el/xml-rpc-el][https://elpa.nongnu.org/nongnu/xml-rpc.svg]]
+[[https://elpa.nongnu.org/nongnu/xml-rpc.html][https://elpa.nongnu.org/nongnu/xml-rpc.svg]]
 
[[https://stable.melpa.org/#/xml-rpc][file:https://stable.melpa.org/packages/xml-rpc-badge.svg]]
 
[[https://melpa.org/#/xml-rpc][file:https://melpa.org/packages/xml-rpc-badge.svg]]
 
[[https://github.com/xml-rpc-el/xml-rpc-el/actions][https://github.com/xml-rpc-el/xml-rpc-el/workflows/CI/badge.svg]]
@@ -13,9 +13,9 @@ xml-rpc.el represents XML-RPC datatypes as lisp values, 
automatically converting
 
 * Installation:
 
-If you use [[http://elpa.gnu.org/][ELPA]], and have configured the 
[[https://melpa.org/][MELPA]] repository, then =M-x package-install RET xml-rpc 
RET= interface. This is preferrable as you will have access to updates 
automatically.
+If you use [[http://elpa.gnu.org/][ELPA]], and have configured the 
[[https://elpa.nongnu.org/][NonGNU ELPA]] or [[https://melpa.org/][MELPA]] 
repository, then =M-x package-install RET xml-rpc RET= interface. This is 
preferrable as you will have access to updates automatically.
 
-If you would like to use ELPA, but this is your first time to use it or MELPA, 
then try evaluating the following code in emacs:
+If you would like to use ELPA, but this is your first time to use it, or 
NonGNU ELPA/MELPA, then try evaluating the following code in emacs:
 #+begin_src elisp
   (progn
 (require 'package)

[nongnu] elpa/xml-rpc d3e467f142 03/10: Fix issues discovered by package-lint

[ELPA Syncer]

branch: elpa/xml-rpc
commit d3e467f14265bb893e7c6912bc3c39bd064c9d56
Author: Stefan Kangas 
Commit: Stefan Kangas 

Fix issues discovered by package-lint
---
 xml-rpc.el | 13 ++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/xml-rpc.el b/xml-rpc.el
index 46e4772a1f..dcff2a26e8 100644
--- a/xml-rpc.el
+++ b/xml-rpc.el
@@ -10,7 +10,8 @@
 ;; Original Author: Daniel Lundin 
 ;; Version: 1.6.15
 ;; Created: May 13 2001
-;; Keywords: xml rpc network
+;; Keywords: xml rpc network comm
+;; Package-Requires: ((emacs "24.1"))
 ;; URL: http://github.com/xml-rpc-el/xml-rpc-el
 ;; Last Modified: <2020-09-06 20:07:23 mah>
 
@@ -32,6 +33,8 @@
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program.  If not, see .
 
+;;; Commentary:
+
 ;;; Code:
 
 (require 'xml)
@@ -459,7 +462,7 @@ or nil if called with ASYNC-CALLBACK-FUNCTION."
  (if async-callback-function
  (let ((cbargs (list async-callback-function)))
(url-retrieve server-url
- 'xml-new-rpc-request-callback-handler
+ 'xml-rpc-new-request-callback-handler
  cbargs))
(let ((buffer (url-retrieve-synchronously server-url)))
  (with-current-buffer buffer
@@ -571,7 +574,7 @@ handled from XML-BUFFER."
 (funcall callback-fun (xml-rpc-xml-to-response xml-response
 
 
-(defun xml-new-rpc-request-callback-handler (_status callback-fun)
+(defun xml-rpc-new-request-callback-handler (_status callback-fun)
   "Handle a new style `url-retrieve' callback passing `STATUS'
 and `CALLBACK-FUN'."
   (let ((xml-buffer (current-buffer)))
@@ -608,6 +611,10 @@ parameters."
   (t
(xml-rpc-xml-to-response response)
 
+;; This can be removed later:
+(define-obsolete-function-alias 'xml-new-rpc-request-callback-handler
+  #'xml-rpc-new-request-callback-handler "XML-RPC 1.6.15")
+
 (provide 'xml-rpc)
 
 ;; Local Variables:

[elpa] main 5b1437d50b: * elpa-packages (bind-key): Skip use-package's "NEWS.md" and "README.md"

[Stefan Monnier via]

branch: main
commit 5b1437d50b29e0c5ef50437d16d488d7cede7073
Author: Stefan Monnier 
Commit: Stefan Monnier 

* elpa-packages (bind-key): Skip use-package's "NEWS.md" and "README.md"
---
 elpa-packages | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/elpa-packages b/elpa-packages
index 708994004c..024253e5c0 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -87,7 +87,9 @@
  ("beacon" :url "https://github.com/Malabarba/beacon";
   :auto-sync t)
  ("bind-key" :url "https://github.com/jwiegley/use-package";
-  :ignored-files ("LICENSE" "doc" "Makefile*" "bind-chords.el" "use-package*")
+  :ignored-files ("LICENSE" "doc" "Makefile*" "bind-chords.el" "use-package*"
+  "README.md" "NEWS.md") ;; These two are for use-package.
+  :news "/dev/null"   ;l Don't use use-package' s `NEWS.md`.
   :auto-sync t)
  ("blist"  :url "https://gitlab.com/mmemmew/blist";
   :doc "blist.texinfo"

[nongnu] elpa/projectile 93c61a98f2 1/3: Add new command projectile-find-references

[ELPA Syncer]

branch: elpa/projectile
commit 93c61a98f2ee983d856f1c419caea7fb2ab1ad19
Author: Bozhidar Batsov 
Commit: Bozhidar Batsov 

Add new command projectile-find-references
---
 CHANGELOG.md  |  1 +
 projectile.el | 15 ++-
 2 files changed, 15 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 086e48553c..5f60c47e5c 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -6,6 +6,7 @@
 
 * [#1591](https://github.com/bbatsov/projectile/issues/1591): Add `project.el` 
integration that will make Projectile the default provider for project lookup.
 * [#1799](https://github.com/bbatsov/projectile/pull/1799): Make it possible 
to ignore special project buffers.
+* Add new command `projectile-find-references` (bound to `C-c C-p ?` and `C-c 
C-p s x`).
 
 ### Bug fixed
 
diff --git a/projectile.el b/projectile.el
index 9041cd9ad3..f746c0ba23 100644
--- a/projectile.el
+++ b/projectile.el
@@ -4216,6 +4216,16 @@ installed to work."
args))
   (t (error "Packages `ripgrep' and `rg' are not available")
 
+(defun projectile-find-references (&optional symbol)
+  "Find all references to SYMBOL in the current project.
+
+A thin wrapper around `xref-references-in-directory'."
+  (interactive)
+  (when (fboundp 'xref-references-in-directory)
+(let ((project-root (projectile-acquire-root))
+  (symbol (or symbol (read-from-minibuffer "Lookup in project: " 
(projectile-symbol-at-point)
+  (xref--show-xrefs (xref-references-in-directory symbol project-root) 
nil
+
 (defun projectile-tags-exclude-patterns ()
   "Return a string with exclude patterns for ctags."
   (mapconcat (lambda (pattern) (format "--exclude=\"%s\""
@@ -5815,6 +5825,7 @@ thing shown in the mode line otherwise."
 (define-key map (kbd "5 t") 
#'projectile-find-implementation-or-test-other-frame)
 (define-key map (kbd "!") #'projectile-run-shell-command-in-root)
 (define-key map (kbd "&") #'projectile-run-async-shell-command-in-root)
+(define-key map (kbd "?") #'projectile-find-references)
 (define-key map (kbd "a") #'projectile-find-other-file)
 (define-key map (kbd "b") #'projectile-switch-to-buffer)
 (define-key map (kbd "d") #'projectile-find-dir)
@@ -5838,6 +5849,7 @@ thing shown in the mode line otherwise."
 (define-key map (kbd "s g") #'projectile-grep)
 (define-key map (kbd "s r") #'projectile-ripgrep)
 (define-key map (kbd "s s") #'projectile-ag)
+(define-key map (kbd "s x") #'projectile-find-references)
 (define-key map (kbd "S") #'projectile-save-project-buffers)
 (define-key map (kbd "t") 
#'projectile-toggle-between-implementation-and-test)
 (define-key map (kbd "T") #'projectile-find-test-file)
@@ -5912,7 +5924,8 @@ thing shown in the mode line otherwise."
  ["Search with ag" projectile-ag]
  ["Search with ripgrep" projectile-ripgrep]
  ["Replace in project" projectile-replace]
- ["Multi-occur in project" projectile-multi-occur])
+ ["Multi-occur in project" projectile-multi-occur]
+ ["Find references in project" projectile-find-references])
 ("Run..."
  ["Run shell" projectile-run-shell]
  ["Run eshell" projectile-run-eshell]

[nongnu] elpa/xml-rpc b96150b775 08/10: Merge pull request #24 from skangas/package-lint

[ELPA Syncer]

branch: elpa/xml-rpc
commit b96150b7757cf40831ed33eb77c10acb8b789bb1
Merge: ce3d947798 d3e467f142
Author: Mark A. Hershberger 
Commit: GitHub 

Merge pull request #24 from skangas/package-lint

Fix issues discovered by package-lint
---
 xml-rpc.el | 13 ++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/xml-rpc.el b/xml-rpc.el
index 4affcfae85..c044827668 100644
--- a/xml-rpc.el
+++ b/xml-rpc.el
@@ -10,7 +10,8 @@
 ;; Original Author: Daniel Lundin 
 ;; Version: 1.6.16
 ;; Created: May 13 2001
-;; Keywords: xml rpc network
+;; Keywords: xml rpc network comm
+;; Package-Requires: ((emacs "24.1"))
 ;; URL: http://github.com/xml-rpc-el/xml-rpc-el
 ;; Last Modified: <2022-10-04 18:14:42 skangas>
 
@@ -32,6 +33,8 @@
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program.  If not, see .
 
+;;; Commentary:
+
 ;;; Code:
 
 (require 'xml)
@@ -460,7 +463,7 @@ or nil if called with ASYNC-CALLBACK-FUNCTION."
  (if async-callback-function
  (let ((cbargs (list async-callback-function)))
(url-retrieve server-url
- 'xml-new-rpc-request-callback-handler
+ 'xml-rpc-new-request-callback-handler
  cbargs))
(let ((buffer (url-retrieve-synchronously server-url)))
  (with-current-buffer buffer
@@ -572,7 +575,7 @@ handled from XML-BUFFER."
 (funcall callback-fun (xml-rpc-xml-to-response xml-response
 
 
-(defun xml-new-rpc-request-callback-handler (_status callback-fun)
+(defun xml-rpc-new-request-callback-handler (_status callback-fun)
   "Handle a new style `url-retrieve' callback passing `STATUS'
 and `CALLBACK-FUN'."
   (let ((xml-buffer (current-buffer)))
@@ -609,6 +612,10 @@ parameters."
   (t
(xml-rpc-xml-to-response response)
 
+;; This can be removed later:
+(define-obsolete-function-alias 'xml-new-rpc-request-callback-handler
+  #'xml-rpc-new-request-callback-handler "XML-RPC 1.6.15")
+
 (provide 'xml-rpc)
 
 ;; Local Variables:

[nongnu] elpa/helm-core updated (fed57a457c -> 612b64b6ca)

[ELPA Syncer]

elpasync pushed a change to branch elpa/helm-core.

  from  fed57a457c Require all-the-icons in the right place
  adds  612b64b6ca Fix toggling helm-ff-icon-mode in the 
helm-ff-nohighlight-matches setter

No new revisions were added by this update.

Summary of changes:
 helm-files.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

[nongnu] elpa/xml-rpc 98ff430ab4 10/10: Merge pull request #19 from skangas/test-file-header

[ELPA Syncer]

branch: elpa/xml-rpc
commit 98ff430ab4fbe62c7bd14e759f4d990356775a20
Merge: f46d18108c 6d5892d910
Author: Mark A. Hershberger 
Commit: GitHub 

Merge pull request #19 from skangas/test-file-header

Add file header to xml-rpc-test.el
---
 xml-rpc-test.el | 27 +++
 1 file changed, 27 insertions(+)

diff --git a/xml-rpc-test.el b/xml-rpc-test.el
index 43dad0d11d..3c1767255f 100644
--- a/xml-rpc-test.el
+++ b/xml-rpc-test.el
@@ -1,3 +1,28 @@
+;;; xml-rpc-test.el --- Tests for xml-rpc.el  -*- lexical-binding:t -*-
+
+;; Copyright (C) 2015-2022 xml-rpc.el contributors
+
+;; Maintainer: Mark A. Hershberger 
+
+;; This file is NOT (yet) part of GNU Emacs.
+
+;; This program is free software: you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by the Free
+;; Software Foundation, either version 3 of the License, or (at your option)
+;; any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see .
+
+;;; Commentary:
+
+;;; Code:
+
 (require 'ert)
 
 (load-file "xml-rpc.el")
@@ -59,3 +84,5 @@ Content-Length: 152
 (insert data)
 (should (equal (xml-rpc-request-process-buffer (current-buffer))
xml-rpc-test-result))
+
+;;; xml-rpc-test.el ends here

[nongnu] elpa/projectile updated (f5a2a3ab26 -> 0515f1b647)

[ELPA Syncer]

elpasync pushed a change to branch elpa/projectile.

  from  f5a2a3ab26 [Fix #1804] Make it possible to ignore special project 
buffers
   new  93c61a98f2 Add new command projectile-find-references
   new  73e5da8d97 Document projectile-find-references
   new  0515f1b647 Extend the project.el integration docs


Summary of changes:
 CHANGELOG.md  |  1 +
 doc/modules/ROOT/pages/usage.adoc | 13 -
 projectile.el | 15 ++-
 3 files changed, 27 insertions(+), 2 deletions(-)

[nongnu] elpa/xml-rpc updated (b8c9c31470 -> 98ff430ab4)

[ELPA Syncer]

elpasync pushed a change to branch elpa/xml-rpc.

  from  b8c9c31470 Merge pull request #20 from skangas/nongnu-elpa-badge
   new  aefa28cea4 Fix byte-compiler warnings in Emacs 29
   new  fc0c82eb5c Bump version to 1.6.16
   new  ce3d947798 Merge pull request #23 from skangas/silence-compiler
   new  d3e467f142 Fix issues discovered by package-lint
   new  b96150b775 Merge pull request #24 from skangas/package-lint
   new  50d6a7470e Fix link in NonGNU ELPA badge
   new  f1612629e2 Add NonGNU ELPA to installation instructions
   new  f46d18108c Merge pull request #21 from skangas/nongnu-elpa-badge
   new  6d5892d910 Add file header to xml-rpc-test.el
   new  98ff430ab4 Merge pull request #19 from skangas/test-file-header


Summary of changes:
 README.org  |  6 +++---
 xml-rpc-test.el | 27 +++
 xml-rpc.el  | 34 +-
 3 files changed, 51 insertions(+), 16 deletions(-)

[elpa] externals/bind-key 17a049b0f7 2/2: Merge pull request #1004 from andreyorst/face-spec-set

[ELPA Syncer]

branch: externals/bind-key
commit 17a049b0f70f1c05f83516827425d694c21f20aa
Merge: 31fe8dc7f1 4fdc36aeda
Author: John Wiegley 
Commit: GitHub 

Merge pull request #1004 from andreyorst/face-spec-set
---
 use-package-core.el  |  2 +-
 use-package-tests.el | 12 ++--
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/use-package-core.el b/use-package-core.el
index 6832c447c7..f27d158fc0 100644
--- a/use-package-core.el
+++ b/use-package-core.el
@@ -1518,7 +1518,7 @@ no keyword implies `:all'."
 (defun use-package-handler/:custom-face (name _keyword args rest state)
   "Generate use-package custom-face keyword code."
   (use-package-concat
-   (mapcar #'(lambda (def) `(custom-set-faces (backquote ,def))) args)
+   (mapcar #'(lambda (def) `(apply #'face-spec-set (backquote ,def))) args)
(use-package-process-keywords name rest state)))
 
  :init
diff --git a/use-package-tests.el b/use-package-tests.el
index 1ccd3ad078..7d98ca99e4 100644
--- a/use-package-tests.el
+++ b/use-package-tests.el
@@ -1156,7 +1156,7 @@
   (match-expansion
(use-package foo :custom-face (foo ((t (:background "#e4edfc")
`(progn
-  (custom-set-faces (backquote (foo ((t (:background "#e4edfc"))
+  (apply #'face-spec-set (backquote (foo ((t (:background "#e4edfc"))
   (require 'foo nil nil
 
 (ert-deftest use-package-test/:custom-face-2 ()
@@ -1166,11 +1166,11 @@
  (example-1-face ((t (:foreground "LightPink"
  (example-2-face ((t (:foreground "LightGreen")
`(progn
- (custom-set-faces
-  (backquote (example-1-face ((t (:foreground "LightPink"))
- (custom-set-faces
-  (backquote (example-2-face ((t (:foreground "LightGreen"))
- (require 'example nil nil
+  (apply #'face-spec-set
+ (backquote (example-1-face ((t (:foreground "LightPink"))
+  (apply #'face-spec-set
+ (backquote (example-2-face ((t (:foreground "LightGreen"))
+  (require 'example nil nil
 
 (ert-deftest use-package-test/:init-1 ()
   (match-expansion

[elpa] externals/bind-key 4fdc36aeda 1/2: fix #934: use face-spec-set instead of custom-set-faces

[ELPA Syncer]

branch: externals/bind-key
commit 4fdc36aedad60a95e61ace0949835a981c6cd638
Author: Andrey Listopadov 
Commit: Andrey Listopadov 

fix #934: use face-spec-set instead of custom-set-faces
---
 use-package-core.el  |  2 +-
 use-package-tests.el | 12 ++--
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/use-package-core.el b/use-package-core.el
index 31b8048643..21b1a7ab40 100644
--- a/use-package-core.el
+++ b/use-package-core.el
@@ -1518,7 +1518,7 @@ no keyword implies `:all'."
 (defun use-package-handler/:custom-face (name _keyword args rest state)
   "Generate use-package custom-face keyword code."
   (use-package-concat
-   (mapcar #'(lambda (def) `(custom-set-faces (backquote ,def))) args)
+   (mapcar #'(lambda (def) `(apply #'face-spec-set (backquote ,def))) args)
(use-package-process-keywords name rest state)))
 
  :init
diff --git a/use-package-tests.el b/use-package-tests.el
index 1ccd3ad078..7d98ca99e4 100644
--- a/use-package-tests.el
+++ b/use-package-tests.el
@@ -1156,7 +1156,7 @@
   (match-expansion
(use-package foo :custom-face (foo ((t (:background "#e4edfc")
`(progn
-  (custom-set-faces (backquote (foo ((t (:background "#e4edfc"))
+  (apply #'face-spec-set (backquote (foo ((t (:background "#e4edfc"))
   (require 'foo nil nil
 
 (ert-deftest use-package-test/:custom-face-2 ()
@@ -1166,11 +1166,11 @@
  (example-1-face ((t (:foreground "LightPink"
  (example-2-face ((t (:foreground "LightGreen")
`(progn
- (custom-set-faces
-  (backquote (example-1-face ((t (:foreground "LightPink"))
- (custom-set-faces
-  (backquote (example-2-face ((t (:foreground "LightGreen"))
- (require 'example nil nil
+  (apply #'face-spec-set
+ (backquote (example-1-face ((t (:foreground "LightPink"))
+  (apply #'face-spec-set
+ (backquote (example-2-face ((t (:foreground "LightGreen"))
+  (require 'example nil nil
 
 (ert-deftest use-package-test/:init-1 ()
   (match-expansion

[elpa] externals/ement 9bcb6fd014: Fix: (ement-room-mark-read) "curl process interrupted" error

[ELPA Syncer]

branch: externals/ement
commit 9bcb6fd01493e0dade41a65900c8422bebc805ff
Author: Adam Porter 
Commit: Adam Porter 

Fix: (ement-room-mark-read) "curl process interrupted" error
---
 README.org|  3 +++
 ement-room.el | 15 ---
 2 files changed, 15 insertions(+), 3 deletions(-)

diff --git a/README.org b/README.org
index 0aed164a5b..0ee1b26672 100644
--- a/README.org
+++ b/README.org
@@ -292,6 +292,9 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 *Changes*
 + When selecting a room to view with completion, don't offer spaces.
 
+*Fixes*
++ Don't show "curl process interrupted" message when updating a read marker's 
position again.
+
 ** 0.4
 
 *Additions*
diff --git a/ement-room.el b/ement-room.el
index 72fcde02e8..112a3410f3 100644
--- a/ement-room.el
+++ b/ement-room.el
@@ -2484,7 +2484,6 @@ Also, mark room's buffer as unmodified."
   ;; send a new one.
   (when-let ((request-process (car (map-values 
ement-room-read-receipt-request
 (when (process-live-p request-process)
-  ;; FIXME: This will probably cause a spurious error message.
   (interrupt-process request-process)))
   (setf ement-room-read-receipt-request nil)
   (setf (alist-get event ement-room-read-receipt-request)
@@ -2564,14 +2563,24 @@ Interactively, mark both types as read up to event at 
point."
   (let ((request-process (ement-api session endpoint :method 'post :data 
(json-encode data)
:then (lambda (_data)
(ement-room-move-read-markers room
- :read-event read-event 
:fully-read-event fully-read-event)
+ :read-event read-event 
:fully-read-event fully-read-event))
+   :else (lambda (plz-error)
+   (pcase (plz-error-message plz-error)
+ ("curl process interrupted"
+  ;; Ignore this, because it happens 
when we
+  ;; update a read marker before the 
previous
+  ;; update request is completed.
+  nil)
+ (_ (signal 'ement-api-error
+(list (format "Ement: 
(ement-room-mark-read) Unexpected API error: %s"
+  plz-error)
+  plz-error
 (when-let ((room-buffer (alist-get 'buffer (ement-room-local room
   ;; NOTE: Ideally we would do this before sending the new request, 
but to make
   ;; the code much simpler, we do it afterward.
   (with-current-buffer room-buffer
 (when-let ((request-process (car (map-values 
ement-room-read-receipt-request
   (when (process-live-p request-process)
-;; FIXME: This will probably cause a spurious error message.
 (interrupt-process request-process)))
 (setf ement-room-read-receipt-request nil
   (alist-get read-event ement-room-read-receipt-request) 
request-process)))

[elpa] externals/use-package updated (31fe8dc7f1 -> 17a049b0f7)

[ELPA Syncer]

elpasync pushed a change to branch externals/use-package.

  from  31fe8dc7f1 Merge pull request #1006 from bhankas/master
  adds  4fdc36aeda fix #934: use face-spec-set instead of custom-set-faces
  adds  17a049b0f7 Merge pull request #1004 from andreyorst/face-spec-set

No new revisions were added by this update.

Summary of changes:
 use-package-core.el  |  2 +-
 use-package-tests.el | 12 ++--
 2 files changed, 7 insertions(+), 7 deletions(-)

[nongnu] elpa/xml-rpc de58ee692a 3/4: Merge pull request #26 from skangas/autoload-timezone

[ELPA Syncer]

branch: elpa/xml-rpc
commit de58ee692a459d7e0e8d3df004eda2686f749d3f
Merge: 98ff430ab4 b4409a0980
Author: Mark A. Hershberger 
Commit: GitHub 

Merge pull request #26 from skangas/autoload-timezone

Replace require of timezone with autoload
---
 xml-rpc.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/xml-rpc.el b/xml-rpc.el
index c044827668..f83f90a7fa 100644
--- a/xml-rpc.el
+++ b/xml-rpc.el
@@ -39,7 +39,6 @@
 
 (require 'xml)
 (require 'url-http)
-(require 'timezone)
 
 (defconst xml-rpc-maintainer-address "m...@everybody.org"
   "The address where bug reports should be sent.")
@@ -144,6 +143,8 @@ a list that is not datetime, base64 or struct."
 (defvar xml-rpc--date-parses-as nil)
 (defvar xml-rpc--tz-pd-defined-in nil)
 
+(autoload 'timezone-parse-date "timezone")
+
 (defun xml-rpc-submit-bug-report ()
  "Submit a bug report on xml-rpc."
  (interactive)

[elpa] externals/ement updated (9bcb6fd014 -> a5a8fb555f)

[ELPA Syncer]

elpasync pushed a change to branch externals/ement.

  from  9bcb6fd014 Fix: (ement-room-mark-read) "curl process interrupted" 
error
   new  cc97d0eca7 Change/Fix: Room list avatars
   new  a5a8fb555f Tidy: Compilation warnings


Summary of changes:
 ement-room-list.el | 17 ++---
 ement.el   |  9 ++---
 2 files changed, 16 insertions(+), 10 deletions(-)

[elpa] externals/ement a5a8fb555f 2/2: Tidy: Compilation warnings

[ELPA Syncer]

branch: externals/ement
commit a5a8fb555f137d397accfb107b5dbda9093bd8da
Author: Adam Porter 
Commit: Adam Porter 

Tidy: Compilation warnings
---
 ement-room-list.el | 5 +
 1 file changed, 5 insertions(+)

diff --git a/ement-room-list.el b/ement-room-list.el
index bbd291d2d3..b924119a5d 100644
--- a/ement-room-list.el
+++ b/ement-room-list.el
@@ -52,6 +52,9 @@
   "List of colors used for timestamps.
 Set automatically when `ement-room-list-mode' is activated.")
 
+(defvar ement-sessions)
+(defvar ement-room-prism-minimum-contrast)
+
  Customization
 
 (defcustom ement-room-list-auto-update t
@@ -634,6 +637,7 @@ left."
   (mouse-set-point event)
   (call-interactively #'ement-room-list-RET))
 
+(declare-function ement-view-room "ement-room")
 (defun ement-room-list-RET ()
   "View room at point, or cycle section at point."
   (interactive)
@@ -643,6 +647,7 @@ left."
 (taxy-magit-section (call-interactively #'ement-room-list-section-toggle))
 (null nil)))
 
+(declare-function ement-room-goto-fully-read-marker "ement-room")
 (defun ement-room-list-next-unread ()
   "Show next unread room."
   (interactive)

[nongnu] elpa/xml-rpc b4409a0980 2/4: Replace require of timezone with autoload

[ELPA Syncer]

branch: elpa/xml-rpc
commit b4409a09800830242cbf787db7b612a506c2e87d
Author: Stefan Kangas 
Commit: Stefan Kangas 

Replace require of timezone with autoload
---
 xml-rpc.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/xml-rpc.el b/xml-rpc.el
index c044827668..f83f90a7fa 100644
--- a/xml-rpc.el
+++ b/xml-rpc.el
@@ -39,7 +39,6 @@
 
 (require 'xml)
 (require 'url-http)
-(require 'timezone)
 
 (defconst xml-rpc-maintainer-address "m...@everybody.org"
   "The address where bug reports should be sent.")
@@ -144,6 +143,8 @@ a list that is not datetime, base64 or struct."
 (defvar xml-rpc--date-parses-as nil)
 (defvar xml-rpc--tz-pd-defined-in nil)
 
+(autoload 'timezone-parse-date "timezone")
+
 (defun xml-rpc-submit-bug-report ()
  "Submit a bug report on xml-rpc."
  (interactive)

[nongnu] elpa/xml-rpc 97d609b1f6 1/4: Add .elpaignore for NonGNU ELPA

[ELPA Syncer]

branch: elpa/xml-rpc
commit 97d609b1f657962c7be89d771b30c2e8a8560137
Author: Stefan Kangas 
Commit: Stefan Kangas 

Add .elpaignore for NonGNU ELPA
---
 .elpaignore | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/.elpaignore b/.elpaignore
new file mode 100644
index 00..3ed2dc3a98
--- /dev/null
+++ b/.elpaignore
@@ -0,0 +1,2 @@
+.github
+LICENSE

[nongnu] elpa/xml-rpc updated (98ff430ab4 -> 85a9fc06c5)

[ELPA Syncer]

elpasync pushed a change to branch elpa/xml-rpc.

  from  98ff430ab4 Merge pull request #19 from skangas/test-file-header
   new  b4409a0980 Replace require of timezone with autoload
   new  de58ee692a Merge pull request #26 from skangas/autoload-timezone
   new  97d609b1f6 Add .elpaignore for NonGNU ELPA
   new  85a9fc06c5 Merge pull request #25 from skangas/elpaignore


Summary of changes:
 .elpaignore | 2 ++
 xml-rpc.el  | 3 ++-
 2 files changed, 4 insertions(+), 1 deletion(-)
 create mode 100644 .elpaignore

[elpa] externals/ement cc97d0eca7 1/2: Change/Fix: Room list avatars

[ELPA Syncer]

branch: externals/ement
commit cc97d0eca7e9023631f37c0ae61de1fe628ac87b
Author: Adam Porter 
Commit: Adam Porter 

Change/Fix: Room list avatars

Since the cached avatar needs to be discarded when a room avatar event
is received, it's simpler to store the cached avatar in the room's
local alist rather than use a buffer-local hash table in the room list
buffer.  It does mean that the avatars will remain in memory when the
room list buffer is killed, but that's unlikely to cause significant
memory usage, and the cached avatars could be cleared easily enough if
needed.

This also fixes a bug or race condition in that generated avatars
would not be replaced with downloaded ones.
---
 ement-room-list.el | 12 +---
 ement.el   |  9 ++---
 2 files changed, 11 insertions(+), 10 deletions(-)

diff --git a/ement-room-list.el b/ement-room-list.el
index 2363f70af4..bbd291d2d3 100644
--- a/ement-room-list.el
+++ b/ement-room-list.el
@@ -278,18 +278,16 @@ from recent to non-recent for rooms updated in the past 
hour.")
 
  Columns
 
-(defvar-local ement-room-list-room-avatar-cache (make-hash-table)
-  ;; Use a buffer-local variable so that the cache is cleared when the buffer 
is closed.
-  "Hash table caching room avatars for the `ement-room-list' room list.")
-
 (eval-and-compile
   (taxy-magit-section-define-column-definer "ement-room-list"))
 
 (ement-room-list-define-column #("🐱" 0 1 (help-echo "Avatar")) (:align 'right)
   (pcase-let* ((`[,room ,_session] item)
-   ((cl-struct ement-room avatar display-name) room))
+   ((cl-struct ement-room avatar display-name
+   (local (map room-list-avatar)))
+room))
 (if ement-room-list-avatars
-(or (gethash room ement-room-list-room-avatar-cache)
+(or room-list-avatar
 (let ((new-avatar
(if avatar
;; NOTE: We resize every avatar to be suitable for this 
buffer, rather than using
@@ -308,7 +306,7 @@ from recent to non-recent for rooms updated in the past 
hour.")
(propertize " " 'display (svg-lib-tag (substring string 
0 1) nil
  :background color 
:foreground "white"
  :stroke 0))
-  (puthash room new-avatar ement-room-list-room-avatar-cache)))
+  (setf (alist-get 'room-list-avatar (ement-room-local room)) 
new-avatar)))
   ;; Avatars disabled: use a two-space string.
   " ")))
 
diff --git a/ement.el b/ement.el
index e1dd71b1de..732e9ce2c4 100644
--- a/ement.el
+++ b/ement.el
@@ -862,9 +862,12 @@ and `session' to the session.  Adds function to
  ;; Only do this when ImageMagick is supported.
  ;; FIXME: When requiring Emacs 27+, remove this (I 
guess?).
  (setf (image-property image :type) 'imagemagick))
-   ;; We set the room-avatar slot to a propertized string 
that displays
-   ;; as the image.  This seems the most convenient thing 
to do.
-   (setf (ement-room-avatar room) (propertize " " 'display 
image)))
+   ;; We set the room-avatar slot to a propertized string 
that
+   ;; displays as the image.  This seems the most 
convenient thing to
+   ;; do.  We also unset the cached room-list-avatar so it 
can be
+   ;; remade.
+   (setf (ement-room-avatar room) (propertize " " 'display 
image)
+ (alist-get 'room-list-avatar (ement-room-local 
room)) nil))
   ;; Unset avatar.
   (setf (ement-room-avatar room) nil
 (alist-get 'room-list-avatar (ement-room-local room)) nil

[nongnu] elpa/xml-rpc 85a9fc06c5 4/4: Merge pull request #25 from skangas/elpaignore

[ELPA Syncer]

branch: elpa/xml-rpc
commit 85a9fc06c53b9f5c177b7cf3d1b509f167d328e2
Merge: de58ee692a 97d609b1f6
Author: Mark A. Hershberger 
Commit: GitHub 

Merge pull request #25 from skangas/elpaignore

Add .elpaignore for NonGNU ELPA
---
 .elpaignore | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/.elpaignore b/.elpaignore
new file mode 100644
index 00..3ed2dc3a98
--- /dev/null
+++ b/.elpaignore
@@ -0,0 +1,2 @@
+.github
+LICENSE

[elpa] main cdb3635cff: elpa-packages (ement): Set `:release-branch`

[Stefan Monnier via]

branch: main
commit cdb3635cfffdac18bff0db897117f8de409b504f
Author: Stefan Monnier 
Commit: Stefan Monnier 

elpa-packages (ement): Set `:release-branch`
---
 elpa-packages | 4 
 1 file changed, 4 insertions(+)

diff --git a/elpa-packages b/elpa-packages
index 024253e5c0..b191b354d9 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -286,6 +286,7 @@
   :ignored-files ("embark.el" "embark.texi" "avy-embark-collect.el")
   :auto-sync t)
  ("ement"  :url "https://github.com/alphapapa/ement.el.git";
+  :release-branch "stable"
   :doc "README.org"
   :auto-sync t)
  ("emms"   :url "https://git.savannah.gnu.org/git/emms.git";
@@ -738,6 +739,9 @@
   :doc "docs/transient.texi")
  ("transient-cycles":url nil)
  ("trie"   :url "http://www.dr-qubit.org/git/predictive.git";)
+ ;; FIXME: Depends on `emacsql` which is on its way to NonGNU ELPA.
+ ;;("triples"  :url "https://github.com/ahyatt/triples";
+ ;; :auto-sync t)
  ;; FIXME: Waiting for copyright cleanups.
  ;;("trinary"  :url "https://github.com/emacs-elsa/trinary-logic";
  ;; :auto-sync t)

[elpa] externals/ement d955562faa 4/4: Merge: v0.4.1

[ELPA Syncer]

branch: externals/ement
commit d955562faaacbb720f008dfb494331d1511705e0
Merge: a5a8fb555f ebaeb41ec6
Author: Adam Porter 
Commit: Adam Porter 

Merge: v0.4.1
---
 README.org | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/README.org b/README.org
index 0ee1b26672..ffceed5244 100644
--- a/README.org
+++ b/README.org
@@ -292,6 +292,8 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 *Changes*
 + When selecting a room to view with completion, don't offer spaces.
 
+** 0.4.1
+
 *Fixes*
 + Don't show "curl process interrupted" message when updating a read marker's 
position again.
 

[elpa] externals/ement updated (a5a8fb555f -> d955562faa)

[ELPA Syncer]

elpasync pushed a change to branch externals/ement.

  from  a5a8fb555f Tidy: Compilation warnings
   new  752c8fb64e Meta: v0.4.1-pre
   new  24e82459e9 Fix: (ement-room-mark-read) "curl process interrupted" 
error
   new  ebaeb41ec6 Release: v0.4.1
   new  d955562faa Merge: v0.4.1


Summary of changes:
 README.org | 2 ++
 1 file changed, 2 insertions(+)

[elpa] externals/ement 752c8fb64e 1/4: Meta: v0.4.1-pre

[ELPA Syncer]

branch: externals/ement
commit 752c8fb64ebf05980313d8ef614cdff6c915212d
Author: Adam Porter 
Commit: Adam Porter 

Meta: v0.4.1-pre
---
 README.org | 4 
 ement.el   | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/README.org b/README.org
index 60d63ea951..d70e164afb 100644
--- a/README.org
+++ b/README.org
@@ -287,6 +287,10 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 :TOC:  :depth 0
 :END:
 
+** 0.4.1-pre
+
+Nothing new yet.
+
 ** 0.4
 
 *Additions*
diff --git a/ement.el b/ement.el
index d53361897b..486a3b6162 100644
--- a/ement.el
+++ b/ement.el
@@ -5,7 +5,7 @@
 ;; Author: Adam Porter 
 ;; Maintainer: Adam Porter 
 ;; URL: https://github.com/alphapapa/ement.el
-;; Version: 0.4
+;; Version: 0.4.1-pre
 ;; Package-Requires: ((emacs "27.1") (map "2.1") (plz "0.2") (taxy "0.9") 
(taxy-magit-section "0.9") (svg-lib "0.2.5") (transient "0.3.7"))
 ;; Keywords: comm
 

[elpa] externals/ement ebaeb41ec6 3/4: Release: v0.4.1

[ELPA Syncer]

branch: externals/ement
commit ebaeb41ec680c70876d720ed28d1816f8f226562
Author: Adam Porter 
Commit: Adam Porter 

Release: v0.4.1
---
 README.org | 2 +-
 ement.el   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index 9f8c8199ab..4ea66f236b 100644
--- a/README.org
+++ b/README.org
@@ -287,7 +287,7 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 :TOC:  :depth 0
 :END:
 
-** 0.4.1-pre
+** 0.4.1
 
 *Fixes*
 + Don't show "curl process interrupted" message when updating a read marker's 
position again.
diff --git a/ement.el b/ement.el
index 486a3b6162..9900a08af3 100644
--- a/ement.el
+++ b/ement.el
@@ -5,7 +5,7 @@
 ;; Author: Adam Porter 
 ;; Maintainer: Adam Porter 
 ;; URL: https://github.com/alphapapa/ement.el
-;; Version: 0.4.1-pre
+;; Version: 0.4.1
 ;; Package-Requires: ((emacs "27.1") (map "2.1") (plz "0.2") (taxy "0.9") 
(taxy-magit-section "0.9") (svg-lib "0.2.5") (transient "0.3.7"))
 ;; Keywords: comm
 

[elpa] branch externals-release/ement created (now ebaeb41ec6)

[ELPA Syncer]

elpasync pushed a change to branch externals-release/ement.

at  ebaeb41ec6 Release: v0.4.1

This branch includes the following new commits:

   new  752c8fb64e Meta: v0.4.1-pre
   new  24e82459e9 Fix: (ement-room-mark-read) "curl process interrupted" 
error
   new  ebaeb41ec6 Release: v0.4.1

[elpa] externals/ement 24e82459e9 2/4: Fix: (ement-room-mark-read) "curl process interrupted" error

[ELPA Syncer]

branch: externals/ement
commit 24e82459e95a0af418a93bb61884b63d48c06bda
Author: Adam Porter 
Commit: Adam Porter 

Fix: (ement-room-mark-read) "curl process interrupted" error
---
 README.org|  3 ++-
 ement-room.el | 15 ---
 2 files changed, 14 insertions(+), 4 deletions(-)

diff --git a/README.org b/README.org
index d70e164afb..9f8c8199ab 100644
--- a/README.org
+++ b/README.org
@@ -289,7 +289,8 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 
 ** 0.4.1-pre
 
-Nothing new yet.
+*Fixes*
++ Don't show "curl process interrupted" message when updating a read marker's 
position again.
 
 ** 0.4
 
diff --git a/ement-room.el b/ement-room.el
index 7e969b2f61..285c13b9e2 100644
--- a/ement-room.el
+++ b/ement-room.el
@@ -2482,7 +2482,6 @@ Also, mark room's buffer as unmodified."
   ;; send a new one.
   (when-let ((request-process (car (map-values 
ement-room-read-receipt-request
 (when (process-live-p request-process)
-  ;; FIXME: This will probably cause a spurious error message.
   (interrupt-process request-process)))
   (setf ement-room-read-receipt-request nil)
   (setf (alist-get event ement-room-read-receipt-request)
@@ -2562,14 +2561,24 @@ Interactively, mark both types as read up to event at 
point."
   (let ((request-process (ement-api session endpoint :method 'post :data 
(json-encode data)
:then (lambda (_data)
(ement-room-move-read-markers room
- :read-event read-event 
:fully-read-event fully-read-event)
+ :read-event read-event 
:fully-read-event fully-read-event))
+   :else (lambda (plz-error)
+   (pcase (plz-error-message plz-error)
+ ("curl process interrupted"
+  ;; Ignore this, because it happens 
when we
+  ;; update a read marker before the 
previous
+  ;; update request is completed.
+  nil)
+ (_ (signal 'ement-api-error
+(list (format "Ement: 
(ement-room-mark-read) Unexpected API error: %s"
+  plz-error)
+  plz-error
 (when-let ((room-buffer (alist-get 'buffer (ement-room-local room
   ;; NOTE: Ideally we would do this before sending the new request, 
but to make
   ;; the code much simpler, we do it afterward.
   (with-current-buffer room-buffer
 (when-let ((request-process (car (map-values 
ement-room-read-receipt-request
   (when (process-live-p request-process)
-;; FIXME: This will probably cause a spurious error message.
 (interrupt-process request-process)))
 (setf ement-room-read-receipt-request nil
   (alist-get read-event ement-room-read-receipt-request) 
request-process)))

[elpa] main a76f53f803: Build the manual for mmm-mode

[Dmitry Gutov]

branch: main
commit a76f53f80389a5cb6f7e863ead7f82f099e3d9a7
Author: Dmitry Gutov 
Commit: Dmitry Gutov 

Build the manual for mmm-mode

https://github.com/dgutov/mmm-mode/pull/132
---
 elpa-packages | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/elpa-packages b/elpa-packages
index b191b354d9..68ee428edc 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -463,7 +463,9 @@
   :auto-sync t)
  ("minibuffer-line":url nil)
  ("minimap":url nil)
- ("mmm-mode"   :url "https://github.com/purcell/mmm-mode.git";
+ ("mmm-mode"
+  :doc "mmm.texi"
+  :url "https://github.com/purcell/mmm-mode.git";
   :auto-sync t)
  ("modus-themes"   :core ("etc/themes/modus-themes.el"
"etc/themes/modus-operandi-theme.el"

[elpa] externals/mmm-mode 96d832f61a 2/9: Add Makefile to compile and test test code, and build docs

[ELPA Syncer]

branch: externals/mmm-mode
commit 96d832f61a5e993b253ceef319da457e0ea0d812
Author: Ola Nilsson 
Commit: Ola Nilsson 

Add Makefile to compile and test test code, and build docs
---
 .gitignore |  2 +-
 Makefile   | 50 ++
 2 files changed, 51 insertions(+), 1 deletion(-)

diff --git a/.gitignore b/.gitignore
index 44d1bb12d5..6773582744 100644
--- a/.gitignore
+++ b/.gitignore
@@ -3,7 +3,6 @@ aclocal.m4
 configure
 config.log
 config.status
-Makefile
 Makefile.in
 elc-stamp
 mmm.info*
@@ -14,3 +13,4 @@ stamp-vti
 version.texi
 mmm-mode-pkg.el
 mmm-mode-autoloads.el
+mmm.html
diff --git a/Makefile b/Makefile
new file mode 100644
index 00..65b478e734
--- /dev/null
+++ b/Makefile
@@ -0,0 +1,50 @@
+# Using srcdir, builddir, and VPATH enables separate build dir with
+# $ make -f $srcdir
+srcdir := $(dir $(MAKEFILE_LIST))
+VPATH = $(srcdir)
+builddir = .
+
+EMACS ?= emacs
+MAKEINFO = makeinfo
+MAKEINFOFLAGS =
+
+ELFILES = mmm-auto.el mmm-class.el mmm-cmds.el mmm-compat.el mmm-cweb.el \
+  mmm-defaults.el mmm-erb.el mmm-mason.el mmm-mode.el mmm-myghty.el \
+  mmm-noweb.el mmm-region.el mmm-rpm.el mmm-sample.el mmm-univ.el \
+  mmm-utils.el mmm-vars.el
+ELCFILES = $(ELFILES:.el=.elc)
+TESTS = highlighting.el html-erb.el
+
+all: mmm.info $(ELCFILES)
+
+mmm.info: mmm.texi
+   $(MAKEINFO) $(MAKEINFOFLAGS) -o $@ $^
+
+mmm.html: mmm.texi
+   $(MAKEINFO) --html $(MAKEINFOFLAGS) -o $@ $^
+
+docs: html info
+html: mmm.html
+info: mmm.info
+
+%.elc: %.el
+   $(EMACS) --batch -Q -L $(builddir) -L $(srcdir) \
+ --eval '(setq byte-compile-dest-file-function (lambda (_) "$@"))' \
+ -f batch-byte-compile '$<'
+
+check: all
+   $(EMACS) --batch -Q -L $(builddir) -L $(srcdir) -L $(srcdir)/tests \
+ $(addprefix -l ,$(TESTS)) -f ert-run-tests-batch-and-exit
+
+clean-lisp:
+   $(RM) -f $(ELCFILES)
+
+clean-info:
+   $(RM) -f mmm.info
+
+clean-html:
+   $(RM) -rf mmm.html
+
+clean: clean-lisp clean-info clean-html
+
+.PHONY: check clean clean-html clean-info clean-lisp docs html info

[elpa] externals/mmm-mode d1c85e5e2c 8/9: Release 0.5.9

[ELPA Syncer]

branch: externals/mmm-mode
commit d1c85e5e2cfc0cff3f63409b0ac15dd230568609
Author: Ola Nilsson 
Commit: Ola Nilsson 

Release 0.5.9
---
 NEWS| 18 --
 mmm-mode.el |  2 +-
 2 files changed, 17 insertions(+), 3 deletions(-)

diff --git a/NEWS b/NEWS
index 298519f267..827337d7f4 100644
--- a/NEWS
+++ b/NEWS
@@ -1,8 +1,22 @@
 MMM Mode NEWS -- history of user-visible changes.  -*-outline-*-
-Copyright (C) 2003, 2004, 2013-2015  Free Software Foundation, Inc.
+Copyright (C) 2003, 2004, 2013-2022  Free Software Foundation, Inc.
 See the file COPYING for copying conditions.
 
-Please submit bug reports at https://github.com/purcell/mmm-mode/issues
+Please submit bug reports at https://github.com/dgutov/mmm-mode/issues
+
+* Changes in MMM Mode 0.5.9
+
+Made the tests work in batch mode.
+
+Switched from Automake to plain Makefile.
+
+Now requires at least GNU Emacs 25.1.
+
+Info documentation can be generated by the GNU ELPA packager.
+
+New here document class for shell.  The new class handles indented
+here documents, which are incompatible with the mmm classes shared
+with Perl.
 
 * Changes in MMM Mode 0.5.8
 Support for Emacs 27.
diff --git a/mmm-mode.el b/mmm-mode.el
index a1264b6f6c..3925b22f24 100644
--- a/mmm-mode.el
+++ b/mmm-mode.el
@@ -8,7 +8,7 @@
 ;; Maintainer: Dmitry Gutov 
 ;; URL: https://github.com/purcell/mmm-mode
 ;; Keywords: convenience, faces, languages, tools
-;; Version: 0.5.8
+;; Version: 0.5.9
 ;; Package-Requires: ((emacs "25.1") (cl-lib "0.2"))
 
 ;;{{{ GPL

[elpa] externals/mmm-mode f21c8f35ec 1/9: Make the tests work in batch mode

[ELPA Syncer]

branch: externals/mmm-mode
commit f21c8f35ec7a0af78b4faf3baa592fbe540c5b53
Author: Ola Nilsson 
Commit: Ola Nilsson 

Make the tests work in batch mode

Add the test macro mmm-with-global-font-lock and use it.

Both font-lock-mode and mmm-mode wont start unless noninteractive is
nil and the buffer names start with a non-blank character.

Global minor modes add functions to some hooks, do that locally in
mmm-with-global-font-lock.
---
 tests/highlighting.el  | 19 --
 tests/html-erb.el  |  6 --
 tests/mmm-test-util.el | 53 ++
 3 files changed, 70 insertions(+), 8 deletions(-)

diff --git a/tests/highlighting.el b/tests/highlighting.el
index b7519a610b..e03d25eb1b 100644
--- a/tests/highlighting.el
+++ b/tests/highlighting.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2013-2014, 2020  Free Software Foundation, Inc.
+;; Copyright (C) 2013-2014, 2020, 2022  Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
 
@@ -20,6 +20,8 @@
 ;;; Code:
 
 (require 'ert-x)
+(require 'mmm-test-util)
+(require 'mmm-mode)
 
 (defvar foo-mode-keywords
   `((,(concat "\\b"
@@ -31,6 +33,7 @@
   (setq font-lock-defaults '(foo-mode-keywords t t)))
 
 (ert-deftest mmm-font-lock-without-font-lock-syntax-table ()
+  (mmm-with-global-font-lock
   (ert-with-test-buffer nil
 (let (mmm-mode-ext-classes-alist
   mmm-parse-when-idle)
@@ -45,12 +48,13 @@
   (search-forward "fo" nil nil 2)
   (should (eq (get-text-property (point) 'face) font-lock-keyword-face))
   (search-forward "ba")
-  (should (eq (get-text-property (point) 'face) font-lock-keyword-face)
+  (should (eq (get-text-property (point) 'face) 
font-lock-keyword-face))
 
 (define-derived-mode foo2-mode fundamental-mode ""
   (setq font-lock-defaults '(foo-mode-keywords t t ((?_ . "w")
 
 (ert-deftest mmm-font-lock-with-font-lock-syntax-table ()
+  (mmm-with-global-font-lock
   (ert-with-test-buffer nil
 (let (mmm-mode-ext-classes-alist
   mmm-parse-when-idle)
@@ -60,12 +64,13 @@
   (mmm-mode-on)
   (mmm-ify-by-regexp 'foo2-mode "// " 0 "\\'" 0 nil)
   (font-lock-fontify-region (point-min) (point-max))
-  (should-not (next-single-property-change (point-min) 'face)
+  (should-not (next-single-property-change (point-min) 'face))
 
 (define-derived-mode foo3-mode fundamental-mode ""
   (setq font-lock-defaults '(foo-mode-keywords nil t ((?_ . "w")
 
 (ert-deftest mmm-syntax-propertize-function-preserves-current-syntax-table ()
+  (mmm-with-global-font-lock
   (ert-with-test-buffer nil
 (let (mmm-mode-ext-classes-alist
   mmm-parse-when-idle)
@@ -79,9 +84,10 @@
   (let ((pt (next-single-property-change (point-min) 'face)))
 (should pt)
 (goto-char pt)
-(should (looking-at "foo\\'"))
+(should (looking-at "foo\\'")))
 
 (ert-deftest mmm-fontify-region-list-ignores-outside-for-syntactic-ff-tion ()
+  (mmm-with-global-font-lock
   (ert-with-test-buffer nil
 (let (mmm-mode-ext-classes-alist
   mmm-parse-when-idle
@@ -96,9 +102,10 @@
   (font-lock-fontify-region (point-min) (point-max))
   (search-backward "var")
   (should (eq 'font-lock-keyword-face
-  (get-text-property (point) 'face))
+  (get-text-property (point) 'face)))
 
 (ert-deftest mmm-fontify-region-list-carries-string-after-subregion ()
+  (mmm-with-global-font-lock
   (ert-with-test-buffer nil
 (let (mmm-mode-ext-classes-alist
   mmm-parse-when-idle
@@ -113,4 +120,4 @@
   (should (null (get-text-property (point) 'face)))
   (search-forward "bar")
   (should (eq 'font-lock-string-face
-  (get-text-property (point) 'face))
+  (get-text-property (point) 'face)))
diff --git a/tests/html-erb.el b/tests/html-erb.el
index 25188e597f..874cf7fde4 100644
--- a/tests/html-erb.el
+++ b/tests/html-erb.el
@@ -1,4 +1,4 @@
-;; Copyright (C) 2013, 2020  Free Software Foundation, Inc.
+;; Copyright (C) 2013, 2020, 2022  Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
 
@@ -22,6 +22,7 @@
 (require 'ert)
 (require 'ert-x)
 (require 'mmm-erb)
+(require 'mmm-test-util)
 
 (defvar mmm-erb-text
   "<%= foo do %>
@@ -42,6 +43,7 @@
   (setq body (nthcdr 2 body)))
 `(ert-deftest ,(intern (format "mmm-erb-%s" name)) ()
:expected-result ,(or expected-result :passed)
+   (mmm-with-global-font-lock
(ert-with-test-buffer nil
  (let ((buffer-file-name "foo.html.erb")
(mmm-global-mode 'maybe)
@@ -51,7 +53,7 @@
(html-erb-mode)
(mmm-mode-on-maybe)
(should mmm-mode)
-   ,@body)
+   ,@body))
 
 (put 'mmm-erb-deftest 'lisp-indent-function 'defun)
 
diff --git a/tests/mmm-test-util.el b/tests/mmm-test-util.el
new file mode 100644
index 00..2518a6c90

[elpa] externals/mmm-mode updated (328b6a9c67 -> 3c2071347a)

[ELPA Syncer]

elpasync pushed a change to branch externals/mmm-mode.

  from  328b6a9c67 Merge pull request #132 from snogge/texinfo-fixes
   new  f21c8f35ec Make the tests work in batch mode
   new  96d832f61a Add Makefile to compile and test test code, and build 
docs
   new  921a7d917b Remove Automake and spec files
   new  b18a363679 Include README, README.Mason and FAQ in elpa package
   new  9a47119a02 Add mmm-autoload-class-private-p and use it
   new  122bcd6d0c Drop rx-let, use mmm-add-group for the sh-here-doc 
classes
   new  5c985be5cb Add GitHub Workflow for testing
   new  d1c85e5e2c Release 0.5.9
   new  3c2071347a Merge pull request #133 from snogge/batch-tests


Summary of changes:
 .elpaignore|20 -
 .github/workflows/test.yml |52 +
 .gitignore |12 +-
 INSTALL|   182 -
 Makefile   |50 +
 Makefile.am|14 -
 NEWS   |18 +-
 acinclude.m4   |   165 -
 autogen.sh |28 -
 configure.ac   |22 -
 install-sh |   251 -
 mdate-sh   |92 -
 missing|   215 -
 mmm-auto.el| 6 +
 mmm-cmds.el| 3 +-
 mmm-mode.el| 2 +-
 mmm-mode.spec  |40 -
 mmm-sample.el  |57 +-
 tests/highlighting.el  |19 +-
 tests/html-erb.el  | 6 +-
 tests/mmm-test-util.el |53 +
 texinfo.tex| 11758 ---
 22 files changed, 225 insertions(+), 12840 deletions(-)
 create mode 100644 .github/workflows/test.yml
 delete mode 100644 INSTALL
 create mode 100644 Makefile
 delete mode 100644 Makefile.am
 delete mode 100644 acinclude.m4
 delete mode 100755 autogen.sh
 delete mode 100644 configure.ac
 delete mode 100755 install-sh
 delete mode 100755 mdate-sh
 delete mode 100755 missing
 delete mode 100644 mmm-mode.spec
 create mode 100644 tests/mmm-test-util.el
 delete mode 100644 texinfo.tex

[elpa] externals/mmm-mode b18a363679 4/9: Include README, README.Mason and FAQ in elpa package

[ELPA Syncer]

branch: externals/mmm-mode
commit b18a363679e7b6d4e8c0799794f87d717c6dfe66
Author: Ola Nilsson 
Commit: Ola Nilsson 

Include README, README.Mason and FAQ in elpa package
---
 .elpaignore | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/.elpaignore b/.elpaignore
index c33538694e..c569c90b06 100644
--- a/.elpaignore
+++ b/.elpaignore
@@ -4,12 +4,9 @@
 AUTHORS
 ChangeLog
 Checklist
-FAQ
 INSTALL
 Makefile
 NEWS
-README
-README.Mason
 TODO
 mmm.texi
 tests

[elpa] externals/mmm-mode 122bcd6d0c 6/9: Drop rx-let, use mmm-add-group for the sh-here-doc classes

[ELPA Syncer]

branch: externals/mmm-mode
commit 122bcd6d0c05dfe43ddeda6370c507fd42b0f828
Author: Ola Nilsson 
Commit: Ola Nilsson 

Drop rx-let, use mmm-add-group for the sh-here-doc classes

rx-let was introduced in GNU Emacs 27.1.
Switch from mmm-add-classes to mmm-add-group.
---
 mmm-sample.el | 57 +++--
 1 file changed, 27 insertions(+), 30 deletions(-)

diff --git a/mmm-sample.el b/mmm-sample.el
index a4a3e87181..aa17f5e6a8 100644
--- a/mmm-sample.el
+++ b/mmm-sample.el
@@ -186,39 +186,36 @@ Use `mmm-get-lang-mode' to find the submode."
   (mmm-get-lang-mode front-string "<<-?\\(['\"]?\\)\\([-a-zA-Z0-9_]+\\)\\1" 2))
 
 ;; HEREDOC for shell scripts following the POSIX definition.  It is
-;; defined in two classes that are then grouped into the class
+;; defined in two private classes that are then grouped into the class
 ;; sh-here-doc
 ;; Define some regex-parts that are reused a lot.
 ;; START is the '<<' sequence
-(rx-let ((start (sequence (or line-start (not "<")) "<<"))
-;; DELIM is supposed to be a WORD, which is a complicated 
definition.
-;; It may be quoted with ', ", or `
- (delim (sequence (group-n 2 (optional (any ?' ?\" ?`)))
-  (group-n 1
-(char "_a-zA-Z0-9")
-(one-or-more (char "-" "_a-zA-Z0-9")))
-  (backref 2
-  ;; some repeated class properties
-  (let ((common-props '(:front-offset (end-of-line 1)
-:save-matches t
-:delimiter-mode nil
-:match-submode mmm-sh-here-doc-get-mode)))
-(mmm-add-classes
- `((sh-here-doc-unindented
-:front ,(rx start delim)
-:back ,(rx line-start "~1" line-end)
-,@common-props
-:insert ((?d here-doc "Here-document Name: " @ "<<" str _ "\n"
- @ "\n" @ str "\n" @)))
-   (sh-here-doc-indented
-:front ,(rx start "-" delim)
-:back ,(rx line-start (zero-or-more "\t") "~1" line-end)
-,@common-props
-:insert ((?D here-doc "Here-document Name: " @ "<<-" str _ "\n"
- @ "\n" @ str "\n" @)))
-   (sh-here-doc ; define a grouping class
-:classes (sh-here-doc-unindented sh-here-doc-indented))
-
+(let ((start '(sequence (or line-start (not "<")) "<<"))
+  ;; DELIM is supposed to be a WORD, which is a complicated definition.
+  ;; It may be quoted with ', ", or `
+  (delim '(sequence (group-n 2 (optional (any ?' ?\" ?`)))
+(group-n 1
+  (char "_a-zA-Z0-9")
+  (one-or-more (char "-" "_a-zA-Z0-9")))
+(backref 2)))
+  (common-props '(:front-offset (end-of-line 1)
+  :save-matches t
+  :delimiter-mode nil
+  :match-submode mmm-sh-here-doc-get-mode)))
+  (mmm-add-group
+   'sh-here-doc
+   `((sh-here-doc-unindented
+  :front ,(rx-to-string `(sequence ,start ,delim))
+  :back ,(rx line-start "~1" line-end)
+  ,@common-props
+  :insert ((?d here-doc "Here-document Name: " @ "<<" str _ "\n"
+   @ "\n" @ str "\n" @)))
+ (sh-here-doc-indented
+  :front ,(rx-to-string `(sequence ,start "-" ,delim))
+  :back ,(rx line-start (zero-or-more "\t") "~1" line-end)
+  ,@common-props
+  :insert ((?D here-doc "Here-document Name: " @ "<<-" str _ "\n"
+   @ "\n" @ str "\n" @))
 
 ;;}}}
 ;;{{{ Embperl

[elpa] externals/mmm-mode 5c985be5cb 7/9: Add GitHub Workflow for testing

[ELPA Syncer]

branch: externals/mmm-mode
commit 5c985be5cbc3dba8075030675f2a0cd50bac251c
Author: Ola Nilsson 
Commit: Ola Nilsson 

Add GitHub Workflow for testing
---
 .github/workflows/test.yml | 52 ++
 1 file changed, 52 insertions(+)

diff --git a/.github/workflows/test.yml b/.github/workflows/test.yml
new file mode 100644
index 00..ff2a6c8654
--- /dev/null
+++ b/.github/workflows/test.yml
@@ -0,0 +1,52 @@
+name: CI
+
+on:
+  workflow_dispatch:
+  pull_request:
+  push:
+paths-ignore:
+- 'AUTHORS'
+- 'ChangeLog'
+- 'Checklist'
+- 'COPYING'
+- '.elpaignore'
+- 'FAQ'
+- 'NEWS'
+- 'README'
+- 'README.Mason'
+- 'TODO'
+
+jobs:
+  build:
+runs-on: ubuntu-latest
+continue-on-error: ${{ matrix.experimental }}
+strategy:
+  matrix:
+emacs_version:
+  - 25.1
+  - 25.2
+  - 25.3
+  - 26.1
+  - 26.2
+  - 26.3
+  - 27.1
+  - 27.2
+  - 28.1
+  - 28.2
+experimental: [false]
+include:
+  - emacs_version: snapshot
+experimental: true
+steps:
+- uses: purcell/setup-emacs@master
+  with:
+version: ${{ matrix.emacs_version }}
+
+- uses: actions/checkout@v3
+- name: Compile and Build Docs
+  run: make all docs -j2
+  shell: bash -ev {0}
+- name: Run tests
+  run: make check
+  shell: bash -ev {0}
+

[elpa] externals/mmm-mode 9a47119a02 5/9: Add mmm-autoload-class-private-p and use it

[ELPA Syncer]

branch: externals/mmm-mode
commit 9a47119a024a6b48d22d9737cdacc1f0e8f1fc5a
Author: Ola Nilsson 
Commit: Ola Nilsson 

Add mmm-autoload-class-private-p and use it

caddr was introduced in GNU Emacs 26.1.
---
 mmm-auto.el | 6 ++
 mmm-cmds.el | 3 ++-
 2 files changed, 8 insertions(+), 1 deletion(-)

diff --git a/mmm-auto.el b/mmm-auto.el
index 65af9c1dc5..b5fd074a46 100644
--- a/mmm-auto.el
+++ b/mmm-auto.el
@@ -98,6 +98,12 @@ invoked by a public class in the same file."
 (add-to-list 'mmm-autoloaded-classes
  (list class file private
 
+(defun mmm-autoload-class-private-p (autoload-class-entry)
+  "Return t if AUTOLOAD-CLASS-ENTRY is marked as private.
+AUTOLOAD-CLASS-ENTRY shall be an entry of the variable
+`mmm-autoloaded-classes'."
+  (nth 2 autoload-class-entry))
+
 ;;}}}
 ;;{{{ Autoload Functions
 
diff --git a/mmm-cmds.el b/mmm-cmds.el
index 8ce6200c58..4714411402 100644
--- a/mmm-cmds.el
+++ b/mmm-cmds.el
@@ -49,7 +49,8 @@
 (append
  (cl-remove-if (lambda (spec) (plist-get (cdr spec) 
:private))
 mmm-classes-alist)
- (cl-remove-if #'caddr mmm-autoloaded-classes)))
+ (cl-remove-if #'mmm-autoload-class-private-p
+   mmm-autoloaded-classes)))
 :test #'equal)
nil t
   (unless (eq class (intern ""))

[elpa] externals/denote a59a711f17: Add denote-keywords-sort function

[ELPA Syncer]

branch: externals/denote
commit a59a711f176723f87d0f3bff283e72b1f22bf4b5
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Add denote-keywords-sort function

The intent is to abstract the task of sorting the keywords.  Before,
it was handled by the 'denote-keywords-prompt', which meant that
keywords were not sorted when the 'denote' function was called from
Lisp.

Thanks to Florian for bringing this matter to my attention:

.
---
 README.org | 11 ++-
 denote.el  | 19 +--
 2 files changed, 23 insertions(+), 7 deletions(-)

diff --git a/README.org b/README.org
index 7324a27118..3583f04cdf 100644
--- a/README.org
+++ b/README.org
@@ -2430,6 +2430,13 @@ might change them without further notice.
   ~denote-known-keywords~.  Else use only the latter set of keywords
   ([[#h:6a92a8b5-d766-42cc-8e5b-8dc255466a23][Standard note creation]]).
 
+#+findex: denote-keywords-sort
++ Function ~denote-keywords-sort~ :: Sort =KEYWORDS= if
+  ~denote-sort-keywords~ is non-nil.  =KEYWORDS= is a list of strings,
+  per ~denote-keywords-prompt~.  [ This function is part of
+  {{{development-version}}}.  Before, the keywords were sorted by the
+  ~denote-keywords-prompt~. ]
+
 #+findex: denote-directory
 + Function ~denote-directory~ :: Return path of the variable
   ~denote-directory~ as a proper directory, also because it accepts a
@@ -2572,7 +2579,9 @@ might change them without further notice.
 + Function ~denote-keywords-prompt~ :: Prompt for one or more
   keywords.  In the case of multiple entries, those are separated by
   the ~crm-sepator~, which typically is a comma.  In such a scenario,
-  the output is sorted with ~string-lessp~.
+  the output is sorted with ~string-lessp~.  To sort the return value,
+  use ~denote-keywords-sort~.  [ The ~denote-keywords-sort~ is part of
+  {{{development-version}}}. ]
 
 #+findex: denote-title-prompt
 + Function ~denote-title-prompt~ :: Read file title for ~denote~.
diff --git a/denote.el b/denote.el
index 8a6b2e1d0f..a1a72f7c20 100644
--- a/denote.el
+++ b/denote.el
@@ -731,11 +731,17 @@ keywords."
   "Prompt for one or more keywords.
 In the case of multiple entries, those are separated by the
 `crm-sepator', which typically is a comma.  In such a case, the
-output is sorted with `string-lessp'."
-  (let ((choice (denote--keywords-crm (denote-keywords
-(if denote-sort-keywords
-(sort choice #'string-lessp)
-  choice)))
+output is sorted with `string-lessp'.
+
+To sort the return value, use `denote-keywords-sort'."
+  (denote--keywords-crm (denote-keywords)))
+
+(defun denote-keywords-sort (keywords)
+  "Sort KEYWORDS if `denote-sort-keywords' is non-nil.
+KEYWORDS is a list of strings, per `denote-keywords-prompt'."
+  (if denote-sort-keywords
+  (sort keywords #'string-lessp)
+keywords))
 
 (define-obsolete-function-alias
   'denote--keywords-prompt
@@ -1380,6 +1386,7 @@ When called from Lisp, all arguments are optional.
  (append args nil)))
   (let* ((title (or title ""))
  (file-type (denote--valid-file-type (or file-type denote-file-type)))
+ (kws (denote--keywords-sort keywords))
  (date (if (or (null date) (string-empty-p date))
(current-time)
  (denote--valid-date date)))
@@ -1391,7 +1398,7 @@ When called from Lisp, all arguments are optional.
template
  (or (alist-get template denote-templates) ""
 (denote-barf-duplicate-id id)
-(denote--prepare-note title keywords date id directory file-type template)
+(denote--prepare-note title kws date id directory file-type template)
 (denote--keywords-add-to-history keywords)))
 
 (defvar denote--title-history nil

[elpa] main 318f939457 2/2: elpa-packages (mmm-mode): Fix last change

[Stefan Monnier via]

branch: main
commit 318f9394579988f560380486a117beb1c3ed88cb
Author: Stefan Monnier 
Commit: Stefan Monnier 

elpa-packages (mmm-mode): Fix last change

`:url` (or `:core`) needs to be the first keyword.
---
 elpa-packages | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/elpa-packages b/elpa-packages
index 68ee428edc..51caacd04f 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -463,9 +463,8 @@
   :auto-sync t)
  ("minibuffer-line":url nil)
  ("minimap":url nil)
- ("mmm-mode"
+ ("mmm-mode"   :url "https://github.com/purcell/mmm-mode.git";
   :doc "mmm.texi"
-  :url "https://github.com/purcell/mmm-mode.git";
   :auto-sync t)
  ("modus-themes"   :core ("etc/themes/modus-themes.el"
"etc/themes/modus-operandi-theme.el"

[elpa] main 8d849e591e 1/2: * html/layout.css: Fix rendering of markdown code blocks

[Stefan Monnier via]

branch: main
commit 8d849e591e3bf2deacffe384f104cd2ba4ebd280
Author: Stefan Monnier 
Commit: Stefan Monnier 

* html/layout.css: Fix rendering of markdown code blocks
---
 html/layout.css | 18 +-
 1 file changed, 17 insertions(+), 1 deletion(-)

diff --git a/html/layout.css b/html/layout.css
index 807cf1b4e6..df08da8925 100644
--- a/html/layout.css
+++ b/html/layout.css
@@ -112,6 +112,11 @@ a:hover {
   text-decoration: underline;
 }
 
+/* FIXME: This is meant for inline `code` but also matches block `code` :-(
+   I tried to use `:not(pre) code` so that it applies to all `code`
+   except those immediately within a `pre` but AFAICT it then did not match
+   anything at all.  So instead I use a separate rule for `pre code` which
+   overrides some of these settings.  */
 tt, code {
   font-family: "Fira Mono", monospace;
   background-color: rgb(238, 238, 238);
@@ -121,13 +126,24 @@ tt, code {
   white-space: nowrap;
 }
 
+/* FIXME: This overrides the above settings for the non-inline multiline
+   code blocks.  Important for Markdown rendered files which use
+   ... for multiline code blocks.  */
+pre code {
+  background: #fafafa;
+  border: 0px solid;
+  white-space: pre;
+  padding: 0px;
+}
+
 pre {
   font-family: "Fira Mono", monospace;
   font-size: 14px;
   background: #fafafa;
   padding: 1em;
-  border: 1px solid #dadada;
+  border: 0px solid;
   overflow-y: auto;
+  white-space: pre;
 }
 
 pre .kw {

[elpa] main updated (a76f53f803 -> 318f939457)

[Stefan Monnier via]

monnier pushed a change to branch main.

  from  a76f53f803 Build the manual for mmm-mode
   new  8d849e591e * html/layout.css: Fix rendering of markdown code blocks
   new  318f939457 elpa-packages (mmm-mode): Fix last change


Summary of changes:
 elpa-packages   |  3 +--
 html/layout.css | 18 +-
 2 files changed, 18 insertions(+), 3 deletions(-)

[elpa] externals/nano-modeline ef59f07a18 1/4: Updated news

[ELPA Syncer]

branch: externals/nano-modeline
commit ef59f07a181ecaf641a307bfdffc52541a7d9c5e
Author: Nicolas P. Rougier 
Commit: Nicolas P. Rougier 

Updated news
---
 nano-modeline.el | 4 
 1 file changed, 4 insertions(+)

diff --git a/nano-modeline.el b/nano-modeline.el
index f019d607f5..ae8e389abf 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -48,6 +48,10 @@
 ;;
 ;;; NEWS:
 ;;
+;; Version 0.7.2
+;; - Fix a bug in info mode (breadcrumbs)
+;; - Fix mu header mode for version 1.8
+;;
 ;; Version 0.7.1
 ;; - Fix a bug with mu4e-dashboard
 ;; - Fix a bug in pdf view mode

[elpa] externals/nano-modeline 233432d4a2 2/4: Put back padding for default style

[ELPA Syncer]

branch: externals/nano-modeline
commit 233432d4a2f56623984c2e6435c8dda34d07b6b6
Author: Nicolas P. Rougier 
Commit: Nicolas P. Rougier 

Put back padding for default style
---
 nano-modeline.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index ae8e389abf..3e7d58c922 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -146,7 +146,7 @@ Negative is downwards."
  (const :tag "Icon" icon))
   :group 'nano-modeline)
 
-(defcustom nano-modeline-prefix-padding nil
+(defcustom nano-modeline-prefix-padding t
   "Wheter to add a space after prefix part.
 
 This is useful (aesthetically) if the face of prefix uses a different 
background color than the rest of the modeline."

[elpa] externals/nano-modeline 61f62aa471 4/4: Bump version to 7.2

[ELPA Syncer]

branch: externals/nano-modeline
commit 61f62aa4716eae4fa89961955323d146e9791fca
Author: Nicolas P. Rougier 
Commit: Nicolas P. Rougier 

Bump version to 7.2
---
 nano-modeline.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index f855840b7d..53071e4272 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -4,7 +4,7 @@
 
 ;; Maintainer: Nicolas P. Rougier 
 ;; URL: https://github.com/rougier/nano-modeline
-;; Version: 0.7.1
+;; Version: 0.7.2
 ;; Package-Requires: ((emacs "27.1"))
 ;; Keywords: convenience, mode-line, header-line
 
@@ -51,6 +51,7 @@
 ;; Version 0.7.2
 ;; - Fix a bug in info mode (breadcrumbs)
 ;; - Fix mu header mode for version 1.8
+;; - Put back padding (for default style)
 ;;
 ;; Version 0.7.1
 ;; - Fix a bug with mu4e-dashboard

[elpa] externals/nano-modeline updated (14f5716a47 -> 61f62aa471)

[ELPA Syncer]

elpasync pushed a change to branch externals/nano-modeline.

  from  14f5716a47 Fix for mu 1.8
   new  ef59f07a18 Updated news
   new  233432d4a2 Put back padding for default style
   new  0c34932bb0 Wider line for mu4e headers
   new  61f62aa471 Bump version to 7.2


Summary of changes:
 nano-modeline.el | 11 ---
 1 file changed, 8 insertions(+), 3 deletions(-)

[elpa] externals/nano-modeline 0c34932bb0 3/4: Wider line for mu4e headers

[ELPA Syncer]

branch: externals/nano-modeline
commit 0c34932bb0745e267461916c83b3afbb9a326678
Author: Nicolas P. Rougier 
Commit: Nicolas P. Rougier 

Wider line for mu4e headers
---
 nano-modeline.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/nano-modeline.el b/nano-modeline.el
index 3e7d58c922..f855840b7d 100644
--- a/nano-modeline.el
+++ b/nano-modeline.el
@@ -801,7 +801,7 @@ depending on the version of mu4e."
   (derived-mode-p 'mu4e-headers-mode))
 
 (defun nano-modeline-mu4e-headers-mode ()
-  (let ((mu4e-modeline-max-width 80))
+  (let ((mu4e-modeline-max-width 120))
 (nano-modeline-render (plist-get (cdr (assoc 'mu4e-headers-mode 
nano-modeline-mode-formats)) :icon)
   "Search:"
   (or (nano-modeline-mu4e-quote

[elpa] externals/denote 392ddc085f: Fix denote-keywords-sort symbol in denote command

[ELPA Syncer]

branch: externals/denote
commit 392ddc085f0745e2835a0204827ae01e1d939f0a
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Fix denote-keywords-sort symbol in denote command

Thanks to Florian for pointing it out on the mailing list:

.
---
 denote.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/denote.el b/denote.el
index a1a72f7c20..2b0f7875f2 100644
--- a/denote.el
+++ b/denote.el
@@ -1386,7 +1386,7 @@ When called from Lisp, all arguments are optional.
  (append args nil)))
   (let* ((title (or title ""))
  (file-type (denote--valid-file-type (or file-type denote-file-type)))
- (kws (denote--keywords-sort keywords))
+ (kws (denote-keywords-sort keywords))
  (date (if (or (null date) (string-empty-p date))
(current-time)
  (denote--valid-date date)))

[elpa] externals/ef-themes abe6db4659 10/10: ef-day: make 'border' more noticeable

[ELPA Syncer]

branch: externals/ef-themes
commit abe6db46599d79a80c5cb46d9a5f8e895ac02f70
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-day: make 'border' more noticeable
---
 ef-day-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-day-theme.el b/ef-day-theme.el
index 4798a46ac0..cf69ecefa1 100644
--- a/ef-day-theme.el
+++ b/ef-day-theme.el
@@ -132,7 +132,7 @@
   (bg-warning"#ffe0aa") ; check with warning
   (bg-info   "#ddf5cc") ; check with info
 
-  (border"#cdc2bb")
+  (border"#c8bdb6")
   (cursor"#cf1f00")
   (fg-intense"#00")
 

[elpa] externals/ef-themes 597dd61423 06/10: ef-trio-light: make 'border' more noticeable

[ELPA Syncer]

branch: externals/ef-themes
commit 597dd61423cefb1a5a827cbb1a27936d9a7770ea
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-trio-light: make 'border' more noticeable
---
 ef-trio-light-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-trio-light-theme.el b/ef-trio-light-theme.el
index 9ba999bdb8..c8fcf73c87 100644
--- a/ef-trio-light-theme.el
+++ b/ef-trio-light-theme.el
@@ -132,7 +132,7 @@
   (bg-warning"#ffe5bf") ; check with warning
   (bg-info   "#d0efdf") ; check with info
 
-  (border"#cabfca")
+  (border"#c6bac5")
   (cursor"#4f45ff")
   (fg-intense"#00")
 

[elpa] externals/ef-themes fd1b9ba1fc 03/10: ef-autumn: make 'border' more noticeable

[ELPA Syncer]

branch: externals/ef-themes
commit fd1b9ba1fc34909066000c1311f2c91e5689baa6
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-autumn: make 'border' more noticeable
---
 ef-autumn-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-autumn-theme.el b/ef-autumn-theme.el
index 41cd0d1192..bd1ac9f1fb 100644
--- a/ef-autumn-theme.el
+++ b/ef-autumn-theme.el
@@ -132,7 +132,7 @@
   (bg-warning"#332800") ; check with warning
   (bg-info   "#152800") ; check with info
 
-  (border"#4f4945")
+  (border"#58514f")
   (cursor"#ffaa33")
   (fg-intense"#ff")
 

[elpa] externals/ef-themes 350af4fe70 04/10: ef-night: make 'border' more noticeable

[ELPA Syncer]

branch: externals/ef-themes
commit 350af4fe704c4a94a815595750dd46400b38f4e3
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-night: make 'border' more noticeable
---
 ef-night-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-night-theme.el b/ef-night-theme.el
index e4c8faf6e8..dcbfec121f 100644
--- a/ef-night-theme.el
+++ b/ef-night-theme.el
@@ -132,7 +132,7 @@
   (bg-warning"#332613") ; check with warning
   (bg-info   "#00251f") ; check with info
 
-  (border"#34445a")
+  (border"#3a4a66")
   (cursor"#00ccff")
   (fg-intense"#ff")
 

[elpa] externals/ef-themes 11814136d5 02/10: ef-tritanopia-dark: make 'border' more noticeable

[ELPA Syncer]

branch: externals/ef-themes
commit 11814136d504b4bbfaa04352cb5764315b03573d
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-tritanopia-dark: make 'border' more noticeable
---
 ef-tritanopia-dark-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-tritanopia-dark-theme.el b/ef-tritanopia-dark-theme.el
index b28e297f9d..c591f7cbbc 100644
--- a/ef-tritanopia-dark-theme.el
+++ b/ef-tritanopia-dark-theme.el
@@ -135,7 +135,7 @@
   (bg-warning"#371430") ; check with warning
   (bg-info   "#00253a") ; check with info
 
-  (border"#4f4f5f")
+  (border"#64")
   (cursor"#fd")
   (fg-intense"#ff")