[elpa] externals/detached 515a4da434 1/2: Add detached-debug-enabled option

[ELPA Syncer]

branch: externals/detached
commit 515a4da434ff69f6166a7c224c79f65fe9a71d80
Author: Niklas Eklund 
Commit: Niklas Eklund 

Add detached-debug-enabled option

This variable is used to instruct detached to output messages used for
debugging. That is useful for studying problems related to raise
conditions.
---
 detached.el | 18 +++---
 1 file changed, 15 insertions(+), 3 deletions(-)

diff --git a/detached.el b/detached.el
index 614967f9dc..b2ffccb735 100644
--- a/detached.el
+++ b/detached.el
@@ -225,6 +225,12 @@ If set to a non nil value the latest entry to
   :group 'detached
   :type 'sexp)
 
+(defcustom detached-debug-enabled
+  nil
+  "If t enable debug messages in `detached'."
+  :group 'detached
+  :type 'boolean)
+
 ; Public
 
 (defvar detached-session-map
@@ -1830,9 +1836,12 @@ session and trigger a state transition."
   (session-directory (detached-session-directory session))
   (is-primary
(detached--primary-detached-emacs-p session)))
+(when detached-debug-enabled
+  (message "Session %s is set to inactive by notify-watch event" 
(detached-session-id session)))
 
-;; Remove from unvalidated sessions
-(setq detached--unvalidated-session-ids (delete id 
detached--unvalidated-session-ids))
+;; Remove from un-validated sessions
+(setq detached--unvalidated-session-ids
+  (delete id detached--unvalidated-session-ids))
 
 ;; Update session
 (detached--session-state-transition-update session)
@@ -1857,7 +1866,10 @@ session and trigger a state transition."
   (session (detached--db-get-session id))
   (session-directory (detached-session-directory session))
   (is-primary (detached--primary-detached-emacs-p session)))
-(setq detached--unvalidated-session-ids (delete (detached-session-id 
session) detached--unvalidated-session-ids))
+(when detached-debug-enabled
+  (message "Session %s is set to active by notify-watch event" 
(detached-session-id session)))
+(setq detached--unvalidated-session-ids
+  (delete (detached-session-id session) 
detached--unvalidated-session-ids))
 (setf (detached--session-state session) 'active)
 (setf (detached--session-time session) `(:start ,(time-to-seconds 
(current-time)) :end 0.0 :duration 0.0 :offset 0.0))
 (detached--db-update-entry session)

[elpa] externals/detached updated (7b263b5123 -> 19bbc6fc25)

[ELPA Syncer]

elpasync pushed a change to branch externals/detached.

  from  7b263b5123 Update version to 0.10.0
   new  515a4da434 Add detached-debug-enabled option
   new  19bbc6fc25 Add timer based fallback validator


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

[elpa] externals/detached 19bbc6fc25 2/2: Add timer based fallback validator

[ELPA Syncer]

branch: externals/detached
commit 19bbc6fc251365ccb940b45e8abd35f682f50d56
Author: Niklas Eklund 
Commit: Niklas Eklund 

Add timer based fallback validator

This seems to be necessary due to raise condition situations.
---
 detached.el | 35 ++-
 1 file changed, 34 insertions(+), 1 deletion(-)

diff --git a/detached.el b/detached.el
index b2ffccb735..416a05f6df 100644
--- a/detached.el
+++ b/detached.el
@@ -991,7 +991,16 @@ cluttering the `comint-history' with dtach commands."
 (funcall (detached-session-run-function session) session)
 
 (defun detached-watch-session (session)
-  "Start to watch SESSION."
+  "Start to watch SESSION.
+
+If there is no file-notify watch on SESSION's directory it should be
+added.  This watch will ensure that when a socket is created the
+session is set to active and when the socket is deleted it is set to
+inactive.  However there could be situations where the watch creation
+is delayed and takes place after the socket appears.  This is most
+likely to happen on remote hosts.  If so we fallback to a timer for
+session validation."
+  (detached--create-session-validator session)
   (detached--watch-session-directory (detached-session-directory session)))
 
 ; Public session functions
@@ -1425,6 +1434,30 @@ cluttering the `comint-history' with dtach commands."
   "Return the session associated with ITEM."
   (cdr (assoc item detached--session-candidates)))
 
+(defun detached--create-session-validator (session)
+  "Create a function to validate SESSION.
+
+It can take some time for a dtach socket to be created.  Therefore all
+sessions are created with state unknown.  This function creates a
+function to verify that a session was created correctly.  If the
+session is missing its deleted from the database."
+  (let ((session-id (detached-session-id session))
+(start-time
+ `(:start ,(time-to-seconds (current-time)) :end 0.0 :duration 0.0 
:offset 0.0)))
+(push session-id detached--unvalidated-session-ids)
+(run-with-timer detached-dtach-socket-creation-delay
+nil
+(lambda ()
+  (when (member session-id 
detached--unvalidated-session-ids)
+(when detached-debug-enabled
+  (message "Session %s is set to active by validator" 
session-id))
+(let ((session (detached--db-get-session session-id)))
+  (setq detached--unvalidated-session-ids
+(delete session-id 
detached--unvalidated-session-ids))
+  (setf (detached--session-state session) 'active)
+  (setf (detached--session-time session) start-time)
+  (detached--db-update-entry session)))
+
 (defun detached--session-file (session file &optional local)
   "Return the full path to SESSION's FILE.
 

[elpa] externals/detached fedb0df5b0 2/2: Update version to 0.10.1

[ELPA Syncer]

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

Update version to 0.10.1
---
 CHANGELOG.org | 4 
 detached.el   | 4 ++--
 doc/detached.info | 4 ++--
 doc/detached.org  | 2 +-
 4 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/CHANGELOG.org b/CHANGELOG.org
index 94d4ab50bc..2fa62689b0 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -4,6 +4,10 @@
 
 * Development
 
+* Version 0.10.1 (2022-11-25)
+
+- Add fallback validation of sessions using timer-based solution. This should 
make sure that sessions are verified even if notify-watch fails to do it due to 
raise condition.
+
 * Version 0.10.0 (2022-11-23)
 
 - Add =edit-and-run= command, which is convenient when a session command needs 
to be tweaked before re-running.
diff --git a/detached.el b/detached.el
index 0d30343e9f..7eda4dfd66 100644
--- a/detached.el
+++ b/detached.el
@@ -5,7 +5,7 @@
 ;; Author: Niklas Eklund 
 ;; Maintainer: detached.el Development <~niklaseklund/detached...@lists.sr.ht>
 ;; URL: https://sr.ht/~niklaseklund/detached.el/
-;; Version: 0.10.0
+;; Version: 0.10.1
 ;; Package-Requires: ((emacs "27.1"))
 ;; Keywords: convenience processes
 
@@ -276,7 +276,7 @@ Valid values are: create, new and attach")
 (defvar detached-session-annotation nil
   "An annotation string.")
 
-(defconst detached-session-version "0.10.0.0"
+(defconst detached-session-version "0.10.1.0"
   "The version of `detached-session'.
 This version is encoded as [package-version].[revision].")
 
diff --git a/doc/detached.info b/doc/detached.info
index 9f75d2c7e9..49fa30bf89 100644
--- a/doc/detached.info
+++ b/doc/detached.info
@@ -1,7 +1,7 @@
 This is detached.info, produced by makeinfo version 7.0 from
 detached.texi.
 
-This manual describes the design of the ‘detached’ (version 0.10.0, last
+This manual describes the design of the ‘detached’ (version 0.10.1, last
 updated 1 November 2022) package, as well as its options and
 customizations.
 
@@ -25,7 +25,7 @@ File: detached.info,  Node: Top,  Next: Overview,  Up: (dir)
 Detached processes for GNU Emacs
 
 
-This manual describes the design of the ‘detached’ (version 0.10.0, last
+This manual describes the design of the ‘detached’ (version 0.10.1, last
 updated 1 November 2022) package, as well as its options and
 customizations.
 
diff --git a/doc/detached.org b/doc/detached.org
index a7d3bbe6e4..93d52a496b 100644
--- a/doc/detached.org
+++ b/doc/detached.org
@@ -4,7 +4,7 @@
 #+language: en
 #+options: ':t toc:nil author:t email:t
 
-#+macro: version 0.10.0
+#+macro: version 0.10.1
 #+macro: updated last updated 1 November 2022
 
 #+texinfo_filename: detached.info

[elpa] externals/detached 2c90e4a63d 1/2: Add optional debug messages in detached-session-kill

[ELPA Syncer]

branch: externals/detached
commit 2c90e4a63d6ab4ebe26dc1ccafaa197928c46a39
Author: Niklas Eklund 
Commit: Niklas Eklund 

Add optional debug messages in detached-session-kill
---
 detached.el | 4 
 1 file changed, 4 insertions(+)

diff --git a/detached.el b/detached.el
index 416a05f6df..0d30343e9f 100644
--- a/detached.el
+++ b/detached.el
@@ -1088,10 +1088,14 @@ session validation."
  ;; Attach to session
  (with-current-buffer buffer
(let 
((detached-show-session-context nil))
+ (when detached-debug-enabled
+   (message "Kill function 
attaching to session %s" (detached-session-id session)))
  (detached-shell-attach-session 
session))
(run-with-timer termination-delay 
nil
(lambda ()
  ;; Send 
termination signal to session
+ (when 
detached-debug-enabled
+   (message "Kill 
function sending termination signal to session %s" (detached-session-id 
session)))
  
(with-current-buffer buffer

(call-interactively #'comint-interrupt-subjob)
(let 
((kill-buffer-query-functions nil))

[elpa] externals/detached updated (19bbc6fc25 -> fedb0df5b0)

[ELPA Syncer]

elpasync pushed a change to branch externals/detached.

  from  19bbc6fc25 Add timer based fallback validator
   new  2c90e4a63d Add optional debug messages in detached-session-kill
   new  fedb0df5b0 Update version to 0.10.1


Summary of changes:
 CHANGELOG.org | 4 
 detached.el   | 8 ++--
 doc/detached.info | 4 ++--
 doc/detached.org  | 2 +-
 4 files changed, 13 insertions(+), 5 deletions(-)

[nongnu] elpa/sweeprolog 61d5576e4b 2/4: Do not highlight other occurrences of anonymous variables

[ELPA Syncer]

branch: elpa/sweeprolog
commit 61d5576e4b61b546697297e071be775e70a2325c
Author: Eshel Yaron 
Commit: Eshel Yaron 

Do not highlight other occurrences of anonymous variables

* sweeprolog.el (sweeprolog-analyze-fragment-variable): check for
anonymous variables ("_").
---
 sweeprolog.el | 8 +---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/sweeprolog.el b/sweeprolog.el
index 32642997af..94ccb26072 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -2089,9 +2089,11 @@ resulting list even when found in the current clause."
 ((or "var"
  `("goal_term" "meta" variable 0))
  (let ((var (buffer-substring-no-properties beg end)))
-   (with-silent-modifications
- (put-text-property beg end 'cursor-sensor-functions
-(sweeprolog-cursor-sensor-functions var)))
+   (unless (string= var "_")
+ (with-silent-modifications
+   (put-text-property beg end 'cursor-sensor-functions
+  (sweeprolog-cursor-sensor-functions
+   var
 
 (defvar sweeprolog-analyze-region-start-hook
   '(sweeprolog-analyze-start-font-lock))

[nongnu] elpa/sweeprolog 87aed9cf85 3/4: Recognize and highlight built-in predicate definitions

[ELPA Syncer]

branch: elpa/sweeprolog
commit 87aed9cf8555945b3a61c493e4aba63162e59f40
Author: Eshel Yaron 
Commit: Eshel Yaron 

Recognize and highlight built-in predicate definitions

* sweeprolog.el (sweeprolog-analyze-fragment-to-faces): recognize
"def_swi" and "def_iso" predicate head kinds .
---
 sweeprolog.el | 18 ++
 1 file changed, 18 insertions(+)

diff --git a/sweeprolog.el b/sweeprolog.el
index 94ccb26072..d9bce9ba41 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -1334,6 +1334,20 @@ resulting list even when found in the current clause."
   (:background "orange" :weight bold)
   "ISO specified predicate definitions.")
 
+(sweeprolog-defface
+  head-def-iso
+  (:inherit font-lock-builtin-face)
+  (:foreground "blue" :weight bold)
+  (:foreground "cyan" :weight bold)
+  "Built-in ISO specified predicate definitions.")
+
+(sweeprolog-defface
+  head-def-swi
+  (:inherit font-lock-builtin-face)
+  (:foreground "blue" :weight bold)
+  (:foreground "cyan" :weight bold)
+  "Built-in SWI-Prolog predicate definitions.")
+
 (sweeprolog-defface
   head-imported
   (:inherit font-lock-function-name-face)
@@ -1799,6 +1813,10 @@ resulting list even when found in the current clause."
  (list (list beg end (sweeprolog-head-test-face
 (`("head" "meta" . ,_)
  (list (list beg end (sweeprolog-head-meta-face
+(`("head" "def_iso" . ,_)
+ (list (list beg end (sweeprolog-head-def-iso-face
+(`("head" "def_swi" . ,_)
+ (list (list beg end (sweeprolog-head-def-swi-face
 (`("head" "iso" . ,_)
  (list (list beg end (sweeprolog-head-iso-face
 (`("head" "exported" . ,_)

[nongnu] elpa/sweeprolog updated (c9a4291ea9 -> 3f60ed4528)

[ELPA Syncer]

elpasync pushed a change to branch elpa/sweeprolog.

  from  c9a4291ea9 Announce recent changes in NEWS.org and bump version to 
0.9.0
   new  8debe1de52 Fix typos in README.org
   new  61d5576e4b Do not highlight other occurrences of anonymous variables
   new  87aed9cf85 Recognize and highlight built-in predicate definitions
   new  3f60ed4528 Recognize and highlight XPCE string comments as 
docstrings


Summary of changes:
 README.org|  8 
 sweeprolog.el | 38 ++
 2 files changed, 38 insertions(+), 8 deletions(-)

[nongnu] elpa/sweeprolog 8debe1de52 1/4: Fix typos in README.org

[ELPA Syncer]

branch: elpa/sweeprolog
commit 8debe1de52ce8f737d0b03a6e9c5d8472a3fccfe
Author: Eshel Yaron 
Commit: Eshel Yaron 

Fix typos in README.org
---
 README.org | 8 
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/README.org b/README.org
index 9fdfe56a33..2b5acd2740 100644
--- a/README.org
+++ b/README.org
@@ -1131,10 +1131,10 @@ test() :- TestBody.
 :- end_tests(foo_regression_tests).
 #+end_src
 
-The cursor is left between the parentheses in ~test()~ head term and the
-~TestBody~ variable is marked as a hole (see [[#filling-holes][Filling 
Holes]]).  To insert
-another unit test, place point after a complete test case and type
-~C-M-m~ or ~M-RET~ to invoke ~sweeprolog-insert-term-dwim~ (see
+The cursor is left between the parentheses of the ~test()~ head term,
+and the ~TestBody~ variable is marked as a hole (see [[#filling-holes][Filling 
Holes]]).  To
+insert another unit test, place point after a complete test case and
+type ~C-M-m~ or ~M-RET~ to invoke ~sweeprolog-insert-term-dwim~ (see
 [[#insert-term-at-point][Context-Based Term Insertion]]).
 
 [fn:3] See 
[[https://www.swi-prolog.org/pldoc/doc_for?object=section(%27packages/plunit.html%27)][Prolog
 Unit Tests in the SWI-Prolog manual]].

[nongnu] elpa/sweeprolog 3f60ed4528 4/4: Recognize and highlight XPCE string comments as docstrings

[ELPA Syncer]

branch: elpa/sweeprolog
commit 3f60ed45288efe75142cdc8959909c42e8d8ee3c
Author: Eshel Yaron 
Commit: Eshel Yaron 

Recognize and highlight XPCE string comments as docstrings

* sweeprolog.el (sweeprolog-analyze-fragment-to-faces): recognize
string comments.
---
 sweeprolog.el | 12 +++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/sweeprolog.el b/sweeprolog.el
index d9bce9ba41..d5ecf6ec66 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -1761,6 +1761,13 @@ resulting list even when found in the current clause."
   (:inherit default)
   "Directives.")
 
+(sweeprolog-defface
+  string-comment
+  (:inherit font-lock-doc-face)
+  (:inherit font-lock-doc-face :foreground "darkgreen")
+  (:inherit font-lock-doc-face :foreground "green")
+  "String comments.")
+
 (sweeprolog-defface
   structured-comment
   (:inherit font-lock-doc-face)
@@ -1804,6 +1811,9 @@ resulting list even when found in the current clause."
 (`("comment" . "structured")
  (list (list beg end nil)
(list beg end (sweeprolog-structured-comment-face
+(`("comment" . "string")
+ (list (list beg end nil)
+   (list beg end (sweeprolog-string-comment-face
 (`("comment" . ,_)
  (list (list beg end nil)
(list beg end (sweeprolog-comment-face
@@ -2019,7 +2029,7 @@ resulting list even when found in the current clause."
 ("grammar_rule"
  (list (list beg end nil) (list beg end (sweeprolog-grammar-rule-face
 ("method"
- (list (list beg end (sweeprolog-method-face
+ (list (list beg end nil) (list beg end (sweeprolog-method-face
 ("class"
  (list (list beg end (sweeprolog-class-face))
 

[elpa] externals/corfu 86929e9f39: corfu-quit-no-match: Expand docstring (See #262)

[ELPA Syncer]

branch: externals/corfu
commit 86929e9f3917f1233d694d976a2f62a51ab4a31b
Author: Daniel Mendler 
Commit: Daniel Mendler 

corfu-quit-no-match: Expand docstring (See #262)
---
 corfu.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/corfu.el b/corfu.el
index 9813da8473..b796d0334f 100644
--- a/corfu.el
+++ b/corfu.el
@@ -104,6 +104,8 @@ separator: Quit at boundary if no `corfu-separator' has 
been inserted."
 
 (defcustom corfu-quit-no-match 'separator
   "Automatically quit if no matching candidate is found.
+When staying alive even if there is no match a warning message is
+shown in the popup.
 nil: Stay alive even if there is no match.
 t: Quit if there is no match.
 separator: Only stay alive if there is no match and

[elpa] elpa-admin ac51bc6085: * elpa-admin.el (elpaa--push): Fix dir-syncing when pkg is a symbol

[Stefan Monnier via]

branch: elpa-admin
commit ac51bc60859c514642ca957964411f5dbd9c682f
Author: Stefan Monnier 
Commit: Stefan Monnier 

* elpa-admin.el (elpaa--push): Fix dir-syncing when pkg is a symbol
---
 elpa-admin.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/elpa-admin.el b/elpa-admin.el
index 6ebc29a719..b5fc63503f 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -2751,7 +2751,7 @@ relative to elpa root."
 (elpaa--urtb pkg-spec "release")
 elpaa--release-branch-prefix pkg
 (message "Pushed %s successfully:\n%s" pkg (buffer-string))
-(when (file-directory-p (expand-file-name pkg "packages"))
+(when (file-directory-p (elpaa--pkg-root pkg))
   (elpaa--worktree-sync pkg-spec)))
(t
 (message "Push error for %s:\n%s" pkg (buffer-string)))

[elpa] main a82afbb096: elpa-packages: Use symbols for package names

[Stefan Monnier via]

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

elpa-packages: Use symbols for package names

This aligns better with other uses of package names in ELPA
---
 elpa-packages | 830 +-
 1 file changed, 412 insertions(+), 418 deletions(-)

diff --git a/elpa-packages b/elpa-packages
index cb7147ce4e..f86d666c31 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -33,83 +33,82 @@
 ;; some manual intervention (typically, because the two branches have
 ;; diverged).
 
-(("ace-window" :url "https://github.com/abo-abo/ace-window";
+((ace-window   :url "https://github.com/abo-abo/ace-window";
   :auto-sync t)
- ("ack":url "https://github.com/leoliu/ack-el";
+ (ack  :url "https://github.com/leoliu/ack-el";
   :auto-sync t)
- ("ada-mode"   :url nil
+ (ada-mode :url nil
   :doc ("ada-mode.texi")
   :release-branch t)
- ("ada-ref-man":url nil)
- ("adaptive-wrap"  :url nil)
- ("adjust-parens"  :url nil)
- ("advice-patch"   :url nil)
- ("aggressive-completion" :url nil
+ (ada-ref-man  :url nil)
+ (adaptive-wrap:url nil)
+ (adjust-parens:url nil)
+ (advice-patch :url nil)
+ (aggressive-completion :url nil
   :auto-sync t)
- ("aggressive-indent"  :url 
"https://github.com/Malabarba/aggressive-indent-mode";
+ (aggressive-indent:url 
"https://github.com/Malabarba/aggressive-indent-mode";
   :auto-sync t)
- ("agitate":url "https://git.sr.ht/~protesilaos/agitate";
+ (agitate  :url "https://git.sr.ht/~protesilaos/agitate";
   :auto-sync t
   :doc "README.org"
   :readme "README.md"
   :ignored-files ("COPYING" "doclicense.texi"))
- ("ahungry-theme"  :url "https://github.com/ahungry/color-theme-ahungry";)
- ("aircon-theme":url "https://git.sr.ht/~chambln/aircon-theme.el";
+ (ahungry-theme:url 
"https://github.com/ahungry/color-theme-ahungry";)
+ (aircon-theme :url "https://git.sr.ht/~chambln/aircon-theme.el";
   :ignored-files ("README" "COPYING")
   :readme ignore
   :auto-sync t)
- ("all":url nil)
- ("ampc"   :url nil)
- ("arbitools"  :url nil)
- ("ascii-art-to-unicode" :url nil)
+ (all  :url nil)
+ (ampc :url nil)
+ (arbitools:url nil)
+ (ascii-art-to-unicode :url nil)
  ;; FIXME: Need to fix the manual's build problem.
- ;; ("assess"  :url "https://github.com/phillord/assess";
+ ;; (assess:url "https://github.com/phillord/assess";
  ;;  :doc "assess-doc.org"
  ;;  :auto-sync t)
- ("async"  :url "https://github.com/jwiegley/emacs-async";
+ (async:url "https://github.com/jwiegley/emacs-async";
   :ignored-files ("COPYING")
   :auto-sync t)
- ("auctex" :url "git://git.sv.gnu.org/auctex.git"
+ (auctex   :url "git://git.sv.gnu.org/auctex.git"
   ;; AUCTeX is currently sync'd manually and elpa.git isn't quite a mirror :-(
   :auto-sync nil)
- ("aumix-mode" :url nil)
- ("auto-correct"   :url nil)
- ("auto-overlays"  :url "http://www.dr-qubit.org/git/predictive.git";
+ (aumix-mode   :url nil)
+ (auto-correct :url nil)
+ (auto-overlays:url 
"http://www.dr-qubit.org/git/predictive.git";
   :doc "docs/auto-overlay-manual.texinfo")
  ;; FIXME: Avy diverged https://github.com/abo-abo/avy/issues/344
- ("avy":url "https://github.com/abo-abo/avy";)
- ("bbdb"   :url "git://git.savannah.nongnu.org/bbdb.git"
+ (avy  :url "https://github.com/abo-abo/avy";)
+ (bbdb :url "git://git.savannah.nongnu.org/bbdb.git"
   :lisp-dir "lisp"
   :doc "doc/bbdb.texi"
   ;; The BBDB branch in elpa.git is managed directly by hand, with
   ;; a "parallel" history to that of the upstream.
   :auto-sync nil)
- ("beacon" :url "https://github.com/Malabarba/beacon";
+ (beacon   :url "https://github.com/Malabarba/beacon";
   :auto-sync t)
- ("bind-key" :url "https://github.com/jwiegley/use-package";
+ (bind-key :url "https://github.com/jwiegley/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";
+ (blist:url "https://gitlab.com/mmemmew/blist";
   :doc "blist.texinfo"
   :readme "README.org"
   :auto-sync t)
- ("bluetooth"  :url "https://gitlab.com/rstocker/emacs-bluetooth";
+ (bluetooth:url "https://gitlab.com/rstocker/emacs-bluetooth";
   :auto-sync t)
- ("bnf-mode"   :url "https://githu

[elpa] elpa-admin 0d2a9c8d55: * elpa-admin.el (elpaa--check-dependencies): Improve error message

[Stefan Monnier via]

branch: elpa-admin
commit 0d2a9c8d556fa4fd9741ddb80a558f839a9561b6
Author: Stefan Monnier 
Commit: Stefan Monnier 

* elpa-admin.el (elpaa--check-dependencies): Improve error message
---
 elpa-admin.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/elpa-admin.el b/elpa-admin.el
index b5fc63503f..2b84437c7e 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -580,8 +580,8 @@ returns.  Return the selected revision."
  ((and pkg-vers (version-list-<= vers pkg-vers)) nil)
  ((not ac-data)
   (error "Unknown required package: %S" pkg))
- (t (error "Unavailable version %S for package %S"
-   (package-version-join vers) pkg)
+ (t (error "%S-%s > than available (%s)"
+   pkg (package-version-join vers) pkg-vers)
 
 (defun elpaa--prune-old-tarballs (tarball oldtarballs destdir &optional minage)
   ;; Make sure we don't count ourselves among the "old" tarballs.

[elpa] elpa-admin 509df4b7bb: * elpa-admin.el (elpaa--check-dependencies): Improve error message

[Stefan Monnier via]

branch: elpa-admin
commit 509df4b7bba68a73f305b256d6b4c5621ab3f62a
Author: Stefan Monnier 
Commit: Stefan Monnier 

* elpa-admin.el (elpaa--check-dependencies): Improve error message
---
 elpa-admin.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/elpa-admin.el b/elpa-admin.el
index 2b84437c7e..48993276e3 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -580,7 +580,7 @@ returns.  Return the selected revision."
  ((and pkg-vers (version-list-<= vers pkg-vers)) nil)
  ((not ac-data)
   (error "Unknown required package: %S" pkg))
- (t (error "%S-%s > than available (%s)"
+ (t (error "Required %S-%s > than available (%s)"
pkg (package-version-join vers) pkg-vers)
 
 (defun elpaa--prune-old-tarballs (tarball oldtarballs destdir &optional minage)

[nongnu] elpa/sweeprolog 92cca7eb12 2/2: Announce recent changes in NEWS.org and bump version to 0.9.1

[ELPA Syncer]

branch: elpa/sweeprolog
commit 92cca7eb12069daf7113452c2826ac5b1c96bf4b
Author: Eshel Yaron 
Commit: Eshel Yaron 

Announce recent changes in NEWS.org and bump version to 0.9.1
---
 NEWS.org  | 18 ++
 sweeprolog.el |  2 +-
 2 files changed, 19 insertions(+), 1 deletion(-)

diff --git a/NEWS.org b/NEWS.org
index a3268f277a..c2d11d1f7e 100644
--- a/NEWS.org
+++ b/NEWS.org
@@ -11,6 +11,24 @@ SWI-Prolog in Emacs.
 For further details, please consult the manual:
 .
 
+* Version 0.9.1 on 2022-11-25
+
+** Predicate completion adjusts candidates arity according to the context
+
+Completing predicate invocations with ~completion-at-point~ now takes
+into account the number of arguments that will be implicitly added to
+the created predicate call by the context, and adjusts the completion
+candidates appropriately.  This applies both to DCG non-terminal
+bodies (where two implicit arguments are normally added to all
+predicate invocations), and to meta-calls such as ~include(foo, L0, L)~
+where the sole argument of ~foo/1~ is implicitly passed by ~include/3~.
+
+** Variable highlighting now excludes anonymous variables
+
+Unlike other variables, occurrences of anonymous variables (~_~) are no
+longer highlighted when the cursor enters one, since being anonymous
+they are semantically unrelated to each other.
+
 * Version 0.9.0 on 2022-11-23
 
 ** New command for creating =PlUnit= test blocks
diff --git a/sweeprolog.el b/sweeprolog.el
index cde6cb568f..f0eccbf827 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -6,7 +6,7 @@
 ;; Maintainer: Eshel Yaron <~eshel/d...@lists.sr.ht>
 ;; Keywords: prolog languages extensions
 ;; URL: https://git.sr.ht/~eshel/sweep
-;; Package-Version: 0.9.0
+;; Package-Version: 0.9.1
 ;; Package-Requires: ((emacs "28.1"))
 
 ;; This file is NOT part of GNU Emacs.

[nongnu] elpa/sweeprolog 07b9a40b20 1/2: Adjust arity of predicates according to completion context

[ELPA Syncer]

branch: elpa/sweeprolog
commit 07b9a40b203a0b2900ddc3682a3334929a240373
Author: Eshel Yaron 
Commit: Eshel Yaron 

Adjust arity of predicates according to completion context

* sweep.pl (sweep_context_callable): track required arity adjustment.
(sweep_predicate_completion_candidates): take arity difference as
argument, adjust and filter candidates according to it.
* sweeprolog.el (sweeprolog-predicate-completion-at-point): use it.
* sweeprolog-tests.el: test it.
---
 sweep.pl| 72 ++---
 sweeprolog-tests.el | 50 +++--
 sweeprolog.el   |  5 ++--
 3 files changed, 90 insertions(+), 37 deletions(-)

diff --git a/sweep.pl b/sweep.pl
index dba4772329..ca352010f6 100644
--- a/sweep.pl
+++ b/sweep.pl
@@ -764,14 +764,22 @@ sweep_atom_collection(Sub, Col) :-
 ),
 Col).
 
-sweep_predicate_completion_candidates(_, Ps) :-
+sweep_predicate_completion_candidates(D, Ps) :-
+integer(D),
 findall(H,
 (   sweep_current_module(M),
-@(predicate_property(H, visible), M)
+(   @(predicate_property(H0, visible), M)
+;   xref_defined(_, H0, _)
+),
+adjust_arity(D, H0, H)
 ),
 Hs),
 maplist(sweep_format_predicate, Hs, Ps).
 
+adjust_arity(0, H, H) :- !.
+adjust_arity(D, H0, H) :- pi_head(F/N0, H0), !, N is N0 - D, N >= 0, 
pi_head(F/N, H).
+adjust_arity(D, H0, H) :- pi_head(M:F/N0, H0), N is N0 - D, N >= 0, 
pi_head(M:F/N, H).
+
 sweep_format_predicate(H, [S|SP]) :-
 term_variables(H, Vs),
 maplist(=('$VAR'('_')), Vs),
@@ -789,43 +797,55 @@ sweep_context_callable([H|T], R) :-
 ;   current_op(1200, _, F)
 ),
 !,
-sweep_context_callable_(T, R).
+(   F == (-->)
+->  R0 = 2
+;   R0 = 0
+),
+sweep_context_callable_(T, R0, 0, R).
 sweep_context_callable([_|T], R) :-
 sweep_context_callable(T, R).
 
-sweep_context_callable_([], true) :- !.
-sweep_context_callable_([[":"|2]], true) :- !.
-sweep_context_callable_([["("|_]|T], R) :-
-sweep_context_callable_(T, R).
-sweep_context_callable_([H|T], R) :-
+sweep_context_callable_([], R0, R1, R) :- R is R0 + R1, !.
+sweep_context_callable_([[":"|2]], R0, R1, R) :- R is R0 + R1, !.
+sweep_context_callable_([["("|_]|T], R0, R1, R) :-
+!,
+sweep_context_callable_(T, R0, R1, R).
+sweep_context_callable_([["{"|_]|T], 2, R1, R) :-
+!,
+sweep_context_callable_(T, 0, R1, R).
+sweep_context_callable_([H|T], R0, _, R) :-
 H = [F0|N],
 atom_string(F, F0),
-(   sweep_context_callable_arg(F, N)
-->  sweep_context_callable_(T, R)
-;   R = []
-).
+sweep_context_callable_arg(F, N, R1),
+sweep_context_callable_(T, R0, R1, R).
 
-sweep_context_callable_arg(Neck, _) :-
+sweep_context_callable_arg((-->), _, 2) :- !.
+sweep_context_callable_arg(Neck, _, 0) :-
 (   xref_op(_, op(1200, _, Neck))
 ->  true
 ;   current_op(1200, _, Neck)
-).
-sweep_context_callable_arg(F, N) :-
-(   current_predicate(F/M), pi_head(F/M,Head)
-;   xref_defined(_, Head, _), pi_head(F/M,Head)
 ),
+!.
+sweep_context_callable_arg(F, N, R) :-
+sweep_current_module(Mod),
+(   @(predicate_property(Head, visible), Mod)
+;   xref_defined(_, Head, _)
+),
+pi_head(F/M,Head),
 M >= N,
-catch(infer_meta_predicate(Head, Spec),
-  error(permission_error(access, private_procedure, _),
-context(system:clause/2, _)),
-  false),
+(   @(predicate_property(Head, meta_predicate(Spec)), Mod)
+;   catch(infer_meta_predicate(Head, Spec),
+  error(permission_error(access, private_procedure, _),
+context(system:clause/2, _)),
+  false)
+),
 arg(N, Spec, A),
-callable_arg(A).
+callable_arg(A, R).
 
-callable_arg(N) :- integer(N), !.
-callable_arg(^) :- !.
-callable_arg(//) :- !.
-callable_arg(:) :- !.
+callable_arg(N,N) :- integer(N), !.
+callable_arg((^),  0) :- !.
+callable_arg((//), 2) :- !.
+callable_arg((:),  0) :- !.
 
 sweep_exportable_predicates(Path0, Preds) :-
 atom_string(Path, Path0),
diff --git a/sweeprolog-tests.el b/sweeprolog-tests.el
index db03e45980..fb32a9a0d2 100644
--- a/sweeprolog-tests.el
+++ b/sweeprolog-tests.el
@@ -229,6 +229,39 @@ baz(Baz) :- Baz = opaque
 "
  
 
+(ert-deftest complete-non-terminal ()
+  "Tests completing DCG non-terminals."
+  (let ((temp (make-temp-file "sweeprolog-test"
+  nil
+  ".pl"
+  "
+barbaz --> foo.
+
+foo --> barb"
+  )))
+(find-file-literally temp)
+(sweeprolog-mode)
+(goto-char (point-max))
+(call-interactively #'completion-at-point)
+(should (string= (buffer-string)
+ "
+barbaz --> foo.
+
+foo --> barbaz

[nongnu] elpa/sweeprolog updated (3f60ed4528 -> 92cca7eb12)

[ELPA Syncer]

elpasync pushed a change to branch elpa/sweeprolog.

  from  3f60ed4528 Recognize and highlight XPCE string comments as 
docstrings
   new  07b9a40b20 Adjust arity of predicates according to completion 
context
   new  92cca7eb12 Announce recent changes in NEWS.org and bump version to 
0.9.1


Summary of changes:
 NEWS.org| 18 ++
 sweep.pl| 72 ++---
 sweeprolog-tests.el | 50 +++--
 sweeprolog.el   |  7 +++---
 4 files changed, 109 insertions(+), 38 deletions(-)

[elpa] externals/transient ec20c0b65d 2/2: manual: Improve suffix pre-command documentation

[Jonas Bernoulli]

branch: externals/transient
commit ec20c0b65dcc3b274c124c15b0dcca01cf91ce4c
Author: Jonas Bernoulli 
Commit: Jonas Bernoulli 

manual: Improve suffix pre-command documentation
---
 docs/transient.org  | 13 -
 docs/transient.texi | 13 -
 2 files changed, 24 insertions(+), 2 deletions(-)

diff --git a/docs/transient.org b/docs/transient.org
index 37845403af..b07b5f2fc9 100644
--- a/docs/transient.org
+++ b/docs/transient.org
@@ -1318,7 +1318,18 @@ function that makes sense for infixes.
 :UNNUMBERED: notoc
 :END:
 
-The default for suffixes is ~transient--do-exit~.
+By default, invoking a suffix causes the transient to be exited.
+
+If you want a different default behavior for a certain transient
+prefix command, then set its ~:transient-suffix~ slot.  The value can be
+a boolean, answering the question "does the transient stay active,
+when a suffix command is invoked?"  ~t~ means that the transient stays
+active, while ~nil~ means that invoking a suffix exits the transient.
+In either case, the exact behavior depends on whether the suffix is
+itself a prefix (i.e., a sub-prefix), an infix or a regular suffix.
+
+The behavior for an individual suffix command can be changed by
+setting its ~transient~ slot to one of the following pre-commands.
 
 - Function: transient--do-exit ::
 
diff --git a/docs/transient.texi b/docs/transient.texi
index 2b882d1725..157c866511 100644
--- a/docs/transient.texi
+++ b/docs/transient.texi
@@ -1535,7 +1535,18 @@ Call the command without exporting variables and stay 
transient.
 @anchor{Pre-commands for Suffixes}
 @subheading Pre-commands for Suffixes
 
-The default for suffixes is @code{transient--do-exit}.
+By default, invoking a suffix causes the transient to be exited.
+
+If you want a different default behavior for a certain transient
+prefix command, then set its @code{:transient-suffix} slot.  The value can be
+a boolean, answering the question "does the transient stay active,
+when a suffix command is invoked?"  @code{t} means that the transient stays
+active, while @code{nil} means that invoking a suffix exits the transient.
+In either case, the exact behavior depends on whether the suffix is
+itself a prefix (i.e., a sub-prefix), an infix or a regular suffix.
+
+The behavior for an individual suffix command can be changed by
+setting its @code{transient} slot to one of the following pre-commands.
 
 @defun transient--do-exit
 Call the command after exporting variables and exit the transient.

[elpa] externals/transient eac39e8b70 1/2: transient--do-leave: New pre-command for non-suffixes

[Jonas Bernoulli]

branch: externals/transient
commit eac39e8b70ecbc92f88384be5b181701aebe1351
Author: Jonas Bernoulli 
Commit: Jonas Bernoulli 

transient--do-leave: New pre-command for non-suffixes

Previously one would have had to use `transient--do-exit` but
unlike `transient--do-stay', that does export variable.  Avoid
this unfortunate asymmetry, even though in most, if not all,
cases it should not affect the outcome.
---
 docs/transient.org  | 31 ++-
 docs/transient.texi | 29 -
 lisp/transient.el   |  4 
 3 files changed, 46 insertions(+), 18 deletions(-)

diff --git a/docs/transient.org b/docs/transient.org
index 5105e2a8d4..37845403af 100644
--- a/docs/transient.org
+++ b/docs/transient.org
@@ -1371,22 +1371,35 @@ slot.
 :UNNUMBERED: notoc
 :END:
 
-The default for non-suffixes, i.e., commands that are bound in other
-keymaps beside the transient keymap, is ~transient--do-warn~.  Silently
-ignoring the user-error is also an option, though probably not a good
-one.
+By default, non-suffixes (commands that are bound in other keymaps
+beside the transient keymap) cannot be invoked.  Trying to invoke
+such a command results in a warning and the transient stays active.
 
-If you want to let the user invoke non-suffix commands, then use
-~transient--do-stay~ as the value of the prefix's ~transient-non-suffix~
-slot.
+If you want a different behavior, then set the ~:transient-non-suffix~
+slot of the transient prefix command.  The value can be a boolean,
+answering the question, "is it allowed to invoke non-suffix commands?"
+
+If the value is ~t~ or ~transient--do-stay~, then non-suffixes can be
+invoked, when it is ~nil~ or ~transient--do-warn~ (the default) then they
+cannot be invoked.
+
+The only other recommended value is ~transient--do-leave~.  If that is
+used, then non-suffixes can be invoked, but if one is invoked, then
+that exits the transient.
 
 - Function: transient--do-warn ::
 
   Call ~transient-undefined~ and stay transient.
 
-- Function: transient--do-noop ::
+- Function: transient--do-stay ::
+
+  Call the command without exporting variables and stay transient.
+
+- Function: transient--do-leave ::
+
+  Call the command without exporting variables and exit the transient.
 
-  Call ~transient-noop~ and stay transient.
+# transient--do-noop intentionally left undocumented.
 
 *** Special Pre-Commands
 :PROPERTIES:
diff --git a/docs/transient.texi b/docs/transient.texi
index 996cd96949..2b882d1725 100644
--- a/docs/transient.texi
+++ b/docs/transient.texi
@@ -1586,21 +1586,32 @@ be added to @code{transient-predicate-map}.
 @anchor{Pre-commands for Non-Suffixes}
 @subheading Pre-commands for Non-Suffixes
 
-The default for non-suffixes, i.e., commands that are bound in other
-keymaps beside the transient keymap, is @code{transient--do-warn}.  Silently
-ignoring the user-error is also an option, though probably not a good
-one.
+By default, non-suffixes (commands that are bound in other keymaps
+beside the transient keymap) cannot be invoked.  Trying to invoke
+such a command results in a warning and the transient stays active.
 
-If you want to let the user invoke non-suffix commands, then use
-@code{transient--do-stay} as the value of the prefix's 
@code{transient-non-suffix}
-slot.
+If you want a different behavior, then set the @code{:transient-non-suffix}
+slot of the transient prefix command.  The value can be a boolean,
+answering the question, "is it allowed to invoke non-suffix commands?"
+
+If the value is @code{t} or @code{transient--do-stay}, then non-suffixes can be
+invoked, when it is @code{nil} or @code{transient--do-warn} (the default) then 
they
+cannot be invoked.
+
+The only other recommended value is @code{transient--do-leave}.  If that is
+used, then non-suffixes can be invoked, but if one is invoked, then
+that exits the transient.
 
 @defun transient--do-warn
 Call @code{transient-undefined} and stay transient.
 @end defun
 
-@defun transient--do-noop
-Call @code{transient-noop} and stay transient.
+@defun transient--do-stay
+Call the command without exporting variables and stay transient.
+@end defun
+
+@defun transient--do-leave
+Call the command without exporting variables and exit the transient.
 @end defun
 
 @anchor{Special Pre-Commands}
diff --git a/lisp/transient.el b/lisp/transient.el
index ab51e6c37a..deeb825d45 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2412,6 +2412,10 @@ If there is no parent prefix, then behave like 
`transient--do-exit'."
   (transient--stack-zap)
   transient--exit)
 
+(defun transient--do-leave ()
+  "Call the command without exporting variables and exit the transient."
+  transient--stay)
+
 (defun transient--do-push-button ()
   "Call the command represented by the activated button.
 Use that command's pre-command to determine transient behavior."

[elpa] externals/transient updated (79d1426de1 -> ec20c0b65d)

[Jonas Bernoulli]

tarsius pushed a change to branch externals/transient.

  from  79d1426de1 transient-prompt(lisp-variable): Fallback to generic 
prompt
   new  eac39e8b70 transient--do-leave: New pre-command for non-suffixes
   new  ec20c0b65d manual: Improve suffix pre-command documentation


Summary of changes:
 docs/transient.org  | 44 ++--
 docs/transient.texi | 42 --
 lisp/transient.el   |  4 
 3 files changed, 70 insertions(+), 20 deletions(-)

[nongnu] elpa/paredit 2fe64ffbae 2/5: NEWS: Put dates on versions.

[ELPA Syncer]

branch: elpa/paredit
commit 2fe64ffbae20b187b2b09a12e4aad539f7a3
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

NEWS: Put dates on versions.

Some of these dates have limited precision because I didn't keep very
good records 17 years ago.
---
 NEWS | 40 +---
 1 file changed, 21 insertions(+), 19 deletions(-)

diff --git a/NEWS b/NEWS
index b78f37e617..201c621d86 100644
--- a/NEWS
+++ b/NEWS
@@ -16,7 +16,7 @@ Current development version: 
https://paredit.org/paredit-beta.el
 *** Various bug fixes and additions to test suite.
 *** Worked around brokenness induced by Electric Indent Mode.
 
-** Version 24
+** Version 24 -- 2014-12-06
 
 *** Slurp/barf now support prefix arguments with the obvious semantics.
 *** HTML quick reference is a little prettier now, perhaps.
@@ -30,7 +30,7 @@ Current development version: 
https://paredit.org/paredit-beta.el
 *** `backward-delete-char' changes in GNU Emacs 24 no longer botch paredit.
 *** Various bug fixes.
 
-** Version 23
+** Version 23 -- 2013-04-07
 
 Paredit no longer runs in GNU Emacs 20.  It now requires 21 or later.
 
@@ -43,7 +43,7 @@ Paredit now has a small set of automatic tests.
 *** Renamed command: paredit-recentre-on-sexp -> paredit-recenter-on-sexp
 *** Various bug fixes.
 
-** Version 22
+** Version 22 -- 2010-10-09
 
 The copying terms of paredit are now the GPLv3+, rather than the
 3-clause BSD licence.
@@ -147,7 +147,7 @@ The copying terms of paredit are now the GPLv3+, rather 
than the
 (add-to-list 'paredit-space-for-delimiter-predicates
  'paredit-space-for-delimiter-predicate-common-lisp)))
 
-** Version 21
+** Version 21 -- 2008-07-24
 
 Paredit 21 no longer has a message releasing it into the public domain.
 Instead it is copyright (C) 2008, Taylor R. Campbell, and available
@@ -341,7 +341,7 @@ for details.
   defined in terms of the modified `paredit-wrap-sexp'.  `M-[' is now
   bound to `paredit-wrap-square'.
 
-** Version 20
+** Version 20 -- 2007-04-04
 
 *** Preliminary Support for XEmacs
 
@@ -444,7 +444,7 @@ needed were:
   `M-', and `M-') now always create a new entry on the kill
   ring.
 
-** Version 19
+** Version 19 -- 2006-03-28
 
 This version introduces support for delimiters other than round
 brackets.  Previously, if the major mode's syntax table considered
@@ -475,7 +475,7 @@ until satisfied, and now C-M-SPC (mark-sexp) until you have 
marked
 the desired expressions and then any of the delimiter pair insertion
 keys to insert the delimiters.
 
-** Version 18
+** Version 18 -- 2006-02-11
 
 *** Style and Bugs
 
@@ -528,7 +528,7 @@ keys to insert the delimiters.
 - Extended paredit command examples to allow multiple steps in
   succession of a single example.
 
-** Version 17
+** Version 17 -- 2005-12-31
 
 *** Style and Bugs
 
@@ -570,7 +570,7 @@ keys to insert the delimiters.
   inserting a superfluous leading newline.  To comment out code, you
   must still use M-; or M-x comment-region.
 
-** Version 16
+** Version 16 -- 2005
 
 - Introduced M-S (paredit-split-sexp) to split lists or strings from
   the middle.
@@ -579,14 +579,14 @@ keys to insert the delimiters.
   identify the key sequence meta-semicolon, not "M-;" for M hyphen
   semicolon.
 
-** Version 15
+** Version 15 -- 2005
 
 - Rewrote comment insertion code.
 
 - Implemented M-; (paredit-comment-dwim), which is like comment-dwim
   but inserts comments more appropriately with respect to paredit.
 
-** Version 14
+** Version 14 -- 2005
 
 Version 14 introduced fancy comment handling:
 
@@ -602,7 +602,7 @@ Version 14 introduced fancy comment handling:
   uncommented) or whole S-expressions, usually in conjunction with
   C-M-SPC (mark-sexp).
 
-** Version 13
+** Version 13 -- 2005
 
 - Removed M-\ (paredit-join-sexps), whose key binding conflicts with
   delete-horizontal-space and whose implementation was inadequate and
@@ -625,7 +625,7 @@ Version 14 introduced fancy comment handling:
   . Removed unnecessary save-excursion in paredit-recentre-on-sexp.
   . IF indentation changes.
 
-** Version 12
+** Version 12 -- 2005
 
 - Implemented M-r (paredit-raise-sexp), which raises a single
   S-expression up the tree, deleting all of its siblings and its
@@ -640,7 +640,7 @@ Version 14 introduced fancy comment handling:
 
 - Made backward barfing signal an error, not just a message.
 
-** Version 11
+** Version 11 -- 2005
 
 - Changed the key for paredit-splice-sexp from M-/, which is by
   default the popular dabbrev-expand, to M-s, which I was surprised
@@ -662,7 +662,7 @@ Version 14 introduced fancy comment handling:
 
 - Rewrote much of paredit-kill, again.
 
-** Version 10
+** Version 10 -- 2005
 
 - Introduced paredit-forward and paredit-backward, which are like
   forward-sexp and backward-sexp but which will also go up a nesting
@@ -679,7 +679,7 @@ Version 14 introduced fancy comment handling:
 - Changed suggestion of what to put in your .emacs from require to
   autoload

[nongnu] elpa/paredit b28fb575b6 3/5: Credit Sean Whitton for Electric Indent Mode interactions.

[ELPA Syncer]

branch: elpa/paredit
commit b28fb575b658d2a686339b4a5ef1c9adbda4077f
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

Credit Sean Whitton for Electric Indent Mode interactions.
---
 CREDITS | 1 +
 NEWS| 1 +
 2 files changed, 2 insertions(+)

diff --git a/CREDITS b/CREDITS
index a5a07844b9..da2e1cd550 100644
--- a/CREDITS
+++ b/CREDITS
@@ -42,4 +42,5 @@ Vladimir Sedach
 Michael Weber
 Goran Weinholt
 Norman Werner
+Sean Whitton
 John Wiegley
diff --git a/NEWS b/NEWS
index 201c621d86..c299c3258f 100644
--- a/NEWS
+++ b/NEWS
@@ -15,6 +15,7 @@ Current development version: 
https://paredit.org/paredit-beta.el
 *** M-r (paredit-raise-sexp) no longer reindents single-line sexps.
 *** Various bug fixes and additions to test suite.
 *** Worked around brokenness induced by Electric Indent Mode.
+ (Thanks to Sean Whitton for reporting the bug and discussing the fix.)
 
 ** Version 24 -- 2014-12-06
 

[nongnu] elpa/paredit 506799bcd2 5/5: Release paredit.el 25.

[ELPA Syncer]

branch: elpa/paredit
commit 506799bcd200a8140dd73b02f7542ac7e1f4c223
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

Release paredit.el 25.
---
 NEWS | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/NEWS b/NEWS
index ae325d8336..6a89f57cda 100644
--- a/NEWS
+++ b/NEWS
@@ -7,7 +7,7 @@ https://paredit.org
 Latest release: https://paredit.org/paredit.el
 Current development version: https://paredit.org/paredit-beta.el
 
-** Version 25 (beta)
+** Version 25 -- 2022-11-25
 
 *** paredit now lives at paredit.org.
 *** M-r (paredit-raise-sexp) now respects active mark in Transient Mark Mode.

[nongnu] elpa/paredit updated (b9e2e6a142 -> 506799bcd2)

[ELPA Syncer]

elpasync pushed a change to branch elpa/paredit.

  from  b9e2e6a142 Move to paredit.org.
   new  c3924ac513 CREDITS: Credit Rudolf Adamkovič.
   new  2fe64ffbae NEWS: Put dates on versions.
   new  b28fb575b6 Credit Sean Whitton for Electric Indent Mode 
interactions.
   new  be9ae61843 Note migration to paredit.org in NEWS.
   new  506799bcd2 Release paredit.el 25.


Summary of changes:
 CREDITS |  2 ++
 NEWS| 48 +++-
 2 files changed, 29 insertions(+), 21 deletions(-)

[nongnu] elpa/paredit be9ae61843 4/5: Note migration to paredit.org in NEWS.

[ELPA Syncer]

branch: elpa/paredit
commit be9ae618430ce1a4facf4ba2e3494e5ddcb67b7a
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

Note migration to paredit.org in NEWS.
---
 NEWS | 5 -
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/NEWS b/NEWS
index c299c3258f..ae325d8336 100644
--- a/NEWS
+++ b/NEWS
@@ -1,12 +1,15 @@
 * Paredit Release Notes -*- outline -*-
 
-Paredit - https://paredit.org
+paredit -- parenthetical editing in Emacs
+
+https://paredit.org
 
 Latest release: https://paredit.org/paredit.el
 Current development version: https://paredit.org/paredit-beta.el
 
 ** Version 25 (beta)
 
+*** paredit now lives at paredit.org.
 *** M-r (paredit-raise-sexp) now respects active mark in Transient Mark Mode.
 *** Paredit Mode and Electric Indent Mode are noted as incompatible.
 *** M-q (paredit-reindent-defun) now respects `fill-paragraph-function'.

[nongnu] elpa/paredit c3924ac513 1/5: CREDITS: Credit Rudolf Adamkovič.

[ELPA Syncer]

branch: elpa/paredit
commit c3924ac5133853f42c79446d662d8835f468dd55
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

CREDITS: Credit Rudolf Adamkovič.

Suggested improvements to M-r in transient-mark-mode.
---
 CREDITS | 1 +
 1 file changed, 1 insertion(+)

diff --git a/CREDITS b/CREDITS
index d8cfd92bf5..a5a07844b9 100644
--- a/CREDITS
+++ b/CREDITS
@@ -10,6 +10,7 @@ long after I ought to have.  If your name is not listed here 
and you
 think it should be, or if your name is listed here and you would rather
 that it not be, then let me know.
 
+Rudolf Adamkovič
 Marco Baringer
 Eli Barzilay
 Edwin O'Connor

[nongnu] elpa/paredit daf21e0bbf 2/2: Reword CREDITS to be less prolix.

[ELPA Syncer]

branch: elpa/paredit
commit daf21e0bbf7a7dc68cc6ba3cbbe4f210f95cbf81
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

Reword CREDITS to be less prolix.
---
 CREDITS | 21 +++--
 1 file changed, 11 insertions(+), 10 deletions(-)

diff --git a/CREDITS b/CREDITS
index da2e1cd550..d0689a3c9d 100644
--- a/CREDITS
+++ b/CREDITS
@@ -1,14 +1,11 @@
-The original inspirations for paredit were Interlisp-D's structure
-editor `SEdit' -- a real structure editor, not a cheesy imitation like
-paredit -- and Guillaume Germain's sedit.el for GNU Emacs.
+Paredit was inspired by:
 
-The following people have contributed to paredit in some way -- by
-submitting patches, by discussing design, by testing paredit and
-finding broken corner cases, &c.  It is not complete: most of those who
-contributed via IRC are missing, for example, and I started this list
-long after I ought to have.  If your name is not listed here and you
-think it should be, or if your name is listed here and you would rather
-that it not be, then let me know.
+- Interlisp-D's structure editor SEdit
+- Guillaume Germain's sedit.el for GNU Emacs
+
+The following people contributed to paredit by submitting patches,
+discussing design, testing and finding broken corner cases, and in
+other ways:
 
 Rudolf Adamkovič
 Marco Baringer
@@ -44,3 +41,7 @@ Goran Weinholt
 Norman Werner
 Sean Whitton
 John Wiegley
+
+(With apologies to the early contributors from before I started writing
+this file whose names I may have forgotten!  If your name is missing,
+or if you would like your name removed, just let me know.)

[nongnu] elpa/paredit 191ee040ee 1/2: Bump version number 25->26.

[ELPA Syncer]

branch: elpa/paredit
commit 191ee040ee0d20a7f5dcc0720946d64f13099ba1
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

Bump version number 25->26.
---
 paredit.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/paredit.el b/paredit.el
index bd8cf926fd..449a75b81c 100644
--- a/paredit.el
+++ b/paredit.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 2005--2022 Taylor R. Campbell
 
 ;; Author: Taylor R. Campbell 
-;; Version: 25beta
+;; Version: 26beta
 ;; Created: 2005-07-31
 ;; Keywords: lisp
 
@@ -126,7 +126,7 @@
 
 ;;; This assumes Unix-style LF line endings.
 
-(defconst paredit-version 25)
+(defconst paredit-version 26)
 (defconst paredit-beta-p t)
 
 (eval-and-compile

[nongnu] elpa/paredit updated (506799bcd2 -> daf21e0bbf)

[ELPA Syncer]

elpasync pushed a change to branch elpa/paredit.

  from  506799bcd2 Release paredit.el 25.
   new  191ee040ee Bump version number 25->26.
   new  daf21e0bbf Reword CREDITS to be less prolix.


Summary of changes:
 CREDITS| 21 +++--
 paredit.el |  4 ++--
 2 files changed, 13 insertions(+), 12 deletions(-)

[elpa] externals/eev 99e55e7ea1: Fixed a bug in eeklfs.

[ELPA Syncer]

branch: externals/eev
commit 99e55e7ea160521bf061f30cfa76030ab038173a
Author: Eduardo Ochs 
Commit: Eduardo Ochs 

Fixed a bug in eeklfs.
---
 ChangeLog  | 4 
 VERSION| 4 ++--
 eepitch.el | 4 ++--
 eev-kla.el | 8 
 4 files changed, 12 insertions(+), 8 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 5ee01603c9..90afc49e44 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2022-11-25  Eduardo Ochs  
+
+   * eev-kla.el (ee-kl-sexp-klfs): fixed a bug.
+
 2022-11-22  Eduardo Ochs  
 
* eev-hydras.el (ee-edit-index-hydra): added , , SPC,
diff --git a/VERSION b/VERSION
index 73902ea1a3..1b7c490d23 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Wed Nov 23 02:01:14 GMT 2022
-Tue Nov 22 23:01:14 -03 2022
+Sat Nov 26 00:37:16 GMT 2022
+Fri Nov 25 21:37:16 -03 2022
diff --git a/eepitch.el b/eepitch.el
index 102e725715..f24cba7ccf 100644
--- a/eepitch.el
+++ b/eepitch.el
@@ -19,7 +19,7 @@
 ;;
 ;; Author: Eduardo Ochs 
 ;; Maintainer: Eduardo Ochs 
-;; Version:20221120
+;; Version:20221123
 ;; Keywords:   e-scripts
 ;;
 ;; Latest version: 
@@ -983,8 +983,8 @@ The arguments are explained here:
 (defun eepitch-tinyscheme () (interactive)
   (eepitch-comint "tinyscheme" "tinyscheme"))
 ;;
+;; Or: (defun eepitch-fennel () (interactive) (eepitch '(fennel-repl 
fennel-program)))
 (defun eepitch-fennel () (interactive) (eepitch-comint "fennel" "fennel"))
-;; Or: (defun eepitch-fennel () (interactive) (eepitch '(fennel-repl nil)))
 
 
 ;; Haskell, ML, Erlang, Coq:
diff --git a/eev-kla.el b/eev-kla.el
index af261b35d2..85582b295e 100644
--- a/eev-kla.el
+++ b/eev-kla.el
@@ -477,10 +477,10 @@ If (ee-kl-lrcds FNAME) doesn't return any matching 
`lrcd's, return nil."
 
 (cl-defun ee-kl-sexp-klfs (&key fname c r region)
   "ill ink to ile and tring - make sexp."
-  (setq fname  (or fname (ee-kl-fname))
-   c  (or c (ee-kl-c :fname fname))
-   r  (or r (ee-kl-r :fname fname))
-   region (or r (ee-kl-region)))
+  (setq fname  (or fname  (ee-kl-fname))
+   c  (or c  (ee-kl-c :fname fname))
+   r  (or r  (ee-kl-r :fname fname))
+   region (or region (ee-kl-region)))
   (list (ee-kl-find-cfile :fname fname :c c)
(ee-kl-shortfname :fname fname :c c :r r)
region))

[elpa] externals/org b4e437f968: ob-core: Resolve named list references to simple lists

[ELPA Syncer]

branch: externals/org
commit b4e437f968771df9555f9306467846965857f632
Author: Ihor Radchenko 
Commit: Ihor Radchenko 

ob-core: Resolve named list references to simple lists

* lisp/ob-core.el (org-babel-read-list): Return a simple list instead
of list of lists.  Document this in the docstring.
* testing/lisp/test-ob-java.el (ob-java/read-return-list):
(ob-java/read-list-return-array):
(ob-java/read-return-list-with-package): Fix tests assuming previous
behavior.
* testing/lisp/test-ob.el (test-ob/simple-variable-resolution): Add
new tests.
* etc/ORG-NEWS (List references in source block variable assignments
are now proper lists): Document the change.

This commit fixes the broken promise in the manual section 16.4
Environment of a Code Block where the named references to lists should
be converted to simple lists consisting of the top-level items.

The inconsistency existed for a while and possibly lurked into some
third-party packages.  So, announcement in NEWS is required.

Reported-by: alain.coch...@unistra.fr
Link: https://orgmode.org/list/87pmdqfao4.fsf@localhost
---
 etc/ORG-NEWS | 34 ++
 lisp/ob-core.el  | 11 +--
 testing/lisp/test-ob-java.el | 10 +-
 testing/lisp/test-ob.el  | 26 +++---
 4 files changed, 71 insertions(+), 10 deletions(-)

diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS
index f9f859bab9..63ff5d749c 100644
--- a/etc/ORG-NEWS
+++ b/etc/ORG-NEWS
@@ -778,6 +778,40 @@ If you prefer to keep the keybinding, you can add it back 
to
 (define-key org-mode-map (kbd "C-c SPC") #'org-table-blank-field)
 #+end_src
 
+*** List references in source block variable assignments are now proper lists
+
+List representation of named lists is now converted to a simple list
+as promised by the manual section [[info:org#Environment of a Code 
Block][org#Environment of a Code Block]].
+Previously, it was converted to a list of lists.
+
+Before:
+
+#+begin_src org
+,#+NAME: example-list
+- simple
+  - not
+  - nested
+- list
+
+,#+BEGIN_SRC emacs-lisp :var x=example-list :results value
+(format "%S" x)
+,#+END_SRC
+
+,#+RESULTS:
+: (("simple" (unordered ("not") ("nested"))) ("list"))
+#+end_src
+
+After:
+
+#+begin_src org
+,#+BEGIN_SRC emacs-lisp :var x=example-list :results value
+(format "%S" x)
+,#+END_SRC
+
+,#+RESULTS:
+: ("simple" "list")
+#+end_src
+
 ** New features
 
 *** New citation engine
diff --git a/lisp/ob-core.el b/lisp/ob-core.el
index 1259909a02..3a07c10d50 100644
--- a/lisp/ob-core.el
+++ b/lisp/ob-core.el
@@ -2239,8 +2239,15 @@ Return nil if ELEMENT cannot be read."
   (org-table-to-lisp)))
 
 (defun org-babel-read-list ()
-  "Read the list at point into emacs-lisp."
-  (mapcar (lambda (el) (org-babel-read el 'inhibit-lisp-eval))
+  "Read the list at point into emacs-lisp.
+
+Return the list of strings representing top level items:
+
+   (item1 item2 ...)
+
+Only consider top level items.  See Info node `(org)Environment of \
+a Code Block'."
+  (mapcar (lambda (el) (org-babel-read (car el) 'inhibit-lisp-eval))
  (cdr (org-list-to-lisp
 
 (defvar org-link-types-re)
diff --git a/testing/lisp/test-ob-java.el b/testing/lisp/test-ob-java.el
index 07540ed74a..65b7259d35 100644
--- a/testing/lisp/test-ob-java.el
+++ b/testing/lisp/test-ob-java.el
@@ -379,8 +379,8 @@ return a;
   "#+begin_src java :dir 'nil :var a=java_list :results value silent
 import java.util.List;
 import java.util.Arrays;
-List b = Arrays.asList(a.get(0).get(0),
-   a.get(1).get(0));
+List b = Arrays.asList(a.get(0),
+   a.get(1));
 return b;
 #+end_src
 
@@ -394,7 +394,7 @@ return b;
   "Read a list and return an array."
   (org-test-with-temp-text
   "#+begin_src java :dir 'nil :var a=java_list :results value silent
-String[] b = {a.get(0).get(0), a.get(1).get(0)};
+String[] b = {a.get(0), a.get(1)};
 return b;
 #+end_src
 
@@ -411,8 +411,8 @@ return b;
 package pkg;
 import java.util.List;
 import java.util.Arrays;
-List b = Arrays.asList(a.get(0).get(0),
-   a.get(1).get(0));
+List b = Arrays.asList(a.get(0),
+   a.get(1));
 return b;
 #+end_src
 
diff --git a/testing/lisp/test-ob.el b/testing/lisp/test-ob.el
index 4beaecf7bd..e4090d6d8b 100644
--- a/testing/lisp/test-ob.el
+++ b/testing/lisp/test-ob.el
@@ -204,7 +204,27 @@ list, then it should be treated as such; not as the symbol 
nil."
 (forward-line 5)
 (should (string= ": 4" (buffer-substring
(point-at-bol)
-   (point-at-eol))
+   (point-at-eol)
+  ;; Test reading lists.
+  (org-test-with-temp-text-in-file "
+
+#+NAME: example-list
+- simple
+  - not
+  - nested
+- list
+
+#+BEGIN_SRC emacs-lisp :var x=example-list
+(print x)
+#+END_SRC"
+
+(should (equal

[elpa] externals/ement f721fe3fb4 10/10: Meta: Merge commit 'a014451'

[ELPA Syncer]

branch: externals/ement
commit f721fe3fb408bc28a7dbcb296226d834fd2304e6
Merge: 12214bb0ae a014451760
Author: Adam Porter 
Commit: Adam Porter 

Meta: Merge commit 'a014451'

Somehow ELPA managed to pull during a very narrow window of time
before I corrected the changelog entry for v0.5, so it diverged, and
this is necessary to fix it.

[elpa] externals/ement f16798721b 07/10: Comment: Add TODO

[ELPA Syncer]

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

Comment: Add TODO
---
 ement-room.el | 4 
 1 file changed, 4 insertions(+)

diff --git a/ement-room.el b/ement-room.el
index f006d25bec..082b91a73d 100644
--- a/ement-room.el
+++ b/ement-room.el
@@ -999,6 +999,10 @@ Note that, if ROOM has no buffer, STRING is returned 
unchanged."
  (ement-afirst (equal room-id (ement-room-id it))
(ement-session-rooms session))
(cl-assert it nil "Room %S not found on session %S" 
room-id session-id
+;; TODO: Put point at the end of the room buffer.  However, this doesn't 
seem easy or
+;; even possible, possibly because the bookmark library itself moves point 
after this
+;; function returns.  My attempts at setting the buffer's and window's 
points after
+;; calling `ement-view-room' have had no effect.
 (ement-view-room room session)))
 
  Commands

[elpa] externals/ement e18a6c9ff1 08/10: Release: v0.5.1

[ELPA Syncer]

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

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

diff --git a/README.org b/README.org
index 95e52ae378..39ab4d299f 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.5.1-pre
+** 0.5.1
 
 *Fixes*
 + Autoload ~ement-directory~ commands.
diff --git a/ement.el b/ement.el
index f8a9b74bc0..5e42754731 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.5.1-pre
+;; Version: 0.5.1
 ;; Package-Requires: ((emacs "27.1") (map "2.1") (plz "0.2") (taxy "0.10") 
(taxy-magit-section "0.12.1") (svg-lib "0.2.5") (transient "0.3.7"))
 ;; Keywords: comm
 

[elpa] externals/ement updated (a014451760 -> f721fe3fb4)

[ELPA Syncer]

elpasync pushed a change to branch externals/ement.

  from  a014451760 Release: v0.5
   new  0d4a3040c7 Release: v0.5
   new  270718072e Meta: v0.5.1-pre
   new  56e19f26c8 Fix: (ement-directory) Add autoloads
   new  1afb185971 Comment: Add FIXME
   new  83d4e12c88 Fix: (ement-directory-define-column "Name") Faces
   new  7c0e606b93 Comment: Add TODO
   new  f16798721b Comment: Add TODO
   new  e18a6c9ff1 Release: v0.5.1
   new  12214bb0ae Meta: v0.6-pre
   new  f721fe3fb4 Meta: Merge commit 'a014451'


Summary of changes:
 README.org |  12 +
 ement-directory.el |  11 -
 ement-lib.el   | 139 -
 ement-room.el  |   4 ++
 ement.el   |   2 +-
 5 files changed, 110 insertions(+), 58 deletions(-)

[elpa] externals/ement 12214bb0ae 09/10: Meta: v0.6-pre

[ELPA Syncer]

branch: externals/ement
commit 12214bb0ae2590a6bca515fd07ff4295d5df93de
Author: Adam Porter 
Commit: Adam Porter 

Meta: v0.6-pre
---
 README.org   |   5 +++
 ement-lib.el | 139 ---
 ement.el |   2 +-
 3 files changed, 90 insertions(+), 56 deletions(-)

diff --git a/README.org b/README.org
index 39ab4d299f..e8154b2108 100644
--- a/README.org
+++ b/README.org
@@ -287,6 +287,11 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 :TOC:  :depth 0
 :END:
 
+** 0.6-pre
+
+*Changes*
++ Improve ~ement-describe-room~ command (formatting, bindings).
+
 ** 0.5.1
 
 *Fixes*
diff --git a/ement-lib.el b/ement-lib.el
index a8241b9c39..f596ae3ee6 100644
--- a/ement-lib.el
+++ b/ement-lib.el
@@ -299,61 +299,6 @@ members, show in a new buffer; otherwise show in echo 
area."
 :then list-members))
 (message "Listing members of %s..." (ement--format-room room
 
-(defun ement-describe-room (room session)
-  "Describe ROOM on SESSION."
-  (interactive (pcase-let ((`(,room ,session) (ement-complete-room :session 
ement-session)))
- (list room session)))
-  (cl-labels ((heading (string)
-   (propertize (or string "") 'face 
'font-lock-builtin-face))
-  (id (string)
-  (propertize (or string "") 'face 'font-lock-constant-face)))
-(pcase-let* (((cl-struct ement-room (id room-id) avatar display-name 
canonical-alias members timeline status topic
- (local (map fetched-members-p)))
-  room)
- ((cl-struct ement-session user) session)
- ((cl-struct ement-user (id user-id)) user)
- (inhibit-read-only t))
-  (if (not fetched-members-p)
-  ;; Members not fetched: fetch them and re-call this command.
-  (ement--get-joined-members room session
-:then (lambda (_) (ement-room-describe room session)))
-(with-current-buffer (get-buffer-create (format "*Ement room 
description: %s*" (or display-name canonical-alias room-id)))
-  (erase-buffer)
-  (let ((members (cl-sort (cl-loop for user being the hash-values of 
members
-   collect (format "%s <%s>" 
(ement--format-user user room session)
-   (id (ement-user-id 
user
-  (lambda (a b) (string-collate-lessp a b nil 
t)
-(save-excursion
-  (insert "\"" (propertize (or display-name canonical-alias 
room-id) 'face 'font-lock-doc-face) "\"" " is a room "
-  (propertize (pcase status
-('invite "invited")
-('join "joined")
-('leave "left")
-(_ (symbol-name status)))
-  'face 'font-lock-comment-face)
-  " on session <" (id user-id) ">.\n\n"
-  (heading "Avatar: ") (or avatar "") "\n\n"
-  (heading "ID: ") "<" (id room-id) ">" "\n"
-  (heading "Alias: ") "<" (id canonical-alias) ">" "\n\n"
-  (heading "Topic: ") (propertize (or topic "[none]") 
'face 'font-lock-comment-face) "\n\n"
-  (heading "Retrieved events: ") (number-to-string (length 
timeline)) "\n"
-  (heading "  spanning: ")
-  (format-time-string "%Y-%m-%d %H:%M:%S"
-  (/ (ement-event-origin-server-ts
-  (car (cl-sort (copy-sequence 
timeline) #'< :key #'ement-event-origin-server-ts)))
- 1000))
-  (heading " to ")
-  (format-time-string "%Y-%m-%d %H:%M:%S\n\n"
-  (/ (ement-event-origin-server-ts
-  (car (cl-sort (copy-sequence 
timeline) #'> :key #'ement-event-origin-server-ts)))
- 1000))
-  (heading "Members") " (" (number-to-string (length 
members)) "):\n")
-  (dolist (member members)
-(insert "  " member "\n"
-  (read-only-mode)
-  (pop-to-buffer (current-buffer)))
-(defalias 'ement-room-describe #'ement-describe-room)
-
 (defun ement-send-direct-message (session user-id message)
   "Send a direct MESSAGE to USER-ID on SESSION.
 Uses the latest existing direct room with the user, or creates a
@@ -467,6 +412,90 @@ Sets the name only in ROOM, not globally."
(ement-user-id (ement-session-user session))
(ement--format-room room))
 
+;; Describe room
+
+(defvar ement-describe-room-mode-map
+  (let

[elpa] externals/ement 270718072e 02/10: Meta: v0.5.1-pre

[ELPA Syncer]

branch: externals/ement
commit 270718072ead8d7506484fe6789a6cc9c8ae9083
Author: Adam Porter 
Commit: Adam Porter 

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

diff --git a/README.org b/README.org
index 976f678f8f..40bbdff48c 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.5.1-pre
+
+Nothing new yet.
+
 ** 0.5
 
 *Additions*
diff --git a/ement.el b/ement.el
index ae0093ff72..f8a9b74bc0 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.5
+;; Version: 0.5.1-pre
 ;; Package-Requires: ((emacs "27.1") (map "2.1") (plz "0.2") (taxy "0.10") 
(taxy-magit-section "0.12.1") (svg-lib "0.2.5") (transient "0.3.7"))
 ;; Keywords: comm
 

[elpa] externals/ement 56e19f26c8 03/10: Fix: (ement-directory) Add autoloads

[ELPA Syncer]

branch: externals/ement
commit 56e19f26c8f043666064559c3ea91f316fcffcf2
Author: Adam Porter 
Commit: Adam Porter 

Fix: (ement-directory) Add autoloads
---
 README.org | 3 ++-
 ement-directory.el | 2 ++
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/README.org b/README.org
index 40bbdff48c..1aee8d7521 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.5.1-pre
 
-Nothing new yet.
+*Fixes*
++ Autoload ~ement-directory~ commands.
 
 ** 0.5
 
diff --git a/ement-directory.el b/ement-directory.el
index af9aa24a8b..2327870484 100644
--- a/ement-directory.el
+++ b/ement-directory.el
@@ -150,6 +150,7 @@
 
 ;; TODO: Pagination of results.
 
+;;;###autoload
 (cl-defun ement-directory (&key server session since (limit 100))
   "View the public room directory on SERVER with SESSION.
 Show up to LIMIT rooms.  Interactively, with prefix, prompt for
@@ -194,6 +195,7 @@ SINCE may be a next-batch token."
 remaining)))
 (ement-message "Listing %s rooms on %s..." limit server)))
 
+;;;###autoload
 (cl-defun ement-directory-search (query &key server session since (limit 1000))
   "View public rooms on SERVER matching QUERY.
 QUERY is a string used to filter results."

[elpa] externals/ement 7c0e606b93 06/10: Comment: Add TODO

[ELPA Syncer]

branch: externals/ement
commit 7c0e606b938506817b6dabf1230943e1088d309b
Author: Adam Porter 
Commit: Adam Porter 

Comment: Add TODO
---
 ement-directory.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/ement-directory.el b/ement-directory.el
index 1180793880..57c17a262f 100644
--- a/ement-directory.el
+++ b/ement-directory.el
@@ -192,6 +192,8 @@ SINCE may be a next-batch token."
;; FIXME: The server seems to report all of the 
rooms on
;; the server as remaining even when searching 
for a
;; specific term like "emacs".
+   ;; TODO: Display this in a more permanent place 
(like a
+   ;; header or footer).
(message
 (substitute-command-keys
  "%s rooms remaining (use 
\\[ement-directory-next] to fetch more)")

[elpa] externals/ement 83d4e12c88 05/10: Fix: (ement-directory-define-column "Name") Faces

[ELPA Syncer]

branch: externals/ement
commit 83d4e12c88045a69985dc779210dc613ce57d8c1
Author: Adam Porter 
Commit: Adam Porter 

Fix: (ement-directory-define-column "Name") Faces
---
 README.org | 1 +
 ement-directory.el | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/README.org b/README.org
index 1aee8d7521..95e52ae378 100644
--- a/README.org
+++ b/README.org
@@ -291,6 +291,7 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 
 *Fixes*
 + Autoload ~ement-directory~ commands.
++ Faces in ~ement-directory~ listings.
 
 ** 0.5
 
diff --git a/ement-directory.el b/ement-directory.el
index 51af2244a6..1180793880 100644
--- a/ement-directory.el
+++ b/ement-directory.el
@@ -118,8 +118,8 @@
 (ement-directory-define-column "Name" (:max-width 25)
   (pcase-let* (((map name ('room_type type)) item)
(face (pcase type
-   ("m.space" 'ement-tabulated-room-list-space)
-   (_ 'ement-tabulated-room-list-name
+   ("m.space" 'ement-room-list-space)
+   (_ 'ement-room-list-name
 (propertize (or name "[unnamed]")
 'face face)))
 

[elpa] externals/ement 1afb185971 04/10: Comment: Add FIXME

[ELPA Syncer]

branch: externals/ement
commit 1afb185971cfa75caa0320ef359dba8ba20b5f14
Author: Adam Porter 
Commit: Adam Porter 

Comment: Add FIXME
---
 ement-directory.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/ement-directory.el b/ement-directory.el
index 2327870484..51af2244a6 100644
--- a/ement-directory.el
+++ b/ement-directory.el
@@ -189,6 +189,9 @@ SINCE may be a next-batch token."
(alist-get 'limit ement-directory-etc) 
limit)
  (setq-local revert-buffer-function 
revert-function)
  (when remaining
+   ;; FIXME: The server seems to report all of the 
rooms on
+   ;; the server as remaining even when searching 
for a
+   ;; specific term like "emacs".
(message
 (substitute-command-keys
  "%s rooms remaining (use 
\\[ement-directory-next] to fetch more)")

[elpa] externals/ement 0d4a3040c7 01/10: Release: v0.5

[ELPA Syncer]

branch: externals/ement
commit 0d4a3040c7feca2e06b156ea30eaa2905f1ed12d
Author: Adam Porter 
Commit: Adam Porter 

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

diff --git a/README.org b/README.org
index 0c3160f48b..976f678f8f 100644
--- a/README.org
+++ b/README.org
@@ -287,13 +287,14 @@ Note that, while ~matrix-client~ remains usable, and 
probably will for some time
 :TOC:  :depth 0
 :END:
 
-** 0.5-pre
+** 0.5
 
 *Additions*
 + Present "joined-and-left" and "rejoined-and-left" membership event pairs as 
such.
 + Process and show rooms' canonical alias events.
 
 *Changes*
++ The [[https://github.com/alphapapa/taxy.el][taxy.el]]-based room list, with 
programmable, smart grouping, is now the default ~ement-room-list~.  (The old, 
~tabulated-list-mode~-based room list is available as 
~ement-tabulated-room-list~.)
 + When selecting a room to view with completion, don't offer spaces.
 + When selecting a room with completion, empty aliases and topics are omitted 
instead of being displayed as nil.
 
diff --git a/ement.el b/ement.el
index a7187d5bc5..ae0093ff72 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.5-pre
+;; Version: 0.5
 ;; Package-Requires: ((emacs "27.1") (map "2.1") (plz "0.2") (taxy "0.10") 
(taxy-magit-section "0.12.1") (svg-lib "0.2.5") (transient "0.3.7"))
 ;; Keywords: comm
 

[nongnu] elpa/paredit 0366842819 3/3: Teach paredit-forward/backward-kill-word to take prefix argument.

[ELPA Syncer]

branch: elpa/paredit
commit 036684281942343c84612ce63764ad994c752279
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

Teach paredit-forward/backward-kill-word to take prefix argument.

XXX Unlike other paredit commands, C-u is not handled specially -- it
is just interpreted as 4.  No automatic tests for this at the moment.
---
 paredit.el | 115 +
 test.el|  68 ++--
 2 files changed, 105 insertions(+), 78 deletions(-)

diff --git a/paredit.el b/paredit.el
index 77f5a68450..9140b3975d 100644
--- a/paredit.el
+++ b/paredit.el
@@ -1585,61 +1585,70 @@ With a numeric prefix argument N, do `kill-line' that 
many times."
 ;;; extraordinarily difficult or impossible, so we have to implement
 ;;; killing in both directions by parsing forward.
 
-(defun paredit-forward-kill-word ()
+(defun paredit-forward-kill-word (&optional argument)
   "Kill a word forward, skipping over intervening delimiters."
-  (interactive)
-  (let ((beginning (point)))
-(skip-syntax-forward " -")
-(let* ((parse-state (paredit-current-parse-state))
-   (state (paredit-kill-word-state parse-state 'char-after)))
-  (while (not (or (eobp)
-  (eq ?w (char-syntax (char-after)
-(setq parse-state
-  (progn (forward-char 1) (paredit-current-parse-state))
-;;   (parse-partial-sexp (point) (1+ (point))
-;;   nil nil parse-state)
-  )
-(let* ((old-state state)
-   (new-state
-(paredit-kill-word-state parse-state 'char-after)))
-  (cond ((not (eq old-state new-state))
- (setq parse-state
-   (paredit-kill-word-hack old-state
-   new-state
-   parse-state))
- (setq state
-   (paredit-kill-word-state parse-state
-'char-after))
- (setq beginning (point)))
-(goto-char beginning)
-(kill-word 1)))
-
-(defun paredit-backward-kill-word ()
+  (interactive "p")
+  (let ((argument (or argument 1)))
+(if (< argument 0)
+(paredit-backward-kill-word (- argument))
+  (dotimes (i argument)
+(let ((beginning (point)))
+  (skip-syntax-forward " -")
+  (let* ((parse-state (paredit-current-parse-state))
+ (state (paredit-kill-word-state parse-state 'char-after)))
+(while (not (or (eobp)
+(eq ?w (char-syntax (char-after)
+  (setq parse-state
+(progn (forward-char 1) (paredit-current-parse-state))
+;; XXX Why did I comment this out?
+;; (parse-partial-sexp (point) (1+ (point))
+;; nil nil parse-state)
+)
+  (let* ((old-state state)
+ (new-state
+  (paredit-kill-word-state parse-state 'char-after)))
+(cond ((not (eq old-state new-state))
+   (setq parse-state
+ (paredit-kill-word-hack old-state
+ new-state
+ parse-state))
+   (setq state
+ (paredit-kill-word-state parse-state
+  'char-after))
+   (setq beginning (point)))
+  (goto-char beginning)
+  (kill-word 1))
+
+(defun paredit-backward-kill-word (&optional argument)
   "Kill a word backward, skipping over any intervening delimiters."
-  (interactive)
-  (if (not (or (bobp)
-   (eq (char-syntax (char-before)) ?w)))
-  (let ((end (point)))
-(backward-word 1)
-(forward-word 1)
-(goto-char (min end (point)))
-(let* ((parse-state (paredit-current-parse-state))
-   (state
-(paredit-kill-word-state parse-state 'char-before)))
-  (while (and (< (point) end)
-  (progn
-(setq parse-state
-  (parse-partial-sexp (point) (1+ (point))
-  nil nil parse-state))
-(or (eq state
-(paredit-kill-word-state parse-state
- 'char-before))
-(progn (backward-char 1) nil)
-  (if (and (eq state 'comment)
-   (eq ?\# (char-after (point)))
-   (eq ?\| (char-before (point
-  (backward-char 1)
-  (backward-kill-word 1))
+  (interactive "p")
+  (let ((argument (o

[nongnu] elpa/paredit updated (daf21e0bbf -> 0366842819)

[ELPA Syncer]

elpasync pushed a change to branch elpa/paredit.

  from  daf21e0bbf Reword CREDITS to be less prolix.
   new  683b454ff2 Fix column preservation in text fields like ielm after 
prompt.
   new  928fb08262 Test paredit-forward-kill-word, 
paredit-backward-kill-word.
   new  0366842819 Teach paredit-forward/backward-kill-word to take prefix 
argument.


Summary of changes:
 NEWS   |   4 ++
 paredit.el | 125 ++---
 test.el|  64 +++
 3 files changed, 138 insertions(+), 55 deletions(-)

[nongnu] elpa/paredit 928fb08262 2/3: Test paredit-forward-kill-word, paredit-backward-kill-word.

[ELPA Syncer]

branch: elpa/paredit
commit 928fb082624e6b78040fb1aec9fe82694989d58c
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

Test paredit-forward-kill-word, paredit-backward-kill-word.

Turns up some nasty edge cases I missed, oops.
---
 test.el | 26 ++
 1 file changed, 26 insertions(+)

diff --git a/test.el b/test.el
index 3930e4369b..8435d87718 100644
--- a/test.el
+++ b/test.el
@@ -1613,5 +1613,31 @@ Four arguments: the paredit command, the text of the 
buffer
"\n(f xy\n   z\n   w)\n;;;|T "
"\n(f xy\n   z\n   w)\n;;;|T "
 
+(paredit-test 'paredit-forward-kill-word
+  '(("|(hello \"world\")"
+ "(| \"world\")"
+ "( \"|\")"
+ error)
+("(hello| \"world\")"
+ "(hello \"|\")")
+("(hello \"world|\")" error)
+("(hello \"world\"|)" error)
+("(hello \"world\")|" error)))
+
+(paredit-test 'paredit-backward-kill-word
+  '(("(hello \"world\")|"
+ "(hello \"|\")"
+ "(|\"\")"
+ ;; error or nop -- XXX broken
+ )
+("(hello \"|world\")"
+ "(|\"world\")"
+ ;; error or nop -- XXX broken
+ )
+("(|hello \"world\")"
+ ;; error or nop -- XXX broken
+ )
+("|(hello \"world\")" "|(hello \"world\")")))
+
 (if (> paredit-test-nfailures 0)
 (error "%S paredit tests failed" paredit-test-nfailures))

[nongnu] elpa/paredit 683b454ff2 1/3: Fix column preservation in text fields like ielm after prompt.

[ELPA Syncer]

branch: elpa/paredit
commit 683b454ff269600c59ffbbded415058971adde86
Author: Taylor R Campbell 
Commit: Taylor R Campbell 

Fix column preservation in text fields like ielm after prompt.

Add a hacky one-off test to assemble buffer text with a field.
---
 NEWS   |  4 
 paredit.el | 10 --
 test.el| 20 
 3 files changed, 32 insertions(+), 2 deletions(-)

diff --git a/NEWS b/NEWS
index 6a89f57cda..21f86dca13 100644
--- a/NEWS
+++ b/NEWS
@@ -7,6 +7,10 @@ https://paredit.org
 Latest release: https://paredit.org/paredit.el
 Current development version: https://paredit.org/paredit-beta.el
 
+** Version 26 (beta)
+
+*** M-s (paredit-splice-sexp) now restores column in text fields like ielm.
+
 ** Version 25 -- 2022-11-25
 
 *** paredit now lives at paredit.org.
diff --git a/paredit.el b/paredit.el
index 449a75b81c..77f5a68450 100644
--- a/paredit.el
+++ b/paredit.el
@@ -184,7 +184,7 @@ If point was on code, it moves with the code.
 If point was on indentation, it stays in indentation."
 (let ((column (make-symbol "column"))
   (indentation (make-symbol "indentation")))
-  `(let ((,column (current-column))
+  `(let ((,column (paredit-current-column))
  (,indentation (paredit-current-indentation)))
  (let ((value (progn ,@body)))
(paredit-restore-column ,column ,indentation)
@@ -2953,10 +2953,16 @@ This is independent of context -- it doesn't check what 
state the
   t)
   nil)))
 
+(defun paredit-current-column ()
+  ;; Like current-column, but respects field boundaries in interactive
+  ;; modes like ielm.  For use only with paredit-restore-column, which
+  ;; works relative to point-at-bol.
+  (- (point) (point-at-bol)))
+
 (defun paredit-current-indentation ()
   (save-excursion
 (back-to-indentation)
-(current-column)))
+(paredit-current-column)))
 
 (defun paredit-restore-column (column indentation)
   ;; Preserve the point's position either in the indentation or in the
diff --git a/test.el b/test.el
index 8e6ebe91ff..3930e4369b 100644
--- a/test.el
+++ b/test.el
@@ -1251,6 +1251,26 @@ Four arguments: the paredit command, the text of the 
buffer
 ("\"|foo\\\"bar\"" error)
 ;++ ("(\"|foo\\\;bar\")" error)
 ))
+
+(let ((prompt "prompt> ")
+  (before "(foo (bar| baz))")
+  (expected "(foo bar| baz)"))
+  (with-temp-buffer
+(paredit-test-buffer-setup)
+(insert prompt)
+(add-text-properties (point-min) (point-max) '(field output))
+(insert before)
+(goto-char (length prompt))
+(search-forward "|")
+(delete-char -1)
+(call-interactively 'paredit-splice-sexp)
+(insert "|")
+(let ((actual (buffer-string)))
+  (if (not (string= (concat prompt expected) actual))
+  (paredit-test-failed 'paredit-splice-sexp
+   (concat prompt before)
+   actual
+   (concat prompt expected))
 
 (paredit-test 'paredit-forward-slurp-sexp
   '(("|" error)

[elpa] main bcd8fb1a71: * elpa-packages (altcaps): New package

[Protesilaos Stavrou]

branch: main
commit bcd8fb1a7123f963de5484c4a732a632ff348d8d
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

* elpa-packages (altcaps): New package
---
 elpa-packages | 4 
 1 file changed, 4 insertions(+)

diff --git a/elpa-packages b/elpa-packages
index f86d666c31..85a14393c9 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -59,6 +59,10 @@
   :readme ignore
   :auto-sync t)
  (all  :url nil)
+ (altcaps  :url "https://git.sr.ht/~protesilaos/altcaps";
+  :auto-sync t
+  :doc "README.org"
+  :ignored-files ("COPYING" "doclicense.texi"))
  (ampc :url nil)
  (arbitools:url nil)
  (ascii-art-to-unicode :url nil)

[elpa] externals/altcaps ff932d3d7c: Create altcaps package

[ELPA Syncer]

branch: externals/altcaps
commit ff932d3d7cd65d958f98d3924e98bf727c45549b
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Create altcaps package
---
 .gitignore  |   5 +
 COPYING | 674 
 README.org  | 662 +++
 altcaps.el  | 150 +
 doclicense.texi | 505 ++
 5 files changed, 1996 insertions(+)

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 00..c4c4cec76b
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,5 @@
+*.elc
+*-autoloads.el
+*-pkg.el
+altcaps.info
+altcaps.texi
diff --git a/COPYING b/COPYING
new file mode 100644
index 00..59f0371b58
--- /dev/null
+++ b/COPYING
@@ -0,0 +1,674 @@
+GNU GENERAL PUBLIC LICENSE
+   Version 3, 29 June 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. 
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+Preamble
+
+  The GNU General Public License is a free, copyleft license for
+software and other kinds of works.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+  Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+  For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+  Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+  Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+   TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or ad

[elpa] branch externals/altcaps created (now ff932d3d7c)

[ELPA Syncer]

elpasync pushed a change to branch externals/altcaps.

at  ff932d3d7c Create altcaps package

This branch includes the following new commits:

   new  ff932d3d7c Create altcaps package

[elpa] externals/cape 7d755a9571: Require company backend on demand

[ELPA Syncer]

branch: externals/cape
commit 7d755a9571783d2ffb07f2b1cbfe4369f1418040
Author: Daniel Mendler 
Commit: Daniel Mendler 

Require company backend on demand
---
 cape.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/cape.el b/cape.el
index deb96061a3..4db11806c3 100644
--- a/cape.el
+++ b/cape.el
@@ -668,6 +668,8 @@ VALID is the input comparator, see `cape--input-valid-p'.
 This feature is experimental."
   (let ((init (make-variable-buffer-local (make-symbol "cape--company-init"
 (lambda ()
+  (when (and (symbolp backend) (not (fboundp backend)))
+(ignore-errors (require backend nil t)))
   (unless (symbol-value init)
 (cape--company-call backend 'init)
 (set init t))

[elpa] externals/corfu d970324599: corfu-popupinfo: Remove warning

[ELPA Syncer]

branch: externals/corfu
commit d970324599f308a6420bbfd88e410bb51ce55f49
Author: Daniel Mendler 
Commit: Daniel Mendler 

corfu-popupinfo: Remove warning
---
 extensions/corfu-popupinfo.el | 4 
 1 file changed, 4 deletions(-)

diff --git a/extensions/corfu-popupinfo.el b/extensions/corfu-popupinfo.el
index 793f6a8863..39e84bc530 100644
--- a/extensions/corfu-popupinfo.el
+++ b/extensions/corfu-popupinfo.el
@@ -26,10 +26,6 @@
 
 ;;; Commentary:
 
-;; NOTE: This extension has been added recently to Corfu. It is still
-;; experimental. The extension may get renamed and the public interface
-;; may change any time.
-;;
 ;; Display an information popup for completion candidate when using
 ;; Corfu. The popup displays either the candidate documentation or the
 ;; candidate location. The `corfu-popupinfo-mode' must be enabled

[nongnu] elpa/multiple-cursors fe0d516745: Detect cursor bar type when specified by the frame.

[ELPA Syncer]

branch: elpa/multiple-cursors
commit fe0d5167459b792a699af782685582a195852cb9
Author: Troy Brown 
Commit: Magnar Sveen 

Detect cursor bar type when specified by the frame.

When the 'cursor-type' for the buffer is specified by the frame, this
was not detected by the current logic as 'cursor-type' will be set to
't' and thus not explicitly match 'bar'.  This update checks to see if
'cursor-type' is specified by the frame and will pull the parameter
from the frame if it is, prior to subsequent checks.
---
 multiple-cursors-core.el | 10 +++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/multiple-cursors-core.el b/multiple-cursors-core.el
index e972bac74a..628663d249 100644
--- a/multiple-cursors-core.el
+++ b/multiple-cursors-core.el
@@ -122,9 +122,13 @@ rendered or shift text."
 
 (defun mc/cursor-is-bar ()
   "Return non-nil if the cursor is a bar."
-  (or (eq cursor-type 'bar)
-(and (listp cursor-type)
- (eq (car cursor-type) 'bar
+  (let ((cursor-type
+ (if (eq cursor-type t)
+ (frame-parameter nil 'cursor-type)
+   cursor-type)))
+(or (eq cursor-type 'bar)
+(and (listp cursor-type)
+ (eq (car cursor-type) 'bar)
 
 (defun mc/line-number-at-pos (&optional pos absolute)
   "Faster implementation of `line-number-at-pos'."