[elpa] externals/ef-themes b7b234182f 6/9: ef-reverie: make bg-completion less intense and more neutral

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit b7b234182fd02f3ffabdff791a126058f72154c9
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-reverie: make bg-completion less intense and more neutral
---
 ef-reverie-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-reverie-theme.el b/ef-reverie-theme.el
index cf3272b9de..d31e019bb1 100644
--- a/ef-reverie-theme.el
+++ b/ef-reverie-theme.el
@@ -136,7 +136,7 @@
 
   (bg-mode-line   "#d1b0df")
   (fg-mode-line   "#523044")
-  (bg-completion  "#efc7d8")
+  (bg-completion  "#e9cedd")
   (bg-hover   "#ddc97f")
   (bg-hover-secondary "#d0c4e4")
   (bg-hl-line "#e7d9e0")



[elpa] externals/ef-themes e97aa81f45 9/9: ef-reverie: tweak accent-1 to be more red

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit e97aa81f456d517da5c34bee8b7e8d2d5a3570fc
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-reverie: tweak accent-1 to be more red
---
 ef-reverie-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-reverie-theme.el b/ef-reverie-theme.el
index a7f009056d..d8f25b8996 100644
--- a/ef-reverie-theme.el
+++ b/ef-reverie-theme.el
@@ -200,7 +200,7 @@
  Accent mappings
 
   (accent-0 yellow)
-  (accent-1 red-cooler)
+  (accent-1 red)
   (accent-2 magenta-warmer)
   (accent-3 blue-warmer)
 



[elpa] externals/ef-themes a2d5b714c1 7/9: ef-dream: make bg-completion less intense

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit a2d5b714c10644beb25c5b65d74ae50013729d54
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-dream: make bg-completion less intense
---
 ef-dream-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-dream-theme.el b/ef-dream-theme.el
index 77ade7d9b2..a69d68f187 100644
--- a/ef-dream-theme.el
+++ b/ef-dream-theme.el
@@ -136,7 +136,7 @@
 
   (bg-mode-line   "#675072")
   (fg-mode-line   "#fedeff")
-  (bg-completion  "#724a5f")
+  (bg-completion  "#503240")
   (bg-hover   "#957856")
   (bg-hover-secondary "#665f7a")
   (bg-hl-line "#412f4f")



[elpa] externals/ef-themes updated (40a477949b -> e97aa81f45)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch externals/ef-themes.

  from  40a477949b ef-summer: make preprocessor mapping more consistent 
with the rest of the theme
   new  696bef0b09 ef-reverie: refine bg-added, bg-added-faint
   new  fdb33320a3 ef-reverie: refine bg-removed-faint
   new  0d7ca04271 ef-reverie: tweak rx-construct mapping
   new  71b78bfc55 ef-reverie: refine all common accented backgrounds
   new  07b64475ff ef-dream: refine most common accented backgrounds
   new  b7b234182f ef-reverie: make bg-completion less intense and more 
neutral
   new  a2d5b714c1 ef-dream: make bg-completion less intense
   new  2b1c400ad8 ef-reverie: tweak the cursor to be a tiny bit darker
   new  e97aa81f45 ef-reverie: tweak accent-1 to be more red


Summary of changes:
 ef-dream-theme.el   | 16 
 ef-reverie-theme.el | 40 
 2 files changed, 28 insertions(+), 28 deletions(-)



[elpa] externals/ef-themes 07b64475ff 5/9: ef-dream: refine most common accented backgrounds

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit 07b64475ffea7ad8e780c15566cfa85603b24cb9
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-dream: refine most common accented backgrounds
---
 ef-dream-theme.el | 14 +++---
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/ef-dream-theme.el b/ef-dream-theme.el
index 1eda6ea811..77ade7d9b2 100644
--- a/ef-dream-theme.el
+++ b/ef-dream-theme.el
@@ -86,19 +86,19 @@
 
 ;;; Basic hues for background values
 
-  (bg-red-intense "#bd1f30")
-  (bg-green-intense   "#107840")
-  (bg-yellow-intense  "#847020")
-  (bg-blue-intense"#2f5f9f")
-  (bg-magenta-intense "#b05fcf")
+  (bg-red-intense "#a02f50")
+  (bg-green-intense   "#30682f")
+  (bg-yellow-intense  "#8f665f")
+  (bg-blue-intense"#4f509f")
+  (bg-magenta-intense "#885997")
   (bg-cyan-intense"#0280b9")
 
-  (bg-red-subtle  "#6a192f")
+  (bg-red-subtle  "#682a33")
   (bg-green-subtle"#2f502f")
   (bg-yellow-subtle   "#5a4020")
   (bg-blue-subtle "#3a3980")
   (bg-magenta-subtle  "#553977")
-  (bg-cyan-subtle "#305060")
+  (bg-cyan-subtle "#22526a")
 
 ;;; Diffs
 



[elpa] externals/ef-themes 696bef0b09 1/9: ef-reverie: refine bg-added, bg-added-faint

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit 696bef0b09ba15cd397c5ab7d854690fc57f4b57
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-reverie: refine bg-added, bg-added-faint
---
 ef-reverie-theme.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ef-reverie-theme.el b/ef-reverie-theme.el
index 2fcfa06d1c..261836c678 100644
--- a/ef-reverie-theme.el
+++ b/ef-reverie-theme.el
@@ -102,8 +102,8 @@
 
 ;;; Diffs
 
-  (bg-added  "#b7ecd0")
-  (bg-added-faint"#cef3d2")
+  (bg-added  "#b4e9d0")
+  (bg-added-faint"#c9edd7")
   (bg-added-refine   "#a4d4c4")
   (fg-added  "#0f443f")
 



[elpa] externals/fontaine 0dc0ce6a5a 3/7: Update the repo URL in the CHANGELOG

2024-04-16 Thread ELPA Syncer
branch: externals/fontaine
commit 0dc0ce6a5ab48d2fb24f0d6e21e9a62912ac4899
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Update the repo URL in the CHANGELOG
---
 CHANGELOG.org | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/CHANGELOG.org b/CHANGELOG.org
index c5c15ce24a..4d55b35269 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -4,7 +4,7 @@
 #+OPTIONS: ':nil toc:nil num:nil author:nil email:nil
 
 This document contains the release notes for each tagged commit on the
-project's main git repository: .
+project's main git repository: .
 
 The newest release is at the top.  For further details, please consult
 the manual: .



[elpa] externals/fontaine updated (10553d2c94 -> 353e03ece0)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch externals/fontaine.

  from  10553d2c94 Make 'fontaine-font-families' obsolete
   new  ff043231ad Change next stable version to 2.0.0
   new  56da86202e Remove alignment spacing from README.org front matter
   new  0dc0ce6a5a Update the repo URL in the CHANGELOG
   new  c4ed73d6f4 Add missing header-line from fontaine-faces
   new  da0fb76142 Update the required Emacs version to 29
   new  08cce48ca6 Fix typo in the manual
   new  353e03ece0 Update Fontaine to version 2.0.0


Summary of changes:
 CHANGELOG.org | 144 +-
 README.org|  38 
 fontaine.el   |  12 ++---
 3 files changed, 168 insertions(+), 26 deletions(-)



[elpa] externals/ef-themes 2b1c400ad8 8/9: ef-reverie: tweak the cursor to be a tiny bit darker

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit 2b1c400ad889049c37f3789a30e2b5bc43687f77
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-reverie: tweak the cursor to be a tiny bit darker
---
 ef-reverie-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-reverie-theme.el b/ef-reverie-theme.el
index d31e019bb1..a7f009056d 100644
--- a/ef-reverie-theme.el
+++ b/ef-reverie-theme.el
@@ -146,7 +146,7 @@
   (bg-info"#dddef0") ; check with info
 
   (border"#c5afb6")
-  (cursor"#a06052")
+  (cursor"#9d5744")
   (fg-intense"#00")
 
   (modeline-err "#90")



[elpa] externals/fontaine ff043231ad 1/7: Change next stable version to 2.0.0

2024-04-16 Thread ELPA Syncer
branch: externals/fontaine
commit ff043231ad6161797d80c305679e2ddc8a426b9e
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Change next stable version to 2.0.0
---
 README.org  | 2 +-
 fontaine.el | 6 +++---
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/README.org b/README.org
index f735636415..b13a0efeac 100644
--- a/README.org
+++ b/README.org
@@ -6,7 +6,7 @@
 #+startup:   content
 #+macro: stable-version 1.0.0
 #+macro: release-date 2023-02-11
-#+macro: development-version 1.1.0-dev
+#+macro: development-version 2.0.0-dev
 #+export_file_name:  fontaine.texi
 #+texinfo_filename:  fontaine.info
 #+texinfo_dir_category:  Emacs misc features
diff --git a/fontaine.el b/fontaine.el
index b027d2a6b4..07e446a088 100644
--- a/fontaine.el
+++ b/fontaine.el
@@ -254,7 +254,7 @@ Caveats or further notes:
:match (lambda (_widget value)
 (memq value (delq t (mapcar #'car 
fontaine-presets))
  :key-type symbol))
-  :package-version '(fontaine . "1.1.0")
+  :package-version '(fontaine . "2.0.0")
   :group 'fontaine
   :link '(info-link "(fontaine) Shared and implicit fallback values for 
presets"))
 
@@ -270,12 +270,12 @@ This is then used to restore the last value with the 
function
   :package-version '(fontaine . "0.1.0")
   :group 'fontaine)
 
-(make-obsolete-variable 'fontaine-font-families nil "1.1.0")
+(make-obsolete-variable 'fontaine-font-families nil "2.0.0")
 
 (defcustom fontaine-set-preset-hook nil
   "Hook that runs after setting fonts with `fontaine-set-preset'."
   :type 'hook
-  :package-version '(fontaine . "1.1.0")
+  :package-version '(fontaine . "2.0.0")
   :group 'fontaine)
 
  General utilities



[elpa] externals/ef-themes 71b78bfc55 4/9: ef-reverie: refine all common accented backgrounds

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit 71b78bfc551b3c5b8c1958a7cf9f897023144371
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-reverie: refine all common accented backgrounds
---
 ef-reverie-theme.el | 26 +-
 1 file changed, 13 insertions(+), 13 deletions(-)

diff --git a/ef-reverie-theme.el b/ef-reverie-theme.el
index b0d1cba94c..cf3272b9de 100644
--- a/ef-reverie-theme.el
+++ b/ef-reverie-theme.el
@@ -86,19 +86,19 @@
 
 ;;; Basic hues for background values
 
-  (bg-red-intense "#ff8f88")
-  (bg-green-intense   "#96df80")
-  (bg-yellow-intense  "#efbf00")
-  (bg-blue-intense"#cfceff")
-  (bg-magenta-intense "#df9fff")
-  (bg-cyan-intense"#88cfd0")
-
-  (bg-red-subtle  "#f5c6bf")
-  (bg-green-subtle"#c0e3c0")
-  (bg-yellow-subtle   "#ede28f")
-  (bg-blue-subtle "#ccd9f4")
-  (bg-magenta-subtle  "#f0d0f0")
-  (bg-cyan-subtle "#bfeae0")
+  (bg-red-intense "#ed899f")
+  (bg-green-intense   "#96d080")
+  (bg-yellow-intense  "#e2b270")
+  (bg-blue-intense"#c0c0f0")
+  (bg-magenta-intense "#daaaf0")
+  (bg-cyan-intense"#8fc6d0")
+
+  (bg-red-subtle  "#f0c0b0")
+  (bg-green-subtle"#b9e0b4")
+  (bg-yellow-subtle   "#ebe08f")
+  (bg-blue-subtle "#ccd0f4")
+  (bg-magenta-subtle  "#edc9ea")
+  (bg-cyan-subtle "#b3e8e0")
 
 ;;; Diffs
 



[elpa] externals/ef-themes fdb33320a3 2/9: ef-reverie: refine bg-removed-faint

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit fdb33320a306490d930e76f978a2ddbcbe80b132
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-reverie: refine bg-removed-faint
---
 ef-reverie-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-reverie-theme.el b/ef-reverie-theme.el
index 261836c678..ffca877335 100644
--- a/ef-reverie-theme.el
+++ b/ef-reverie-theme.el
@@ -113,7 +113,7 @@
   (fg-changed"#553d00")
 
   (bg-removed"#f8c3bf")
-  (bg-removed-faint  "#fed8d0")
+  (bg-removed-faint  "#f4d8d0")
   (bg-removed-refine "#f9a8bd")
   (fg-removed"#801530")
 



[elpa] externals/fontaine c4ed73d6f4 4/7: Add missing header-line from fontaine-faces

2024-04-16 Thread ELPA Syncer
branch: externals/fontaine
commit c4ed73d6f4d0b0da3b1be72ddd1e3b2c53170ebc
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Add missing header-line from fontaine-faces
---
 fontaine.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fontaine.el b/fontaine.el
index 07e446a088..c2d64198f2 100644
--- a/fontaine.el
+++ b/fontaine.el
@@ -79,7 +79,7 @@
 
 (defconst fontaine-faces
   '( default fixed-pitch fixed-pitch-serif variable-pitch
- mode-line-active mode-line-inactive
+ mode-line-active mode-line-inactive header-line
  line-number tab-bar tab-line
  bold italic)
   "List of faces with relevant font attributes.")



[elpa] externals/fontaine 56da86202e 2/7: Remove alignment spacing from README.org front matter

2024-04-16 Thread ELPA Syncer
branch: externals/fontaine
commit 56da86202e0c254df1e7f78e79d7dc87b06bc360
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Remove alignment spacing from README.org front matter
---
 README.org | 36 ++--
 1 file changed, 18 insertions(+), 18 deletions(-)

diff --git a/README.org b/README.org
index b13a0efeac..2364309966 100644
--- a/README.org
+++ b/README.org
@@ -1,21 +1,21 @@
-#+title: fontaine.el: Set font configurations using presets
-#+author:Protesilaos Stavrou
-#+email: i...@protesilaos.com
-#+language:  en
-#+options:   ':t toc:nil author:t email:t num:t
-#+startup:   content
-#+macro: stable-version 1.0.0
-#+macro: release-date 2023-02-11
-#+macro: development-version 2.0.0-dev
-#+export_file_name:  fontaine.texi
-#+texinfo_filename:  fontaine.info
-#+texinfo_dir_category:  Emacs misc features
-#+texinfo_dir_title: Fontaine: (fontaine)
-#+texinfo_dir_desc:  Set font configurations using presets
-#+texinfo_header:@set MAINTAINERSITE 
@uref{https://protesilaos.com,maintainer webpage}
-#+texinfo_header:@set MAINTAINER Protesilaos Stavrou
-#+texinfo_header:@set MAINTAINEREMAIL @email{i...@protesilaos.com}
-#+texinfo_header:@set MAINTAINERCONTACT 
@uref{mailto:i...@protesilaos.com,contact the maintainer}
+#+title: fontaine.el: Set font configurations using presets
+#+author: Protesilaos Stavrou
+#+email: i...@protesilaos.com
+#+language: en
+#+options: ':t toc:nil author:t email:t num:t
+#+startup: content
+#+macro: stable-version 1.0.0
+#+macro: release-date 2023-02-11
+#+macro: development-version 2.0.0-dev
+#+export_file_name: fontaine.texi
+#+texinfo_filename: fontaine.info
+#+texinfo_dir_category: Emacs misc features
+#+texinfo_dir_title: Fontaine: (fontaine)
+#+texinfo_dir_desc: Set font configurations using presets
+#+texinfo_header: @set MAINTAINERSITE @uref{https://protesilaos.com,maintainer 
webpage}
+#+texinfo_header: @set MAINTAINER Protesilaos Stavrou
+#+texinfo_header: @set MAINTAINEREMAIL @email{i...@protesilaos.com}
+#+texinfo_header: @set MAINTAINERCONTACT 
@uref{mailto:i...@protesilaos.com,contact the maintainer}
 
 #+texinfo: @insertcopying
 



[elpa] externals/fontaine 08cce48ca6 6/7: Fix typo in the manual

2024-04-16 Thread ELPA Syncer
branch: externals/fontaine
commit 08cce48ca64daa9a171fe24b50ea64a031792127
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Fix typo in the manual
---
 README.org | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/README.org b/README.org
index 2364309966..f932528096 100644
--- a/README.org
+++ b/README.org
@@ -659,7 +659,7 @@ Remember to read the relevant doc strings.
 
  :line-spacing nil)))
 
-;; Set last preset or fall back to desired style from `fontaine-presets'
+;; Set the last preset or fall back to desired style from `fontaine-presets'
 ;; (the `regular' in this case).
 (fontaine-set-preset (or (fontaine-restore-latest-preset) 'regular))
 



[elpa] externals/fontaine da0fb76142 5/7: Update the required Emacs version to 29

2024-04-16 Thread ELPA Syncer
branch: externals/fontaine
commit da0fb76142fd573be92c40adf25868033929b664
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Update the required Emacs version to 29
---
 fontaine.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fontaine.el b/fontaine.el
index c2d64198f2..c8186c0441 100644
--- a/fontaine.el
+++ b/fontaine.el
@@ -6,7 +6,7 @@
 ;; Maintainer: Protesilaos Stavrou 
 ;; URL: https://github.com/protesilaos/fontaine
 ;; Version: 1.0.0
-;; Package-Requires: ((emacs "27.1"))
+;; Package-Requires: ((emacs "29.1"))
 
 ;; This file is NOT part of GNU Emacs.
 



[elpa] externals/ef-themes 0d7ca04271 3/9: ef-reverie: tweak rx-construct mapping

2024-04-16 Thread ELPA Syncer
branch: externals/ef-themes
commit 0d7ca04271ae9bccbc924d5406b9b98e665940d2
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

ef-reverie: tweak rx-construct mapping
---
 ef-reverie-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-reverie-theme.el b/ef-reverie-theme.el
index ffca877335..b0d1cba94c 100644
--- a/ef-reverie-theme.el
+++ b/ef-reverie-theme.el
@@ -195,7 +195,7 @@
   (type green-faint)
   (variable magenta)
   (rx-escape cyan-cooler) ; compare with `string'
-  (rx-construct red-cooler)
+  (rx-construct red-warmer)
 
  Accent mappings
 



[elpa] externals/fontaine 353e03ece0 7/7: Update Fontaine to version 2.0.0

2024-04-16 Thread ELPA Syncer
branch: externals/fontaine
commit 353e03ece05f31131bd160176b9c3c4bc2b7b365
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Update Fontaine to version 2.0.0
---
 CHANGELOG.org | 142 ++
 README.org|   4 +-
 fontaine.el   |   2 +-
 3 files changed, 145 insertions(+), 3 deletions(-)

diff --git a/CHANGELOG.org b/CHANGELOG.org
index 4d55b35269..87b764d8e4 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -9,6 +9,148 @@ project's main git repository: 
.
 The newest release is at the top.  For further details, please consult
 the manual: .
 
+* Version 2.0.0 on 2024-04-16
+:PROPERTIES:
+:CUSTOM_ID: h:1aad7179-f7cd-4817-ad23-0f9256b6df5d
+:END:
+
+** Control the fonts of more faces
+:PROPERTIES:
+:CUSTOM_ID: h:44697327-628b-4515-a672-4547bef81a43
+:END:
+
+This version brings a major expansion to the scope of the user option
+~fontaine-presets~. It can now control the font family and concomitant
+attributes of more Emacs faces. In particular, it covers the following
+additional faces:
+
+- ~mode-line-active~ and ~mode-line-inactive~.
+- ~header-line~.
+- ~line-number~ (from the ~display-line-numbers-mode~ or its global variant).
+- ~tab-bar~ (from the ~tab-bar-mode~).
+- ~tab-line~ (from the ~tab-line-mode~).
+
+All the supported faces are stored as the value of the variable
+~fontaine-faces~. This is the complete list:
+
+- ~default~
+- ~fixed-pitch~
+- ~fixed-pitch-serif~
+- ~variable-pitch~
+- ~mode-line-active~
+- ~mode-line-inactive~
+- ~line-number~
+- ~tab-bar~
+- ~tab-line~
+- ~bold~
+- ~italic~
+
+Existing users do not need to update their configuration, as (i) the old
+values will still work and (ii) undefined values fall back to reliable
+known values.
+
+This change empowers users to further configure their setup, such as:
+
+- Make the mode lines smaller than the main text.
+- Use a proportionately spaced font for the tabs, while retaining a
+  monospaced font for editing.
+- Use a different font family for line numbers to differentiate them
+  from the main body of text.
+
+These are some possibilities. Then consider that different presets can
+change specify different configurations. For example, a =coding=
+preset can be all about small, monospaced fonts, while a =reading=
+preset may increase the font sizes and apply proportionately spaced
+fonts.
+
+The doc string of ~fontaine-presets~ covers the technicalities, as
+does the official manual (shipped with the package or available on my
+website: ).
+
+Thanks to Ashlin Eldridge for suggesting the inclusion of mode line
+and line number faces. This was done in issue 4:
+.
+
+** Use the ~fontaine-mode~ to persist presets
+:PROPERTIES:
+:CUSTOM_ID: h:a016aa76-29b4-487c-afef-90f7db61d5d0
+:END:
+
+The new ~fontaine-mode~ provides a convenience toggle to do the
+following:
+
+1. Store the current Fontaine preset before closing Emacs.
+2. Store the latest preset after using the command ~fontaine-set-preset~.
+3. Persist font configurations while changing themes.
+
+The purpose of storing the latest preset is to restore it easily, such
+as when starting Emacs. In the manual, we mention this in the sample
+configuration:
+
+#+begin_src emacs-lisp
+;; Set the last preset or fall back to desired style from `fontaine-presets'
+;; (the `regular' in this case).
+(fontaine-set-preset (or (fontaine-restore-latest-preset) 'regular))
+#+end_src
+
+This takes effect while starting up Emacs. So if, say, the user had
+selected a =reading= preset with ~fontaine-set-preset~ and then closed
+Emacs while ~fontaine-mode~ was enabled, the =reading= preset will be
+restored on startup.
+
+Thanks to Adam Porter (alphapapa) for suggesting this in issue 2:
+.
+
+We used to provide code in the sample configuration which was doing
+what ~fontaine-mode~ does, though this is easier to set up (plus it is
+a toggle).
+
+** Deprecated the command ~fontaine-set-face-font~
+:PROPERTIES:
+:CUSTOM_ID: h:e676d050-93f9-432b-9f1a-c16e86769715
+:END:
+
+This command was used to interactively set the attributes of a face.
+It was not consistent with the rest of Fontaine's functionality, plus
+it was not faster than setting face attributes directly from Lisp
+(such as to test them, while experimenting in the =*scratch*= buffer).
+
+** The ~fontaine-set-preset-hook~ provides more options
+:PROPERTIES:
+:CUSTOM_ID: h:c9222aaf-9a65-45c6-919d-f5c10a4cdc34
+:END:
+
+The functions added to this hook are called after ~fontaine-set-preset~.
+For example, users of my ~pulsar~ package can highlight the current
+line to not lose track of the cursor:
+
+#+begin_src emacs-lisp
+(add-hook 'fontaine-set-preset-hook #'pulsar-pulse-line)
+#+end_src
+
+I had thought about defining what Emacs terms "abnormal hooks", which

[elpa] externals/hyperbole fba4d6b6d4 3/3: Merge pull request #517 from rswgnu/rsw

2024-04-16 Thread ELPA Syncer
branch: externals/hyperbole
commit fba4d6b6d4840b3aa47df38bfb6469c988f6b3bb
Merge: 4026c7cefd db7809f827
Author: Robert Weiner 
Commit: GitHub 

Merge pull request #517 from rswgnu/rsw

hyrolo.py - Include this new file
---
 hyrolo.py | 152 ++
 1 file changed, 152 insertions(+)

diff --git a/hyrolo.py b/hyrolo.py
new file mode 100644
index 00..661c8df594
--- /dev/null
+++ b/hyrolo.py
@@ -0,0 +1,152 @@
+#!/usr/bin/env python
+#
+# Summary:  hyrolo.py --- Output file header and matching entries from 
HyRolo files via the command-line
+# Usage:  [ ... ]
+#  If no files are given, uses the env variable, HYROLO, or if 
that is not found, the file
+#  "~/.rolo.otl".
+#
+# Author:   Bob Weiner
+#
+# Orig-Date: 1-Apr-24 at 01:45:27
+# Last-Mod: 15-Apr-24 at 00:04:58 by Bob Weiner
+#
+# SPDX-License-Identifier: GPL-3.0-or-later
+#
+# Copyright (C) 2024  Free Software Foundation, Inc.
+# See the "HY-COPY" file for license information.
+#
+# This file is part of GNU Hyperbole.
+
+# Commentary:
+#   See the Info manual "(hyperbole)HyRolo" for a description of HyRolo and 
associated file formats.
+#
+#   Detects entries in files with Org, Markdown or Emacs outline formats.
+#   Koutlines are not presently supported.
+#
+#   Unlike hyrolo.el, this outputs only the innermost matching entries rather 
than the entire
+#   subtree of matching entries.
+#
+#   This outputs a file header only if there is a matching entry in that file.
+
+# Code:
+
+import argparse
+import os
+import re
+
+# String to match at bol for file header start and end
+file_header_delimiter = '==='
+# Header to insert before a file's first entry match when file has no header.
+# Used with one argument, the file name.
+file_header_format = \
+
"===\n"
 \
+"@loc> \"%s\"\n" \
+
"===\n"
+
+# The ANSI escape sequence for the red color
+red = "\033[31m"
+# The ANSI escape sequence for inverting colors is \033[7m
+invert = "\033[7m"
+# The ANSI escape sequence to reset the color is \033[0m
+reset = "\033[0m"
+
+def find_matching_entries(match_string, file_paths):
+quoted_match_string = re.escape(match_string)
+
+# Remove any null items from file_paths and expand them
+file_paths = [os.path.abspath(os.path.expanduser(os.path.expandvars(p))) 
for p in file_paths if p]
+
+for file_path in file_paths:
+# Initialize variables
+buffer = ''
+file_header_buffer = ''
+inside_entry = False
+inside_file_header = False
+first_line = True
+first_entry = True
+headline_match = False
+
+# Open the file
+with open(file_path, 'r') as file:
+for line in file:
+if first_line:
+first_line = False
+if line.startswith(file_header_delimiter):
+inside_file_header = True
+file_header_buffer += line
+continue
+
+if inside_file_header:
+file_header_buffer += line
+if line.startswith(file_header_delimiter):
+inside_file_header = False
+continue
+
+headline_match = re.match(r'[\*\#]+[ \t]', line, re.IGNORECASE)
+# If inside a entry and the line starts with an asterisk, check
+# if the buffer contains the match string. 
+if inside_entry and headline_match:
+if re.search(quoted_match_string, buffer, re.IGNORECASE):
+if first_entry:
+first_entry = False
+if file_header_buffer:
+print(file_header_buffer, end='')
+file_header_buffer = ''
+print("@loc> \"%s\"\n" % file_path)
+else:
+print(file_header_format % file_path)
+
+highlight_matches(match_string, buffer)
+
+buffer = ''
+inside_entry = False
+
+# If we're not inside a entry and the line starts with an 
asterisk, start a new entry
+elif not inside_entry and headline_match:
+inside_entry = True
+
+# If we're inside a entry, add the line to the buffer
+if inside_entry:
+buffer += line
+
+# Check the last entry if it's still inside a entry
+if inside_entry and re.search(quoted_match_string, buffer, 
re.IGNORECASE):
+if first_entry:
+first_entry = False
+ 

[elpa] externals/hyperbole updated (4026c7cefd -> fba4d6b6d4)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch externals/hyperbole.

  from  4026c7cefd Merge pull request #516 from rswgnu/rsw
   new  e52c302d29 hyrolo.py - Include this new file
   new  db7809f827 Merge branch 'master' into rsw
   new  fba4d6b6d4 Merge pull request #517 from rswgnu/rsw


Summary of changes:
 hyrolo.py | 152 ++
 1 file changed, 152 insertions(+)
 create mode 100644 hyrolo.py



[elpa] externals/hyperbole e52c302d29 1/3: hyrolo.py - Include this new file

2024-04-16 Thread ELPA Syncer
branch: externals/hyperbole
commit e52c302d29463d44bf2343806048b430e778c48c
Author: Bob Weiner 
Commit: Bob Weiner 

hyrolo.py - Include this new file
---
 hyrolo.py | 152 ++
 1 file changed, 152 insertions(+)

diff --git a/hyrolo.py b/hyrolo.py
new file mode 100644
index 00..661c8df594
--- /dev/null
+++ b/hyrolo.py
@@ -0,0 +1,152 @@
+#!/usr/bin/env python
+#
+# Summary:  hyrolo.py --- Output file header and matching entries from 
HyRolo files via the command-line
+# Usage:  [ ... ]
+#  If no files are given, uses the env variable, HYROLO, or if 
that is not found, the file
+#  "~/.rolo.otl".
+#
+# Author:   Bob Weiner
+#
+# Orig-Date: 1-Apr-24 at 01:45:27
+# Last-Mod: 15-Apr-24 at 00:04:58 by Bob Weiner
+#
+# SPDX-License-Identifier: GPL-3.0-or-later
+#
+# Copyright (C) 2024  Free Software Foundation, Inc.
+# See the "HY-COPY" file for license information.
+#
+# This file is part of GNU Hyperbole.
+
+# Commentary:
+#   See the Info manual "(hyperbole)HyRolo" for a description of HyRolo and 
associated file formats.
+#
+#   Detects entries in files with Org, Markdown or Emacs outline formats.
+#   Koutlines are not presently supported.
+#
+#   Unlike hyrolo.el, this outputs only the innermost matching entries rather 
than the entire
+#   subtree of matching entries.
+#
+#   This outputs a file header only if there is a matching entry in that file.
+
+# Code:
+
+import argparse
+import os
+import re
+
+# String to match at bol for file header start and end
+file_header_delimiter = '==='
+# Header to insert before a file's first entry match when file has no header.
+# Used with one argument, the file name.
+file_header_format = \
+
"===\n"
 \
+"@loc> \"%s\"\n" \
+
"===\n"
+
+# The ANSI escape sequence for the red color
+red = "\033[31m"
+# The ANSI escape sequence for inverting colors is \033[7m
+invert = "\033[7m"
+# The ANSI escape sequence to reset the color is \033[0m
+reset = "\033[0m"
+
+def find_matching_entries(match_string, file_paths):
+quoted_match_string = re.escape(match_string)
+
+# Remove any null items from file_paths and expand them
+file_paths = [os.path.abspath(os.path.expanduser(os.path.expandvars(p))) 
for p in file_paths if p]
+
+for file_path in file_paths:
+# Initialize variables
+buffer = ''
+file_header_buffer = ''
+inside_entry = False
+inside_file_header = False
+first_line = True
+first_entry = True
+headline_match = False
+
+# Open the file
+with open(file_path, 'r') as file:
+for line in file:
+if first_line:
+first_line = False
+if line.startswith(file_header_delimiter):
+inside_file_header = True
+file_header_buffer += line
+continue
+
+if inside_file_header:
+file_header_buffer += line
+if line.startswith(file_header_delimiter):
+inside_file_header = False
+continue
+
+headline_match = re.match(r'[\*\#]+[ \t]', line, re.IGNORECASE)
+# If inside a entry and the line starts with an asterisk, check
+# if the buffer contains the match string. 
+if inside_entry and headline_match:
+if re.search(quoted_match_string, buffer, re.IGNORECASE):
+if first_entry:
+first_entry = False
+if file_header_buffer:
+print(file_header_buffer, end='')
+file_header_buffer = ''
+print("@loc> \"%s\"\n" % file_path)
+else:
+print(file_header_format % file_path)
+
+highlight_matches(match_string, buffer)
+
+buffer = ''
+inside_entry = False
+
+# If we're not inside a entry and the line starts with an 
asterisk, start a new entry
+elif not inside_entry and headline_match:
+inside_entry = True
+
+# If we're inside a entry, add the line to the buffer
+if inside_entry:
+buffer += line
+
+# Check the last entry if it's still inside a entry
+if inside_entry and re.search(quoted_match_string, buffer, 
re.IGNORECASE):
+if first_entry:
+first_entry = False
+if file_header_buffer:
+print(file_header_

[elpa] externals/hyperbole db7809f827 2/3: Merge branch 'master' into rsw

2024-04-16 Thread ELPA Syncer
branch: externals/hyperbole
commit db7809f8271b7f7fd36cc0572f393bc1cfec6e86
Merge: e52c302d29 4026c7cefd
Author: Bob Weiner 
Commit: Bob Weiner 

Merge branch 'master' into rsw



[nongnu] elpa/dracula-theme f0d764444f 2/2: Merge branch 'ref_readme'

2024-04-16 Thread ELPA Syncer
branch: elpa/dracula-theme
commit f0d76fd47f7791d8afa9811732a7b9d49c46
Merge: 29d5180f7e 5ec134c596
Author: Étienne Deparis 
Commit: Étienne Deparis 

Merge branch 'ref_readme'

Closes: https://github.com/dracula/emacs/pull/104
---
 README.md | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/README.md b/README.md
index 39010a1ae6..2235160083 100644
--- a/README.md
+++ b/README.md
@@ -45,7 +45,7 @@ This repository contains a small script named 
`start_emacs_test.sh`,
 which helps you to test this color theme in various environment
 (graphical, 256+ colors terminals, 16 colors terminals).
 
-```el
+```sh
 # Graphical test
 ./start_emacs_test.sh
 



[nongnu] elpa/dracula-theme 5ec134c596 1/2: Use the correct code highlighting

2024-04-16 Thread ELPA Syncer
branch: elpa/dracula-theme
commit 5ec134c596316f72cc63ace8cc916e43cdd6a8d8
Author: Alexey Ismagilov 
Commit: Étienne Deparis 

Use the correct code highlighting
---
 README.md | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/README.md b/README.md
index 39010a1ae6..2235160083 100644
--- a/README.md
+++ b/README.md
@@ -45,7 +45,7 @@ This repository contains a small script named 
`start_emacs_test.sh`,
 which helps you to test this color theme in various environment
 (graphical, 256+ colors terminals, 16 colors terminals).
 
-```el
+```sh
 # Graphical test
 ./start_emacs_test.sh
 



[nongnu] elpa/evil 95be93cea7: TIL should-not exists

2024-04-16 Thread ELPA Syncer
branch: elpa/evil
commit 95be93cea7c20311f1ad83c09def850923ffe4f3
Author: Tom Dalziel 
Commit: Tom Dalziel 

TIL should-not exists
---
 evil-tests.el | 10 +-
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/evil-tests.el b/evil-tests.el
index 42ad06c5ac..ca4f4c55ba 100644
--- a/evil-tests.el
+++ b/evil-tests.el
@@ -2170,7 +2170,7 @@ ine3 line3  line3 l\n"))
   (ert-info ("Deletion in normal state leaves point in the right place")
 (evil-test-buffer
   "alpha b[r]avo charlie\ndelta echo foxtrot\ngolf hotel india"
-  (should (not evil-start-of-line))
+  (should-not evil-start-of-line)
   ("D")
   "alpha [b]\ndelta echo foxtrot\ngolf hotel india"
   ("/echo" [return] "C" "newtext" [escape])
@@ -2185,7 +2185,7 @@ ine3 line3  line3 l\n"))
   (ert-info ("Line deletion in visual state leaves point in the right place")
 (evil-test-buffer
   "alpha [b]ravo charlie\ndelta echo foxtrot\ngolf hotel india"
-  (should (not evil-start-of-line))
+  (should-not evil-start-of-line)
   ("vD")
   "delta [e]cho foxtrot\ngolf hotel india"
   ("vX")
@@ -3527,7 +3527,7 @@ Below some empty line"
 ("gjj")
 (should (= (current-column) 1))
 ("Gkgk")
-(should (not (bolp)
+(should-not (bolp
 
 (ert-deftest evil-test-end-of-visual-line ()
   "Test `evil-end-of-visual-line'."
@@ -9646,14 +9646,14 @@ parameter set."
 (evil-with-temp-file file-name ""
   (evil-test-buffer
 (vconcat "i" file-name [escape])
-(should (not (equal file-name (buffer-file-name
+(should-not (equal file-name (buffer-file-name)))
 ("gf")
 (should (equal file-name (buffer-file-name))
   (ert-info ("Find file at point (visual state)")
 (evil-with-temp-file file-name ""
   (evil-test-buffer
 (vconcat "iuser@localhost:" file-name "$" [escape])
-(should (not (equal file-name (buffer-file-name
+(should-not (equal file-name (buffer-file-name)))
 ("0f:lvt$gf")
 (should (equal file-name (buffer-file-name))
   (ert-info ("Find file at point with line number")



[nongnu] elpa/evil 95ee3ce1e5: treewide: replace `(eq/equal foo nil)` with `(null foo)`

2024-04-16 Thread ELPA Syncer
branch: elpa/evil
commit 95ee3ce1e5075b9ff396b6f7266cb6c7b9ccbd93
Author: Konstantin Kharlamov 
Commit: Tom Dalziel <33435574+tomd...@users.noreply.github.com>

treewide: replace `(eq/equal foo nil)` with `(null foo)`
---
 evil-commands.el | 2 +-
 evil-ex.el   | 2 +-
 evil-repeat.el   | 2 +-
 evil-tests.el| 8 
 4 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/evil-commands.el b/evil-commands.el
index 82fadf25cc..7bc743595e 100644
--- a/evil-commands.el
+++ b/evil-commands.el
@@ -3784,7 +3784,7 @@ Signal an error if the file does not exist."
 (let ((completions (cons '(nil) evil-state-properties)))
   (when arg
 (cond
- ((eq flag nil)
+ ((null flag)
   (try-completion arg completions predicate))
  ((eq flag t)
   (all-completions arg completions predicate))
diff --git a/evil-ex.el b/evil-ex.el
index 246aa0d760..644fe7f78c 100644
--- a/evil-ex.el
+++ b/evil-ex.el
@@ -545,7 +545,7 @@ in case of incomplete or unknown commands."
 (defun evil-completion-table-concat (table1 table2)
   (lambda (string pred action)
 (cond
- ((eq action nil)
+ ((null action)
   (let (matches)
 (dolist (table (list table1 table2) (try-completion string matches))
   (let ((x (try-completion string table pred)))
diff --git a/evil-repeat.el b/evil-repeat.el
index f840fb160d..ba00213f50 100644
--- a/evil-repeat.el
+++ b/evil-repeat.el
@@ -250,7 +250,7 @@ Return non-nil if so."
   (evil-emacs-state-p)  ; ... in Emacs state
   (and (evil-mouse-events-p ; ... mouse events
 (this-command-keys-vector))
-   (eq repeat-type nil))
+   (null repeat-type))
   (minibufferp)))   ; ... minibuffer activated
 
 (defun evil-repeat-record (info)
diff --git a/evil-tests.el b/evil-tests.el
index ca4f4c55ba..6cc9cf5be6 100644
--- a/evil-tests.el
+++ b/evil-tests.el
@@ -9187,8 +9187,8 @@ parameter set."
'((signed-number (sign . 1) (number . 2))
   (ert-info ("Lookahead")
 (should (equal (parse "foobar" 'expr) '((list "foo"
-(should (equal (parse "foobaz" 'expr) nil))
-(should (equal (parse "xxxyyy" 'expr) nil))
+(should (null (parse "foobaz" 'expr)))
+(should (null (parse "xxxyyy" 'expr)))
 (should (equal (parse "xxxzzz" 'expr) '((list "xxx")
   (ert-info ("Semantic actions")
 (should (equal (parse "1+1" 'expr)
@@ -9318,7 +9318,7 @@ parameter set."
   "Test `evil-filter-list'"
   :tags '(evil util)
   (ert-info ("Return filtered list")
-(should (equal (evil-filter-list #'null '(nil)) nil))
+(should (null (evil-filter-list #'null '(nil
 (should (equal (evil-filter-list #'null '(nil 1)) '(1)))
 (should (equal (evil-filter-list #'null '(nil 1 2 nil)) '(1 2)))
 (should (equal (evil-filter-list #'null '(nil nil 1)) '(1)))
@@ -9939,7 +9939,7 @@ main(argc, argv) char **argv; {
   (add-hook 'text-mode-hook #'use-german-input-method)
   (evil-test-buffer
"[]"
-   (should (equal evil-input-method nil))
+   (should (null evil-input-method))
("a\"a" [escape])
"\"[a]"
(text-mode)



[elpa] externals/dape 9f4df93f44: Fix info buffer header-line-format

2024-04-16 Thread ELPA Syncer
branch: externals/dape
commit 9f4df93f44775c07a7eb960f3cd7cbf096f4c2b5
Author: Daniel Pettersson 
Commit: Daniel Pettersson 

Fix info buffer header-line-format

Backwards compatible derived-mode-p usage
---
 dape.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/dape.el b/dape.el
index 3df3e7f4ae..aea69c73d8 100644
--- a/dape.el
+++ b/dape.el
@@ -3224,7 +3224,7 @@ displayed."
   (unless (seq-find (lambda (buffer)
   (and (get-buffer-window buffer)
(with-current-buffer buffer
- (derived-mode-p group
+ (apply 'derived-mode-p group
 (dape--info-buffer-list))
 (setq buffer-displayed-p t)
 (dape--display-buffer
@@ -3255,7 +3255,8 @@ displayed."
   "Store related buffers in `dape--info-buffer-related'."
   (setq dape--info-buffer-related
 (cl-loop with group =
- (cl-find-if 'derived-mode-p
+ (cl-find-if (lambda (group)
+   (apply 'derived-mode-p group))
  dape-info-buffer-window-groups)
  with conn = (dape--live-connection 'stopped t)
  with scopes = (plist-get (dape--current-stack-frame conn)



[elpa] externals-release/ement 0028010399 05/10: Merge: (ement-room-mode-hook) Define separately

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit 0028010399fc822c3795e86418b509273ff5
Merge: beb29c5c0a 6f8c84137e
Author: Adam Porter 
Commit: Adam Porter 

Merge: (ement-room-mode-hook) Define separately
---
 ement-room.el | 8 
 1 file changed, 8 insertions(+)

diff --git a/ement-room.el b/ement-room.el
index 5460866ec9..e512befaa1 100644
--- a/ement-room.el
+++ b/ement-room.el
@@ -2565,6 +2565,14 @@ the previously oldest event."
   ;; We don't really care about the response, I think.
   :then #'ignore)))
 
+(defcustom ement-room-mode-hook nil
+  ;; Due to Emacs bug#68600, define the mode hook separately to avoid the mode
+  ;; line constructs in the `ement-room-mode' mode name being copied verbatim
+  ;; into the auto-generated docstring.
+  "Hook run after entering `ement-room-mode'."
+  :options '(visual-line-mode)
+  :type 'hook)
+
 (define-derived-mode ement-room-mode fundamental-mode
   `("Ement-Room"
 (:eval (unless (map-elt ement-syncs ement-session)



[elpa] externals-release/ement dc314a120c 09/10: Release: v0.15

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit dc314a120ca6c62c49342e1b109ae1282116257a
Author: Adam Porter 
Commit: Adam Porter 

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

diff --git a/README.org b/README.org
index 5e6a5d9ec2..9e215f427a 100644
--- a/README.org
+++ b/README.org
@@ -297,7 +297,7 @@ Ement.el doesn't support encrypted rooms natively, but it 
can be used transparen
 :TOC:  :depth 0
 :END:
 
-** 0.15-pre
+** 0.15
 :PROPERTIES:
 :ID:   81b48364-56a7-4903-b354-b79905edb039
 :END:
diff --git a/ement.el b/ement.el
index c867e000b2..d342f82768 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.15-pre
+;; Version: 0.15
 ;; Package-Requires: ((emacs "27.1") (map "2.1") (persist "0.5") (plz "0.6") 
(taxy "0.10") (taxy-magit-section "0.13") (svg-lib "0.2.5") (transient "0.3.7"))
 ;; Keywords: comm
 



[elpa] externals-release/ement 42a4789b0b 01/10: Tidy: Use custom docstring for `ement-room-mode-hook'

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit 42a4789b0b189b2fa291c085594d549a2ac9b4f9
Author: Phil Sainty 
Commit: Phil Sainty 

Tidy: Use custom docstring for `ement-room-mode-hook'

There are mode line constructs in the mode-name for `ement-room-mode',
so this change works around Emacs bug#68600.

Also declare `visual-line-mode' value in the :options list, as that
value is added to this hook as standard.
---
 ement-room.el | 8 
 1 file changed, 8 insertions(+)

diff --git a/ement-room.el b/ement-room.el
index 6f773225ef..f31969a2a0 100644
--- a/ement-room.el
+++ b/ement-room.el
@@ -2089,6 +2089,14 @@ the previously oldest event."
   ;; We don't really care about the response, I think.
   :then #'ignore)))
 
+;; Due to Emacs bug#68600, define the mode hook separately to avoid the mode
+;; line constructs in the `ement-room-mode' mode name being copied verbatim
+;; into the auto-generated docstring.
+(defcustom ement-room-mode-hook nil
+  "Hook run after entering `ement-room-mode'."
+  :options '(visual-line-mode)
+  :type 'hook)
+
 (define-derived-mode ement-room-mode fundamental-mode
   `("Ement-Room"
 (:eval (unless (map-elt ement-syncs ement-session)



[elpa] externals-release/ement 37fbb04ebe 03/10: Docs: Correct the description of the reply command

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit 37fbb04ebe4dd43cdaf47b2fb444cbdae1c44a5b
Author: Phil Sainty 
Commit: Phil Sainty 

Docs: Correct the description of the reply command

The reply functionality has changed since that was written, and an
active region no longer has any bearing on the quoted text.
---
 README.org | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/README.org b/README.org
index 2e0f829988..b6440bef30 100644
--- a/README.org
+++ b/README.org
@@ -191,7 +191,7 @@ Note that if global minor mode 
~ement-room-self-insert-mode~ is enabled (by defa
 
 + Write message: ~RET~
 + Compose message in buffer: ~M-RET~ (while writing in minibuffer: ~C-c '‍~).  
Customize the option ~ement-room-compose-method~ to make ~RET~ and the other 
message bindings use a compose buffer by default.  Use command 
~ement-room-compose-org~ to activate Org mode in the compose buffer.
-+ Write reply to event at point (when region is active, only quote marked 
text): ~S-~
++ Write reply to event at point: ~S-~
 + Edit message: ~~
 + Delete message: ~C-k~
 + Send reaction to event at point, or send same reaction at point: ~s r~



[elpa] externals-release/ement c3b1d6ee1b 02/10: Docs: Update readme

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit c3b1d6ee1b5b7464da66ee8f3ab1391a5a59e29e
Author: Phil Sainty 
Commit: Phil Sainty 

Docs: Update readme

Along similar lines to (info "(org)Escape Character") I've introduced
a ZERO WIDTH JOINER character after the apostrophe in ~C-c '‍~ in order
to achieve the correct appearance in both Emacs and Github.  This can
be visualised using (set-face-background 'glyphless-char "red").

I've substituted S- everywhere that S-RET appeared, as the
latter isn't a valid representation.
---
 README.org | 10 ++
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/README.org b/README.org
index ab8ffd3a3c..2e0f829988 100644
--- a/README.org
+++ b/README.org
@@ -190,8 +190,8 @@ Note that if global minor mode 
~ement-room-self-insert-mode~ is enabled (by defa
 *Messages*
 
 + Write message: ~RET~
-+ Write reply to event at point (when region is active, only quote marked 
text): ~S-RET~
-+ Compose message in buffer: ~M-RET~ (while writing in minibuffer: ~C-c ')~ 
(Use command ~ement-room-compose-org~ to activate Org mode in the compose 
buffer.)
++ Compose message in buffer: ~M-RET~ (while writing in minibuffer: ~C-c '‍~).  
Customize the option ~ement-room-compose-method~ to make ~RET~ and the other 
message bindings use a compose buffer by default.  Use command 
~ement-room-compose-org~ to activate Org mode in the compose buffer.
++ Write reply to event at point (when region is active, only quote marked 
text): ~S-~
 + Edit message: ~~
 + Delete message: ~C-k~
 + Send reaction to event at point, or send same reaction at point: ~s r~
@@ -252,7 +252,7 @@ Note that if global minor mode 
~ement-room-self-insert-mode~ is enabled (by defa
 
 + Move between events: ~TAB~ / ~~
 + Go to event at point in its room buffer: ~RET~
-+ Write reply to event at point (shows the event in its room while writing): 
~S-RET~
++ Write reply to event at point (shows the event in its room while writing): 
~S-~
 
 ** Tips
 
@@ -266,10 +266,12 @@ Note that if global minor mode 
~ement-room-self-insert-mode~ is enabled (by defa
   - Source blocks (including results with ~:exports both~)
   - Footnotes (okay, that might be pushing it, but you can!)
   - And, generally, anything that Org can export to HTML
+  - Note that the default ~org-export-preserve-breaks~ value causes singular 
line breaks to be exported as spaces.  To preserve the line breaks, indentation 
and blank lines in a region, but otherwise use normal formatting, you can use 
the ~verse~ block type.  Refer to =(info "(org)Paragraphs")= and =(info 
"(org)Structure Templates")= for details.
 + Starting in the room list buffer, by pressing ~SPC~ repeatedly, you can 
cycle through and read all rooms with unread buffers.  (If a room doesn't have 
a buffer, it will not be included.)
 + Room buffers and the room-list buffer can be bookmarked in Emacs, i.e. using 
=C-x r m=.  This is especially useful with 
[[https://github.com/alphapapa/burly.el][Burly]]: you can arrange an Emacs 
frame with several room buffers displayed at once, use =burly-bookmark-windows= 
to bookmark the layout, and then you can restore that layout and all of the 
room buffers by opening the bookmark, rather than having to manually arrange 
them every time you start Emacs or change the window configuration.
 + Images and other files can be uploaded to rooms using drag-and-drop.
 + Mention members by typing a ~@~ followed by their displayname or Matrix ID.  
(Members' names and rooms' aliases/IDs may be completed with 
~completion-at-point~ commands.)
++ Customize ~ement-room-use-variable-pitch~ to render messages using 
proportional fonts.
 + You can customize settings in the ~ement~ group.
   - *Note:* ~setq~ should not be used for certain options, because it will not 
call the associated setter function.  Users who have an aversion to the 
customization system may experience problems.
 
@@ -346,7 +348,7 @@ Ement.el doesn't support encrypted rooms natively, but it 
can be used transparen
 - Command ~ement-room-dispatch-new-message~ starts writing a new message using 
your chosen ~ement-room-compose-method~.  (Bound to ~RET~ in room buffers.)
 - Command ~ement-room-dispatch-new-message-alt~ starts writing a new message 
using the alternative method.  (Bound to ~M-RET~ in room buffers.)
 - Command ~ement-room-dispatch-edit-message~ edits a message using your chosen 
~ement-room-compose-method~.  (Bound to ~~ in room buffers.)
-- Command ~ement-room-dispatch-reply-to-message~ replies to a message using 
your chosen ~ement-room-compose-method~.  (Bound to ~S-RET~ in room buffers.)
+- Command ~ement-room-dispatch-reply-to-message~ replies to a message using 
your chosen ~ement-room-compose-method~.  (Bound to ~S-~ in room 
buffers.)
 - Command ~ement-room-compose-edit~ edits a message using a compose buffer.
 - Command ~ement-room-compose-reply~ replies to a message using a compose 
buffer.
 - Command ~ement-room-compose-send-direct~ s

[elpa] externals-release/ement f9ccfc75ae 06/10: Tidy: Readme

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit f9ccfc75ae77820fdd5fb423201a1f2080bfcc66
Author: Adam Porter 
Commit: Adam Porter 

Tidy: Readme

I prefer the Oxford comma. :)
---
 README.org | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/README.org b/README.org
index b6440bef30..5e6a5d9ec2 100644
--- a/README.org
+++ b/README.org
@@ -266,7 +266,7 @@ Note that if global minor mode 
~ement-room-self-insert-mode~ is enabled (by defa
   - Source blocks (including results with ~:exports both~)
   - Footnotes (okay, that might be pushing it, but you can!)
   - And, generally, anything that Org can export to HTML
-  - Note that the default ~org-export-preserve-breaks~ value causes singular 
line breaks to be exported as spaces.  To preserve the line breaks, indentation 
and blank lines in a region, but otherwise use normal formatting, you can use 
the ~verse~ block type.  Refer to =(info "(org)Paragraphs")= and =(info 
"(org)Structure Templates")= for details.
+  - Note that the default ~org-export-preserve-breaks~ value causes singular 
line breaks to be exported as spaces.  To preserve the line breaks, 
indentation, and blank lines in a region, but otherwise use normal formatting, 
you can use the ~verse~ block type.  Refer to ~(info "(org) Paragraphs")~ and 
~(info "(org) Structure Templates")~ for details.
 + Starting in the room list buffer, by pressing ~SPC~ repeatedly, you can 
cycle through and read all rooms with unread buffers.  (If a room doesn't have 
a buffer, it will not be included.)
 + Room buffers and the room-list buffer can be bookmarked in Emacs, i.e. using 
=C-x r m=.  This is especially useful with 
[[https://github.com/alphapapa/burly.el][Burly]]: you can arrange an Emacs 
frame with several room buffers displayed at once, use =burly-bookmark-windows= 
to bookmark the layout, and then you can restore that layout and all of the 
room buffers by opening the bookmark, rather than having to manually arrange 
them every time you start Emacs or change the window configuration.
 + Images and other files can be uploaded to rooms using drag-and-drop.



[elpa] externals/ement updated (beb29c5c0a -> dc314a120c)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch externals/ement.

  from  beb29c5c0a Fix: (ement-room-send-reaction) Call picker interactively
   new  42a4789b0b Tidy: Use custom docstring for `ement-room-mode-hook'
   new  6f8c84137e Tidy: Move comment inside form
   new  0028010399 Merge: (ement-room-mode-hook) Define separately
   new  c3b1d6ee1b Docs: Update readme
   new  37fbb04ebe Docs: Correct the description of the reply command
   new  f9ccfc75ae Tidy: Readme
   new  7645f75d45 Merge: Update readme
   new  83a73d1001 Fix: (magit-section-ident-value ement-room-list-section)
   new  dc314a120c Release: v0.15


Summary of changes:
 README.org | 12 +++-
 ement-room-list.el |  6 +-
 ement-room.el  |  8 
 ement.el   |  2 +-
 4 files changed, 21 insertions(+), 7 deletions(-)



[elpa] externals-release/ement 83a73d1001 08/10: Fix: (magit-section-ident-value ement-room-list-section)

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit 83a73d1001110455889066ab7119c973a73dbb87
Author: Adam Porter 
Commit: Adam Porter 

Fix: (magit-section-ident-value ement-room-list-section)

Emacs 27 doesn't support the same use of `cl-type' in `pcase'.

Fixes #272.

Reported-by: Phil Sainty 
---
 ement-room-list.el | 6 +-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/ement-room-list.el b/ement-room-list.el
index 603803660c..8a9c4f28e3 100644
--- a/ement-room-list.el
+++ b/ement-room-list.el
@@ -66,12 +66,16 @@ a symbol, it should be unquoted.."
   nil)
 
 (cl-defmethod magit-section-ident-value ((section ement-room-list-section))
+  "Return ident value for `ement-room-list-section' SECTION.
+Used for caching section visibility."
   ;; FIXME: The name of each taxy could be ambiguous.  Best would be to use the
   ;; hierarchical path, but since the taxys aren't doubly linked, that isn't 
easily done.
   ;; Could probably be worked around by binding a special variable around the 
creation of
   ;; the taxy hierarchy that would allow the path to be saved into each taxy.
   (pcase-exhaustive (oref section value)
-((and (cl-type taxy-magit-section) it)
+;; FIXME(emacs-28): Use `(cl-type taxy-magit-section)' when requiring 
Emacs 28.  See
+;; .
+((and (pred taxy-magit-section-p) it)
  (taxy-name it))
 (`[,(and (cl-type ement-room) room)
,(and (cl-type ement-session) session)]



[elpa] externals-release/ement 9fe458c395 10/10: Merge: v0.15

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit 9fe458c39526ec9df74c1168bb64b337a7fb6d5f
Merge: 4be346c563 dc314a120c
Author: Adam Porter 
Commit: Adam Porter 

Merge: v0.15
---
 README.org |  100 +++-
 ement-lib.el   |   15 +-
 ement-room-list.el |   32 +-
 ement-room.el  | 1407 +++-
 ement.el   |4 +-
 5 files changed, 1402 insertions(+), 156 deletions(-)

diff --git a/README.org b/README.org
index 1fe1bb0bec..9e215f427a 100644
--- a/README.org
+++ b/README.org
@@ -162,6 +162,8 @@ These bindings are common to all of the following buffer 
types:
 
 *** Room buffers
 
+Note that if global minor mode ~ement-room-self-insert-mode~ is enabled (by 
default it is disabled), typing any of the common printable ascii characters 
(such as letters) in a room buffer will start a new message, and most of the 
following bindings are instead accessed via a prefix key.  See the minor mode 
docstring for details.  (The ~?~ binding is an exception; by default it opens 
the command menu regardless of this minor mode.)
+
 + Show command menu: ~?~
 
 [[images/transient.png]]
@@ -188,8 +190,8 @@ These bindings are common to all of the following buffer 
types:
 *Messages*
 
 + Write message: ~RET~
-+ Write reply to event at point (when region is active, only quote marked 
text) : ~S-RET~
-+ Compose message in buffer: ~M-RET~ (while writing in minibuffer: ~C-c ')~ 
(Use command ~ement-room-compose-org~ to activate Org mode in the compose 
buffer.)
++ Compose message in buffer: ~M-RET~ (while writing in minibuffer: ~C-c '‍~).  
Customize the option ~ement-room-compose-method~ to make ~RET~ and the other 
message bindings use a compose buffer by default.  Use command 
~ement-room-compose-org~ to activate Org mode in the compose buffer.
++ Write reply to event at point: ~S-~
 + Edit message: ~~
 + Delete message: ~C-k~
 + Send reaction to event at point, or send same reaction at point: ~s r~
@@ -201,8 +203,8 @@ These bindings are common to all of the following buffer 
types:
 
 *Images*
 
-+  Toggle scale of image (between fit-to-window and thumbnail): ~mouse-1~
-+  Show image in new buffer at full size: ~double-mouse-1~
++ Toggle scale of image (between fit-to-window and thumbnail): ~mouse-1~
++ Show image in new buffer at full size: ~double-mouse-1~
 
 *Users*
 
@@ -250,7 +252,7 @@ These bindings are common to all of the following buffer 
types:
 
 + Move between events: ~TAB~ / ~~
 + Go to event at point in its room buffer: ~RET~
-+ Write reply to event at point (shows the event in its room while writing) : 
~S-RET~
++ Write reply to event at point (shows the event in its room while writing): 
~S-~
 
 ** Tips
 
@@ -264,10 +266,12 @@ These bindings are common to all of the following buffer 
types:
   - Source blocks (including results with ~:exports both~)
   - Footnotes (okay, that might be pushing it, but you can!)
   - And, generally, anything that Org can export to HTML
+  - Note that the default ~org-export-preserve-breaks~ value causes singular 
line breaks to be exported as spaces.  To preserve the line breaks, 
indentation, and blank lines in a region, but otherwise use normal formatting, 
you can use the ~verse~ block type.  Refer to ~(info "(org) Paragraphs")~ and 
~(info "(org) Structure Templates")~ for details.
 + Starting in the room list buffer, by pressing ~SPC~ repeatedly, you can 
cycle through and read all rooms with unread buffers.  (If a room doesn't have 
a buffer, it will not be included.)
 + Room buffers and the room-list buffer can be bookmarked in Emacs, i.e. using 
=C-x r m=.  This is especially useful with 
[[https://github.com/alphapapa/burly.el][Burly]]: you can arrange an Emacs 
frame with several room buffers displayed at once, use =burly-bookmark-windows= 
to bookmark the layout, and then you can restore that layout and all of the 
room buffers by opening the bookmark, rather than having to manually arrange 
them every time you start Emacs or change the window configuration.
 + Images and other files can be uploaded to rooms using drag-and-drop.
 + Mention members by typing a ~@~ followed by their displayname or Matrix ID.  
(Members' names and rooms' aliases/IDs may be completed with 
~completion-at-point~ commands.)
++ Customize ~ement-room-use-variable-pitch~ to render messages using 
proportional fonts.
 + You can customize settings in the ~ement~ group.
   - *Note:* ~setq~ should not be used for certain options, because it will not 
call the associated setter function.  Users who have an aversion to the 
customization system may experience problems.
 
@@ -293,6 +297,89 @@ Ement.el doesn't support encrypted rooms natively, but it 
can be used transparen
 :TOC:  :depth 0
 :END:
 
+** 0.15
+:PROPERTIES:
+:ID:   81b48364-56a7-4903-b354-b79905edb039
+:END:
+
+*Additions*
+
++ Configurable emoji picker for sending reactions.  
([[https://github.com/alphapapa/ement.el/issues/199][#199]], 
[[https://github.com/alphapapa/eme

[elpa] externals-release/ement updated (4be346c563 -> 9fe458c395)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch externals-release/ement.

  from  4be346c563 Merge: v0.14
  adds  97be65ab08 Meta: v0.15-pre
  adds  21cc649b80 Fix: (ement-room-browse-url) Avoid recursive call
  adds  e7ca33ef5c Change: (ement-room-browse-url) Use 
`read-multiple-choice'
  adds  cad27f594f Docs: Update changelog
  adds  5ef7417ee5 Merge: Improve view-room prompt
  adds  9450f74138 Change: (--format-membership-events) "was kicked and 
rejoined" event pairs
  adds  38b5ec5447 Change: (ement-room--format-member-event) Quote reasons
  adds  cd25c8264a Change: (ement-room-list-default-keys) Improve default
  adds  2b9725accd Tidy: Docstring
  adds  cba68d94d9 Tidy: Whitespace in README.org
  adds  ea99f8dd80 Fix: (ement-room-compose-send) Docstring
  adds  375744c409 Tidy: (ement-room-mode) Formatting
  adds  a17ffa1020 Fix: (ement-room-write-reply) Assertions
  adds  ed08bc2188 Fix: (ement-room-send-org-filter) Prevent a new frame 
being created
  adds  42e07f85fd Change: (ement-room-init-compose-buffer) Improve 
`header-line-format'
  adds  9002bc5d87 Fix: (ement-room-edit-message) Prohibit non-interactive 
editing of edit events
  adds  1649da6bde Add function `ement-room-compose-buffer-string-trimmed'
  adds  750a1cfd80 Tidy: (ement-room-compose-send) Combine the 
editing-or-replying cases
  adds  89d30e6027 Tidy: (ement-room-compose-send) Use let-bindings
  adds  3acad3e4d8 Fix: (ement-room-compose-send) Use 
`ement--original-event-for'
  adds  8d8619c2e0 Add command `ement-room-compose-send-direct'
  adds  a72a88c2a8 Change: Defer to `ement-room-message-history' over 
kill-ring usage
  adds  ccdc20f51d Add command `ement-room-compose-abort'
  adds  5690ee4f4b Change: Enable event highlighting for compose buffers
  adds  f9aaf13436 Add command `ement-room-compose-edit'
  adds  5f17b30f1f Add command `ement-room-compose-reply'
  adds  b23874e736 Add user option 
`ement-room-compose-buffer-display-action'
  adds  a8a15f64d1 Auto-resize for the compose buffer window height
  adds  942203912c Add user option `ement-room-compose-method'
  adds  db55c046d7 Add `ement-room-self-insert-mode'
  adds  d40a532733 Provide prefix key labels for `which-key' (and similar) 
to display
  adds  7f8e3662b7 Add targeted dabbrev support for compose buffers
  adds  4f7e433d07 ement-room-compose-message: Minimise scrolling in other 
windows
  adds  91f29046de Change: (ement-room-init-compose-buffer): Set 
yank-excluded-properties
  adds  bc275caa8d Add compose buffer history navigation commands bound to 
M-p and M-n
  adds  b5db22cd58 Add compose buffer history search commands bound to M-r 
and C-M-r
  adds  2a79d91374 Docs: Changelog entries for compose buffer enhancements
  adds  0d9451a253 Fix: completion-at-point in compose buffers
  adds  efb6005c10 Merge: Compose buffer enhancements, etc.
  adds  e25cab9625 Docs: Tidy README
  adds  15f7d3e2d9 Tidy: (ement-room-image-scale) Refactoring
  adds  ad0ba4d49d Fix: (ement-room-image-scale) Prevent scrolling issues 
with images
  adds  f37423f6a0 Add: (ement-room-image-thumbnail-height, 
ement-room-image-thumbnail-height-min)
  adds  325be47e50 Merge: Image scaling improvements
  adds  e4512f410d Docs: Fix readme
  adds  dd9b65410d Fix: (ement-room-transient) Respect 
`ement-room-compose-method'
  adds  7418626abe Fix: More robust auto-height behaviour for compose 
buffer windows
  adds  755020c256 Change: Make compose buffer windows dedicated by default
  adds  639665fc14 Merge: Improvements and bug fixes for compose buffer 
enhancements
  adds  d3faf84445 Fix: (ement--format-body-mentions) Link usernames 
following newlines
  adds  df75e74f94 Docs: Update changelog
  adds  b6e41cf0ca Merge: Fix recognition of mentions after a newline
  adds  7ae4b3b359 Fix: (ement-room--format-message) %W considers only the 
current line
  adds  3d60568260 Merge: Consider newlines in message format for 
wrap-prefix
  adds  60d1dc96fb Docs: Tidy changelog
  adds  baff5886fb Change: (ement-room--event-body-face) Support 
variable-pitch face for plain text
  adds  c9ae65021a Change: (ement-room-shr-use-fonts) Rename option to: 
ement-room-use-variable-pitch
  adds  a20ea4c2b3 Docs: Update changelog
  adds  3e4e84d7a9 Add: (defconst ement-room-variable-pitch-face)
  adds  7fbbb065a8 Merge branch 'phil-s/variable-pitch' [#245]
  adds  570318221b Fix: (defface ement-room-list-direct) Weight
  adds  55e000cf4e Use a window-parameter for the compose buffer window 
auto-height cache
  adds  3a9ad23103 Add: (ement-room-compose-buffer-window-dedicated) New 
value `delete'
  adds  a3b83f4d44 Tidy: Minor refactoring
  adds  f274b7c705 Docs: Minor fixes
  adds  db2952d322 Prevent unwanted resizing when cycling through buffers 
in a window
  

[elpa] externals-release/ement 7645f75d45 07/10: Merge: Update readme

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit 7645f75d45f71f8b8fb62917e1fda95f51468e67
Merge: 0028010399 f9ccfc75ae
Author: Adam Porter 
Commit: Adam Porter 

Merge: Update readme
---
 README.org | 10 ++
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/README.org b/README.org
index ab8ffd3a3c..5e6a5d9ec2 100644
--- a/README.org
+++ b/README.org
@@ -190,8 +190,8 @@ Note that if global minor mode 
~ement-room-self-insert-mode~ is enabled (by defa
 *Messages*
 
 + Write message: ~RET~
-+ Write reply to event at point (when region is active, only quote marked 
text): ~S-RET~
-+ Compose message in buffer: ~M-RET~ (while writing in minibuffer: ~C-c ')~ 
(Use command ~ement-room-compose-org~ to activate Org mode in the compose 
buffer.)
++ Compose message in buffer: ~M-RET~ (while writing in minibuffer: ~C-c '‍~).  
Customize the option ~ement-room-compose-method~ to make ~RET~ and the other 
message bindings use a compose buffer by default.  Use command 
~ement-room-compose-org~ to activate Org mode in the compose buffer.
++ Write reply to event at point: ~S-~
 + Edit message: ~~
 + Delete message: ~C-k~
 + Send reaction to event at point, or send same reaction at point: ~s r~
@@ -252,7 +252,7 @@ Note that if global minor mode 
~ement-room-self-insert-mode~ is enabled (by defa
 
 + Move between events: ~TAB~ / ~~
 + Go to event at point in its room buffer: ~RET~
-+ Write reply to event at point (shows the event in its room while writing): 
~S-RET~
++ Write reply to event at point (shows the event in its room while writing): 
~S-~
 
 ** Tips
 
@@ -266,10 +266,12 @@ Note that if global minor mode 
~ement-room-self-insert-mode~ is enabled (by defa
   - Source blocks (including results with ~:exports both~)
   - Footnotes (okay, that might be pushing it, but you can!)
   - And, generally, anything that Org can export to HTML
+  - Note that the default ~org-export-preserve-breaks~ value causes singular 
line breaks to be exported as spaces.  To preserve the line breaks, 
indentation, and blank lines in a region, but otherwise use normal formatting, 
you can use the ~verse~ block type.  Refer to ~(info "(org) Paragraphs")~ and 
~(info "(org) Structure Templates")~ for details.
 + Starting in the room list buffer, by pressing ~SPC~ repeatedly, you can 
cycle through and read all rooms with unread buffers.  (If a room doesn't have 
a buffer, it will not be included.)
 + Room buffers and the room-list buffer can be bookmarked in Emacs, i.e. using 
=C-x r m=.  This is especially useful with 
[[https://github.com/alphapapa/burly.el][Burly]]: you can arrange an Emacs 
frame with several room buffers displayed at once, use =burly-bookmark-windows= 
to bookmark the layout, and then you can restore that layout and all of the 
room buffers by opening the bookmark, rather than having to manually arrange 
them every time you start Emacs or change the window configuration.
 + Images and other files can be uploaded to rooms using drag-and-drop.
 + Mention members by typing a ~@~ followed by their displayname or Matrix ID.  
(Members' names and rooms' aliases/IDs may be completed with 
~completion-at-point~ commands.)
++ Customize ~ement-room-use-variable-pitch~ to render messages using 
proportional fonts.
 + You can customize settings in the ~ement~ group.
   - *Note:* ~setq~ should not be used for certain options, because it will not 
call the associated setter function.  Users who have an aversion to the 
customization system may experience problems.
 
@@ -346,7 +348,7 @@ Ement.el doesn't support encrypted rooms natively, but it 
can be used transparen
 - Command ~ement-room-dispatch-new-message~ starts writing a new message using 
your chosen ~ement-room-compose-method~.  (Bound to ~RET~ in room buffers.)
 - Command ~ement-room-dispatch-new-message-alt~ starts writing a new message 
using the alternative method.  (Bound to ~M-RET~ in room buffers.)
 - Command ~ement-room-dispatch-edit-message~ edits a message using your chosen 
~ement-room-compose-method~.  (Bound to ~~ in room buffers.)
-- Command ~ement-room-dispatch-reply-to-message~ replies to a message using 
your chosen ~ement-room-compose-method~.  (Bound to ~S-RET~ in room buffers.)
+- Command ~ement-room-dispatch-reply-to-message~ replies to a message using 
your chosen ~ement-room-compose-method~.  (Bound to ~S-~ in room 
buffers.)
 - Command ~ement-room-compose-edit~ edits a message using a compose buffer.
 - Command ~ement-room-compose-reply~ replies to a message using a compose 
buffer.
 - Command ~ement-room-compose-send-direct~ sends a message directly from a 
compose buffer (without the minibuffer).  (Bound to ~C-x C-s~ in compose 
buffers.)



[elpa] externals/rcirc-sqlite updated (84e49e3735 -> 521362c1e0)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch externals/rcirc-sqlite.

  from  84e49e3735 Bumbed the version
   new  a4fd54a059 Select a time range to narrow queries
   new  023c6c14a9 New command: M-x rcirc-sqlite-logs-from-nick
   new  302d6967f8 Added description of the new functionality
   new  521362c1e0 Added description of the new functionality.


Summary of changes:
 README.org|  25 ++--
 rcirc-sqlite.el   | 175 --
 rcirc-sqlite.texi | 101 ++-
 3 files changed, 234 insertions(+), 67 deletions(-)



[elpa] externals-release/ement 6f8c84137e 04/10: Tidy: Move comment inside form

2024-04-16 Thread ELPA Syncer
branch: externals-release/ement
commit 6f8c84137ea81ea744e8304de31866c353f0ef99
Author: Adam Porter 
Commit: Adam Porter 

Tidy: Move comment inside form

This is just a preference that keeps the comment attached to the
related form.
---
 ement-room.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ement-room.el b/ement-room.el
index f31969a2a0..e2d04293db 100644
--- a/ement-room.el
+++ b/ement-room.el
@@ -2089,10 +2089,10 @@ the previously oldest event."
   ;; We don't really care about the response, I think.
   :then #'ignore)))
 
-;; Due to Emacs bug#68600, define the mode hook separately to avoid the mode
-;; line constructs in the `ement-room-mode' mode name being copied verbatim
-;; into the auto-generated docstring.
 (defcustom ement-room-mode-hook nil
+  ;; Due to Emacs bug#68600, define the mode hook separately to avoid the mode
+  ;; line constructs in the `ement-room-mode' mode name being copied verbatim
+  ;; into the auto-generated docstring.
   "Hook run after entering `ement-room-mode'."
   :options '(visual-line-mode)
   :type 'hook)



[elpa] externals/rcirc-sqlite 521362c1e0 4/4: Added description of the new functionality.

2024-04-16 Thread ELPA Syncer
branch: externals/rcirc-sqlite
commit 521362c1e008f91dfd9e9521ef4c96d2bcc34514
Author: Matto Fransen 
Commit: Matto Fransen 

Added description of the new functionality.
---
 README.org | 25 +++--
 1 file changed, 19 insertions(+), 6 deletions(-)

diff --git a/README.org b/README.org
index 224471a8d1..d2ced01c52 100644
--- a/README.org
+++ b/README.org
@@ -65,12 +65,25 @@ Use the following commands to query the database.
 
 - ~M-x rcirc-sqlite-view-log~: display the logs.
 - ~M-x rcirc-sqlite-text-search~ perform full text search in the logs.
+- ~M-x rcirc-sqlite-logs-from-nick~ display the logs from a specific nick.
 - ~M-x rcirc-sqlite-stats~ displays some stats.
 
 ** ~rcirc-sqlite-view-log~
 Default this commands shows the last 200 messages, optionally narrowed
 to a specific channel, or month.
 
+** ~rcirc-sqlite-logs-from-nick~
+Display the logs from a specific nick.
+
+Prompts:
+
+- for a nick
+- for a time range
+
+Completion is used to choose a nick and a time range.
+
+When a time range is chosen, only show the messages that were send in
+that specific range.  Choose ~All channels~ to display everything.
 
 ** ~rcirc-sqlite-text-search~
 Perform full text searches in the database.
@@ -79,21 +92,21 @@ Prompts:
 
 - for a search string
 - for a channel
-- for a month
+- for a time range
 - for a nick
 
-Completion is used to choose a channel, month, or nick.
+Completion is used to choose a channel, a time range, or nick.
 
 When a channel is chosen, the search is performed within the
-chat logs of that specific channel. Choose ~All channels~ to
+chat logs of that specific channel.  Choose ~All channels~ to
 search everywhere.
 
-When a month is chosen, the search is performed within the
-messages that were send in that specific month. Choose ~Anytime~
+When a time range is chosen, the search is performed within the
+messages that were send in that specific range. Choose ~Anytime~
 to search everywhere.
 
 When a nick is chosen, the search is performed within the
-chats of that specific nick. Choose ~All nicks~ to search
+chats of that specific nick.  Choose ~All nicks~ to search
 independent of the sender.
 
 The search string is used to do a full text search in the SQLite



[elpa] externals/rcirc-sqlite 023c6c14a9 2/4: New command: M-x rcirc-sqlite-logs-from-nick

2024-04-16 Thread ELPA Syncer
branch: externals/rcirc-sqlite
commit 023c6c14a90848dcd806f6c4bd036fca7ecac47c
Author: Matto Fransen 
Commit: Matto Fransen 

New command: M-x rcirc-sqlite-logs-from-nick
---
 rcirc-sqlite.el | 42 ++
 1 file changed, 42 insertions(+)

diff --git a/rcirc-sqlite.el b/rcirc-sqlite.el
index 9b46b8df20..79b7ea17d7 100644
--- a/rcirc-sqlite.el
+++ b/rcirc-sqlite.el
@@ -40,6 +40,11 @@
 ;; to your init file:
 ;;   (add-hook 'rcirc-mode-hook #'rcirc-sqlite-log-mode)
 ;;
+;; Full instructions can be found in the rcirc-sqlite info manual.
+;; Evaluate:
+;;
+;;   (info "(rcirc-sqlite) Top")
+;;
  Customization:
 ;;
 ;; To customize various options, including the file to hold the
@@ -53,6 +58,10 @@
 ;; * Narrow queries to time range
 ;;   Use completion to narrow queries to last 90 days, 60 days,
 ;;   30 days, 7 days or a manually selected time range.
+;;
+;; * Show logs from a specific nick
+;;   New command: M-x rcirc-sqlite-logs-from-nick
+;;   Show the logs from a specific nick
 
 ;;; Code:
 
@@ -203,6 +212,27 @@ ARG-LIST is a list with the requested nick and/or channel.
   column dimension from column column)))
   (sqlite-select db dbquery dbdata
 
+(defun rcirc-sqlite-db-query-nick (arg-list)
+  "Fetch the logs from a specific nick.
+ARG-LIST is a list build from the nick and start-time."
+  (let ((db (rcirc-sqlite--conn))
+   (dbquery "SELECT * FROM rcirclogs")
+   (dbdata ()))
+(pcase-let ((`(,nick ,when) arg-list))
+  (unless (string= nick "All nicks")
+   (setq dbquery (concat dbquery " WHERE nick=?"))
+   (push nick dbdata))
+  (unless (= (car when) 0)
+   (if (string= nick "All nicks")
+   (setq dbquery (concat dbquery " WHERE "))
+ (setq dbquery (concat dbquery " AND ")))
+   (setq dbquery (concat dbquery
+ (rcirc-sqlite-create-period-selectstring when)))
+   (push (car when) dbdata)
+   (when (> (cdr when) 0)
+ (push (cdr when) dbdata)))
+  (sqlite-execute db dbquery (reverse dbdata)
+
 (defun rcirc-sqlite-db-query-log (arg-list)
   "Fetch the last N rows of the logs from a specific channel.
 N is defined in `rcirc-sqlite-rows' and is default 200.
@@ -459,6 +489,18 @@ WHEN is a cons of starttime and endtime."
  (concat range-string
  (format-time-string "%F %R" (cdr when)) range-string))
 
+(defun rcirc-sqlite-logs-from-nick (nick when)
+  "View the logs from a specific NICK.
+WHEN is a cons of starttime and endtime.
+The results are displayed a new buffer."
+  (interactive (list
+   (rcirc-sqlite-select-nick nil)
+   (rcirc-sqlite-select-time-range)))
+  (let ((searcharg-list (list nick when)))
+ (rcirc-sqlite-display-tabulation-list
+ (format "<%s> %s" nick (rcirc-sqlite-format-period-string when))
+ #'rcirc-sqlite-db-query-nick searcharg-list)))
+
 (defun rcirc-sqlite-view-log (channel when &optional unlimited offset limit)
   "View the logs of a specific CHANNEL.
 WHEN is a cons of start time and end time, each possible zero.



[elpa] externals/rcirc-sqlite 302d6967f8 3/4: Added description of the new functionality

2024-04-16 Thread ELPA Syncer
branch: externals/rcirc-sqlite
commit 302d6967f873713510cb6149ad9752b0a47fd3e3
Author: Matto Fransen 
Commit: Matto Fransen 

Added description of the new functionality
---
 rcirc-sqlite.texi | 101 ++
 1 file changed, 72 insertions(+), 29 deletions(-)

diff --git a/rcirc-sqlite.texi b/rcirc-sqlite.texi
index ede757c16b..6b5e03a436 100644
--- a/rcirc-sqlite.texi
+++ b/rcirc-sqlite.texi
@@ -111,7 +111,7 @@ To install the package:
 
 and search for ~rcirc-sqlite~.
 
-Or use ~use-package~
+Or use ~use-package~:
 
 @lisp
 (use-package rcirc-sqlite
@@ -146,7 +146,7 @@ Activates or deactivates @code{rcirc-sqlite}.
 @end deffn
 
 Issue the command @code{rcirc-sqlite-log-mode} to manually start
-@code{rcirc-sqlite}. This command toggles between activation
+@code{rcirc-sqlite}.  This command toggles between activation
 and deactivation of @code{rcirc-sqlite}. 
 
 To start @code{rcirc-sqlite} automatically when @code{rcirc}
@@ -180,7 +180,7 @@ For example:
 (setopt rcirc-sqlite-rows 100)
 @end lisp
 
-The user may custimize the following options.
+The user may customize the following options.
 
 @defopt rcirc-sqlite-database
 The file in which SQLite stores the database.
@@ -252,6 +252,7 @@ wider column in the buffer @code{*rcirc log*}.
 * Summery of the commands::
 * View the logs::
 * Full text search and load the result in a buffer::
+* Logs from a specific nick::
 * Stats::
 @end menu
 
@@ -266,6 +267,8 @@ wider column in the buffer @code{*rcirc log*}.
 @item
 @code{M-x rcirc-sqlite-text-search}: perform full text search in the logs.
 @item
+@code{M-x rcirc-sqlite-logs-from-nick}: display the logs from a specific nick.
+@item
 @code{M-x rcirc-sqlite-stats}: displays some stats.
 @end itemize
 
@@ -278,19 +281,19 @@ Display the logs in a new buffer.
 @end defun
 
 Issue the command @code{M-x rcirc-sqlite-view-log} to view the logs
-of a specific channel. Default this command shows the last 200
-lines. This number can be changed by setting the variable
+of a specific channel.  Default this command shows the last 200
+lines.  This number can be changed by setting the variable
 @code{rcirc-sqlite-rows}. 
 
 This command prompts the user for the channel and provides a list
-of available channels. Choose a channel using completion. 
+of available channels.  Choose a channel using completion. 
 Choose the option @code{All channels} to show the last 200 lines of the
 chat log of @strong{all} channels.
 
-Next, the user is prompted for a month, choose a month using
-completion.  When a month is chosen, the last 200 lines the chat log
-from that month are shown.  Choose the option @code{Anytime} or the
-latest month to get the most recent 200 lines.
+Next, the user is prompted to choose a time range, using
+completion.  When a range is chosen, the last 200 lines the chat log
+from that range are shown.  Choose the option @code{Anytime} or the
+last 90, 60, 30, or 7 days to get the most recent 200 lines.
 
 The buffer @code{*rcirc log*} displays the chat logs.
 
@@ -329,25 +332,25 @@ The user is prompted for a search string.
 @item
 The user is prompted to choose a channel (through completion).
 @item
-The user is prompted to choose a specific month (through completion).
+The user is prompted to choose a time range (through completion).
 @item
 The user is prompted to choose a nick (through completion).
 @end itemize
 
 When a channel is chosen, the search is performed within the
-chat logs of that specific channel. Choose @code{All channels} to
-search everywhere.
+chat logs of that specific channel.  Choose @code{All channels} to
+search independent of the channel.
 
-When a month is chosen, the search is performed within the
-messages that were send in that specific month. Choose @code{Anytime}
-to search everywhere.
+When a time range is chosen, the search is performed within the
+chat messages that were send during the chosen range.  When
+@code{Anytime} is chosen, no filtering on date/time takes place.
 
 When a nick is chosen, the search is performed within the
-chats of that specific nick. Choose @code{All nicks} to search
+chats send by a specific nick.  Choose @code{All nicks} to search
 independent of the sender.
 
 The search string is used to do a full text search in the SQLite
-database. When the search string is @code{foo}, chat messages
+database.  When the search string is @code{foo}, chat messages
 containing the word @code{foo} will be found, but chat messages
 containing the word @code{foobar} will not be found.
 
@@ -356,7 +359,7 @@ string @code{foo*}.
 
 Likewise, to search for URLs, use something like @code{"http://*"} or
 @code{"https://*"} as search string, or for example
-@code{"gopher://*"}. Because of the colon (@code{:}), the double
+@code{"gopher://*"}.  Because of the colon (@code{:}), the double
 quotes (@code{"}) here are required.
 
 For more formatting of the search see the chapter
@@ -365,6 +368,47 @@ For more formatting of the searc

[elpa] externals/rcirc-sqlite a4fd54a059 1/4: Select a time range to narrow queries

2024-04-16 Thread ELPA Syncer
branch: externals/rcirc-sqlite
commit a4fd54a0595071655042683544a6db7711713421
Author: Matto Fransen 
Commit: Matto Fransen 

Select a time range to narrow queries
---
 rcirc-sqlite.el | 133 ++--
 1 file changed, 101 insertions(+), 32 deletions(-)

diff --git a/rcirc-sqlite.el b/rcirc-sqlite.el
index 5abe1cc135..9b46b8df20 100644
--- a/rcirc-sqlite.el
+++ b/rcirc-sqlite.el
@@ -5,7 +5,7 @@
 ;; Author: Matto Fransen 
 ;; Maintainer: Matto Fransen 
 ;; Url: https://codeberg.org/mattof/rcirc-sqlite
-;; Version: 0.1.4
+;; Version: 1.0.0
 ;; Keywords: comm
 ;; Package-Requires: ((emacs "30.0"))
 
@@ -46,8 +46,18 @@
 ;; SQLite database:
 ;;   M-x customize-group rcirc-sqlite RET
 
+;;; News:
+
+;; Version 1.0.0 - 2024-04-16
+
+;; * Narrow queries to time range
+;;   Use completion to narrow queries to last 90 days, 60 days,
+;;   30 days, 7 days or a manually selected time range.
+
 ;;; Code:
 
+(require 'org) ;; needed for org-read-date
+
 (defvar rcirc-log-alist)
 (defvar rcirc-log-time-format)
 
@@ -86,6 +96,11 @@ otherwise no connection has been opened.")
 (defconst rcirc-sqlite-nicks-per-channel "Nicks per channel")
 (defconst rcirc-sqlite-channels-per-nick "Channels per nick")
 (defconst rcirc-sqlite-anytime "Anytime")
+(defconst rcirc-sqlite-last-90-days "Last 90 days")
+(defconst rcirc-sqlite-last-60-days "Last 60 days")
+(defconst rcirc-sqlite-last-30-days "Last 30 days")
+(defconst rcirc-sqlite-last-07-days "Last 7 days")
+(defconst rcirc-sqlite-manually-select "manually select range")
 
 (defun rcirc-sqlite--conn ()
   "Return an open database connection, or open one up."
@@ -142,11 +157,15 @@ VALUES (?,?,?,?)"
   (let ((db (rcirc-sqlite--conn)))
 (sqlite-select db "SELECT DISTINCT nick FROM rcirclogs")))
 
-(defun rcirc-sqlite-db-query-months ()
-  "List the year/months from the SQLite database."
-  (let ((db (rcirc-sqlite--conn)))
-(sqlite-select db "SELECT DISTINCT strftime('%Y-%m', time, 'unixepoch')
-FROM rcirclogs")))
+(defun rcirc-sqlite-create-period-selectstring (when)
+  "Create a select string for the query.
+WHEN is a cons of start-time and end-time."
+  (let ((subquery ""))
+   (unless (= (car when) 0)
+ (setq subquery (concat subquery " time+0 > ?"))
+ (when (> (cdr when) 0)
+   (setq subquery (concat subquery " AND time+0 < ?"
+   subquery))
 
 (defun rcirc-sqlite-db-query-stats (arg-list)
   "List the number of rows per channel.
@@ -188,7 +207,7 @@ ARG-LIST is a list with the requested nick and/or channel.
   "Fetch the last N rows of the logs from a specific channel.
 N is defined in `rcirc-sqlite-rows' and is default 200.
 The user can opt for no limit, or a different limit and offset.
-ARG-LIST is a list build from channel, period (year-month), unlimited,
+ARG-LIST is a list build from channel, time range, unlimited,
 offset and limit."
   (let ((db (rcirc-sqlite--conn))
(dbquery "SELECT * FROM rcirclogs")
@@ -197,12 +216,15 @@ offset and limit."
   (unless (string= channel rcirc-sqlite-all-channels)
(setq dbquery (concat dbquery " WHERE channel=?"))
(push channel dbdata))
-  (unless (string= when rcirc-sqlite-anytime)
+  (unless (= (car when) 0)
(if (string= channel rcirc-sqlite-all-channels)
(setq dbquery (concat dbquery " WHERE "))
  (setq dbquery (concat dbquery " AND ")))
-   (setq dbquery (concat dbquery "strftime('%Y-%m', time, 'unixepoch')=?"))
-   (push when dbdata))
+   (setq dbquery (concat dbquery
+ (rcirc-sqlite-create-period-selectstring when)))
+   (push (car when) dbdata)
+   (when (> (cdr when) 0)
+ (push (cdr when) dbdata)))
   (unless unlimited
(if limit
(progn
@@ -217,7 +239,7 @@ offset and limit."
 (defun rcirc-sqlite-db-search-log (arg-list)
   "Perform a full text search.
 ARG-LIST describes the search argument and possibly a specific
-channel, month and/or nick to narrow the search to."
+channel, time range, and/or nick to narrow the search to."
   (let ((db (rcirc-sqlite--conn))
(dbquery "SELECT * FROM rcirclogs WHERE rcirclogs=?"))
 (pcase-let ((`(,query ,channel ,when ,nick) arg-list))
@@ -225,13 +247,17 @@ channel, month and/or nick to narrow the search to."
(unless (string= channel rcirc-sqlite-all-channels)
  (setq dbquery (concat dbquery " AND channel=?"))
  (push channel dbdata))
-   (unless (string= when rcirc-sqlite-anytime)
- (setq dbquery (concat dbquery " AND strftime('%Y-%m', time, 
'unixepoch')=?"))
- (push when dbdata))
+   (unless (= (car when) 0)
+   (setq dbquery (concat dbquery " AND "))
+ (setq dbquery (concat dbquery
+   (rcirc-sqlite-create-period-selectstring when)))
+ (push (car when) dbdata)
+ (when (> (cdr when) 0)
+   (push (cdr when) dbdata)))
(unless (string= nick rcirc-sqlite-

[nongnu] elpa/racket-mode a0d0566fb5 1/2: Improve forward-sexp-function comparison

2024-04-16 Thread ELPA Syncer
branch: elpa/racket-mode
commit a0d0566fb590249d6bfa82080b4845fb0db968bf
Author: Greg Hendershott 
Commit: Greg Hendershott 

Improve forward-sexp-function comparison

Although we used to check for forward-exp-function being nil, bleeding
edge emacs now defaults it to a new forward-sexp-default-function.

Anyway what we really meant to check is whether forward-sexp-function
is set to our racket-hash-lang-forward-sexp function.
---
 racket-util.el | 5 -
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/racket-util.el b/racket-util.el
index 8af8abbd6d..34eff17092 100644
--- a/racket-util.el
+++ b/racket-util.el
@@ -169,6 +169,9 @@ The \"project\" is determined by trying, in order:
 (user-error "%S works only in racket-mode or racket-hash-lang-mode edit 
buffers, or racket-repl-mode buffers"
 this-command)))
 
+;; Avoid circular require
+(declare-function racket-hash-lang-forward-sexp "racket-hash-lang" (&optional 
arg))
+
 (defun racket--sexp-edit-mode-p ()
   "Either `racket-mode' or `racket-hash-lang-mode', provided the
 latter has /not/ set the variable `forward-sexp-function' because
@@ -176,7 +179,7 @@ the hash-lang uses racket-grouping-position. In other 
words, when
 `forward-sexp-function' is nil we may assume that the lang uses
 s-expressions."
   (and (racket--edit-mode-p)
-   (not forward-sexp-function)))
+   (not (equal forward-sexp-function #'racket-hash-lang-forward-sexp
 
 (defun racket--assert-sexp-edit-mode ()
   (unless (racket--sexp-edit-mode-p)



[nongnu] elpa/racket-mode updated (a0aff4dc01 -> 7f2a6a8f2c)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch elpa/racket-mode.

  from  a0aff4dc01 Ensure REPLs per back end; document direnv; closes #706
   new  a0d0566fb5 Improve forward-sexp-function comparison
   new  7f2a6a8f2c Explain direnv scenario in back end scenarios example of 
Guide


Summary of changes:
 doc/racket-mode.org  | 4 +++-
 doc/racket-mode.texi | 4 +++-
 racket-util.el   | 5 -
 3 files changed, 10 insertions(+), 3 deletions(-)



[nongnu] elpa/racket-mode 7f2a6a8f2c 2/2: Explain direnv scenario in back end scenarios example of Guide

2024-04-16 Thread ELPA Syncer
branch: elpa/racket-mode
commit 7f2a6a8f2c21b45576302102b68024e9e5ba5282
Author: Greg Hendershott 
Commit: Greg Hendershott 

Explain direnv scenario in back end scenarios example of Guide

Extra documentation for issue #706.
---
 doc/racket-mode.org  | 4 +++-
 doc/racket-mode.texi | 4 +++-
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/doc/racket-mode.org b/doc/racket-mode.org
index 59047b5469..e37694c3c5 100644
--- a/doc/racket-mode.org
+++ b/doc/racket-mode.org
@@ -412,12 +412,14 @@ In the common case there is only one back end, on the 
same local host as Emacs,
 
 {{{img(scenario-0, Emacs front end and one local back end)}}}
 
-However you can configure using any number of back ends on any number of local 
or remote hosts.
+However you can configure using any number of back ends on any number of local 
or remote host paths.
 
 As one example, you can have multiple back ends on the local host. One back 
end is used for a project under a specific subdirectory, and the other back end 
for all others. (Perhaps one project needs Racket built from source, and 
everything else uses an installed, older version of Racket. By using different 
back ends, not only will ~racket-run~ use the desired version of Racket for a 
file, so will commands for documentation or visiting definitions.)
 
 {{{img(scenario-1, Emacs front end and two local back ends --- one for a 
project path)}}}
 
+(Note: If you use various versions of Racket via 
[[https://direnv.net/][~direnv~]] combined with the 
[[https://github.com/purcell/envrc][~envrc~ Emacs package]], you still need a 
distinct back end for each project. To arrange this, add or modify a 
~.dir-locals.el~ file next to each ~.envrc~ file; 
{{{see(racket-add-back-end)}}}.)
+
 Furthermore, you could work with a project located on a remote host, whose 
files you edit using TRAMP. You also want the back end to run there. For a 
remote host, Racket Mode copies its back end source files to the remote when 
necessary, and runs the back end using ssh.
 
 {{{img(scenario-2, Emacs front end and a back end on a remote host)}}}
diff --git a/doc/racket-mode.texi b/doc/racket-mode.texi
index e658c0475c..99f5ea527a 100644
--- a/doc/racket-mode.texi
+++ b/doc/racket-mode.texi
@@ -868,12 +868,14 @@ In the common case there is only one back end, on the 
same local host as Emacs,
 
 @image{scenario-0,,, Emacs front end and one local back end. Command I/O via 
pipe (local) or ssh (remote). Each back end provides zero or more REPLs.,.svg}
 
-However you can configure using any number of back ends on any number of local 
or remote hosts.
+However you can configure using any number of back ends on any number of local 
or remote host paths.
 
 As one example, you can have multiple back ends on the local host. One back 
end is used for a project under a specific subdirectory, and the other back end 
for all others. (Perhaps one project needs Racket built from source, and 
everything else uses an installed, older version of Racket. By using different 
back ends, not only will @code{racket-run} use the desired version of Racket 
for a file, so will commands for documentation or visiting definitions.)
 
 @image{scenario-1,,, Emacs front end and two local back ends --- one for a 
project path. Command I/O via pipe (local) or ssh (remote). Each back end 
provides zero or more REPLs.,.svg}
 
+(Note: If you use various versions of Racket via @uref{https://direnv.net/, 
@code{direnv}} combined with the @uref{https://github.com/purcell/envrc, 
@code{envrc} Emacs package}, you still need a distinct back end for each 
project. To arrange this, add or modify a @code{.dir-locals.el} file next to 
each @code{.envrc} file; @xref{racket-add-back-end}.)
+
 Furthermore, you could work with a project located on a remote host, whose 
files you edit using TRAMP@. You also want the back end to run there. For a 
remote host, Racket Mode copies its back end source files to the remote when 
necessary, and runs the back end using ssh.
 
 @image{scenario-2,,, Emacs front end and a back end on a remote host. Command 
I/O via pipe (local) or ssh (remote). Each back end provides zero or more 
REPLs.,.svg}



[nongnu] elpa/zig-mode 53d4939a28 1/3: highlight all int types

2024-04-16 Thread ELPA Syncer
branch: elpa/zig-mode
commit 53d4939a2893d802d6f036274acb35a7d527acd8
Author: Jacob Young 
Commit: Jacob Young 

highlight all int types
---
 test/zig-tests.el |  11 ++
 zig-mode.el   | 108 --
 2 files changed, 67 insertions(+), 52 deletions(-)

diff --git a/test/zig-tests.el b/test/zig-tests.el
index dab4bb2dd2..4ac3626a08 100644
--- a/test/zig-tests.el
+++ b/test/zig-tests.el
@@ -164,6 +164,17 @@ const python =
("void" font-lock-type-face)
   (zig-test-font-lock test-string expected
 
+(ert-deftest test-font-lock-int-types ()
+  (zig-test-font-lock
+   "const Types = .{ u0, i7, u33, i123, u5 };"
+   '(("const" font-lock-keyword-face)
+ ("Types" font-lock-variable-name-face)
+ ("u0" font-lock-type-face)
+ ("i7" font-lock-type-face)
+ ("u33" font-lock-type-face)
+ ("i123" font-lock-type-face)
+ ("u5" font-lock-type-face
+
 ;;===;;
 ;; Indentation tests
 
diff --git a/zig-mode.el b/zig-mode.el
index 6742917736..f2b8831d06 100644
--- a/zig-mode.el
+++ b/zig-mode.el
@@ -163,55 +163,6 @@ If given a SOURCE, execute the CMD on it."
 
 table))
 
-(defconst zig-keywords
-  '(;; Storage
-"const" "var" "extern" "packed" "export" "pub" "noalias" "inline"
-"noinline" "comptime" "callconv" "volatile" "allowzero"
-"align" "linksection" "threadlocal" "addrspace"
-
-;; Structure
-"struct" "enum" "union" "error" "opaque"
-
-;; Statement
-"break" "return" "continue" "asm" "defer" "errdefer" "unreachable"
-"try" "catch" "async" "nosuspend" "await" "suspend" "resume"
-
-;; Conditional
-"if" "else" "switch" "and" "or" "orelse"
-
-;; Repeat
-"while" "for"
-
-;; Other keywords
-"fn" "usingnamespace" "test"))
-
-(defconst zig-types
-  '(;; Integer types
-"i2" "u2" "i3" "u3" "i4" "u4" "i5" "u5" "i6" "u6" "i7" "u7" "i8" "u8"
-"i16" "u16" "i29" "u29" "i32" "u32" "i64" "u64" "i128" "u128"
-"isize" "usize"
-
-;; Floating types
-"f16" "f32" "f64" "f80" "f128"
-
-;; C types
-"c_char" "c_short" "c_ushort" "c_int" "c_uint" "c_long" "c_ulong"
-"c_longlong" "c_ulonglong" "c_longdouble"
-
-;; Comptime types
-"comptime_int" "comptime_float"
-
-;; Other types
-"bool" "void" "noreturn" "type" "error" "anyerror" "anyframe" "anytype"
-"anyopaque"))
-
-(defconst zig-constants
-  '(;; Boolean
-"true" "false"
-
-;; Other constants
-"null" "undefined"))
-
 (defconst zig-electric-indent-chars
   '(?\; ?\, ?\) ?\] ?\}))
 
@@ -225,9 +176,62 @@ If given a SOURCE, execute the CMD on it."
  (,(concat "@" zig-re-identifier) . font-lock-builtin-face)
 
  ;; Keywords, constants and types
- (,(regexp-opt zig-keywords  'symbols) . font-lock-keyword-face)
- (,(regexp-opt zig-constants 'symbols) . font-lock-constant-face)
- (,(regexp-opt zig-types 'symbols) . font-lock-type-face)
+ (,(rx symbol-start
+   (|
+;; Storage
+"const" "var" "extern" "packed" "export" "pub" "noalias" "inline"
+"noinline" "comptime" "callconv" "volatile" "allowzero"
+"align" "linksection" "threadlocal" "addrspace"
+
+;; Structure
+"struct" "enum" "union" "error" "opaque"
+
+;; Statement
+"break" "return" "continue" "asm" "defer" "errdefer" "unreachable"
+"try" "catch" "async" "nosuspend" "await" "suspend" "resume"
+
+;; Conditional
+"if" "else" "switch" "and" "or" "orelse"
+
+;; Repeat
+"while" "for"
+
+;; Other keywords
+"fn" "usingnamespace" "test")
+   symbol-end)
+  . font-lock-keyword-face)
+
+ (,(rx symbol-start
+   (|
+;; Boolean
+"true" "false"
+
+;; Other constants
+"null" "undefined")
+   symbol-end)
+  . font-lock-constant-face)
+
+ (,(rx symbol-start
+   (|
+;; Integer types
+(: (any ?i ?u) (| ?0 (: (any (?1 . ?9)) (* digit
+"isize" "usize"
+
+;; Floating types
+"f16" "f32" "f64" "f80" "f128"
+
+;; C types
+"c_char" "c_short" "c_ushort" "c_int" "c_uint" "c_long" "c_ulong"
+"c_longlong" "c_ulonglong" "c_longdouble"
+
+;; Comptime types
+"comptime_int" "comptime_float"
+
+;; Other types
+"bool" "void" "noreturn" "type" "anyerror" "anyframe" "anytype"
+"anyopaque")
+   symbol-end)
+  . font-lock-type-face)
 
  ;; Type annotations (both variable and type)
  (,zig-re-type-annotation 1 font-lock-variable-name-face)



[nongnu] elpa/zig-mode updated (a0ab9636b8 -> b4170b747a)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch elpa/zig-mode.

  from  a0ab9636b8 Merge pull request #103 from jcs-PR/ci/29.3
   new  53d4939a28 highlight all int types
   new  d78231a5e8 fix multiline string literals
   new  b4170b747a Merge pull request #104 from 
ziglang/fix-multiline-string-literals


Summary of changes:
 test/zig-tests.el |  27 -
 zig-mode.el   | 175 +++---
 2 files changed, 99 insertions(+), 103 deletions(-)



[nongnu] elpa/zig-mode b4170b747a 3/3: Merge pull request #104 from ziglang/fix-multiline-string-literals

2024-04-16 Thread ELPA Syncer
branch: elpa/zig-mode
commit b4170b747ae4c45d145ff8bcb7fafe095e17b4c6
Merge: a0ab9636b8 d78231a5e8
Author: Jacob Young 
Commit: GitHub 

Merge pull request #104 from ziglang/fix-multiline-string-literals

Fix multiline string literals
---
 test/zig-tests.el |  27 -
 zig-mode.el   | 175 +++---
 2 files changed, 99 insertions(+), 103 deletions(-)

diff --git a/test/zig-tests.el b/test/zig-tests.el
index dab4bb2dd2..58b5affb51 100644
--- a/test/zig-tests.el
+++ b/test/zig-tests.el
@@ -40,7 +40,7 @@ const string =
 ;"
'(("const" font-lock-keyword-face)
  ("string" font-lock-variable-name-face)
- (" This newline is NOT escaped \\\n" zig-multiline-string-face
+ (" This newline is NOT escaped \\" zig-multiline-string-face
 
 (ert-deftest test-font-lock-backslash-in-str-literal ()
   (zig-test-font-lock
@@ -100,8 +100,8 @@ const python =
 ;"
'(("const" font-lock-keyword-face)
  ("python" font-lock-variable-name-face)
- ("def main():\n" zig-multiline-string-face)
- ("print(\"Hello, world!\")\n" zig-multiline-string-face
+ ("def main():" zig-multiline-string-face)
+ ("print(\"Hello, world!\")" zig-multiline-string-face
 
 (ert-deftest test-font-lock-parameters-pointers-and-arrays ()
   (zig-test-font-lock
@@ -164,6 +164,27 @@ const python =
("void" font-lock-type-face)
   (zig-test-font-lock test-string expected
 
+(ert-deftest test-font-lock-int-types ()
+  (zig-test-font-lock
+   "const Types = .{ u0, i7, u33, i123, u5 };"
+   '(("const" font-lock-keyword-face)
+ ("Types" font-lock-variable-name-face)
+ ("u0" font-lock-type-face)
+ ("i7" font-lock-type-face)
+ ("u33" font-lock-type-face)
+ ("i123" font-lock-type-face)
+ ("u5" font-lock-type-face
+
+(ert-deftest test-font-lock-escaped-backslash ()
+  (zig-test-font-lock
+   "const a = foo('', \"C:\", 
+);"
+   '(("const" font-lock-keyword-face)
+ ("a" font-lock-variable-name-face)
+ ("''" font-lock-string-face)
+ ("\"C:\"" font-lock-string-face)
+ ("" zig-multiline-string-face
+
 ;;===;;
 ;; Indentation tests
 
diff --git a/zig-mode.el b/zig-mode.el
index 6742917736..dfccd3f52f 100644
--- a/zig-mode.el
+++ b/zig-mode.el
@@ -163,55 +163,6 @@ If given a SOURCE, execute the CMD on it."
 
 table))
 
-(defconst zig-keywords
-  '(;; Storage
-"const" "var" "extern" "packed" "export" "pub" "noalias" "inline"
-"noinline" "comptime" "callconv" "volatile" "allowzero"
-"align" "linksection" "threadlocal" "addrspace"
-
-;; Structure
-"struct" "enum" "union" "error" "opaque"
-
-;; Statement
-"break" "return" "continue" "asm" "defer" "errdefer" "unreachable"
-"try" "catch" "async" "nosuspend" "await" "suspend" "resume"
-
-;; Conditional
-"if" "else" "switch" "and" "or" "orelse"
-
-;; Repeat
-"while" "for"
-
-;; Other keywords
-"fn" "usingnamespace" "test"))
-
-(defconst zig-types
-  '(;; Integer types
-"i2" "u2" "i3" "u3" "i4" "u4" "i5" "u5" "i6" "u6" "i7" "u7" "i8" "u8"
-"i16" "u16" "i29" "u29" "i32" "u32" "i64" "u64" "i128" "u128"
-"isize" "usize"
-
-;; Floating types
-"f16" "f32" "f64" "f80" "f128"
-
-;; C types
-"c_char" "c_short" "c_ushort" "c_int" "c_uint" "c_long" "c_ulong"
-"c_longlong" "c_ulonglong" "c_longdouble"
-
-;; Comptime types
-"comptime_int" "comptime_float"
-
-;; Other types
-"bool" "void" "noreturn" "type" "error" "anyerror" "anyframe" "anytype"
-"anyopaque"))
-
-(defconst zig-constants
-  '(;; Boolean
-"true" "false"
-
-;; Other constants
-"null" "undefined"))
-
 (defconst zig-electric-indent-chars
   '(?\; ?\, ?\) ?\] ?\}))
 
@@ -225,9 +176,62 @@ If given a SOURCE, execute the CMD on it."
  (,(concat "@" zig-re-identifier) . font-lock-builtin-face)
 
  ;; Keywords, constants and types
- (,(regexp-opt zig-keywords  'symbols) . font-lock-keyword-face)
- (,(regexp-opt zig-constants 'symbols) . font-lock-constant-face)
- (,(regexp-opt zig-types 'symbols) . font-lock-type-face)
+ (,(rx symbol-start
+   (|
+;; Storage
+"const" "var" "extern" "packed" "export" "pub" "noalias" "inline"
+"noinline" "comptime" "callconv" "volatile" "allowzero"
+"align" "linksection" "threadlocal" "addrspace"
+
+;; Structure
+"struct" "enum" "union" "error" "opaque"
+
+;; Statement
+"break" "return" "continue" "asm" "defer" "errdefer" "unreachable"
+"try" "catch" "async" "nosuspend" "await" "suspend" "resume"
+
+;; Conditional
+"if" "else" "switch" "and" "or" "orelse"
+
+;; Repeat
+"while" "for"
+
+;; Other keyword

[nongnu] elpa/zig-mode d78231a5e8 2/3: fix multiline string literals

2024-04-16 Thread ELPA Syncer
branch: elpa/zig-mode
commit d78231a5e8ac9193e2dd480d6bd854e46d63
Author: Jacob Young 
Commit: Jacob Young 

fix multiline string literals
---
 test/zig-tests.el | 16 ++---
 zig-mode.el   | 67 ---
 2 files changed, 32 insertions(+), 51 deletions(-)

diff --git a/test/zig-tests.el b/test/zig-tests.el
index 4ac3626a08..58b5affb51 100644
--- a/test/zig-tests.el
+++ b/test/zig-tests.el
@@ -40,7 +40,7 @@ const string =
 ;"
'(("const" font-lock-keyword-face)
  ("string" font-lock-variable-name-face)
- (" This newline is NOT escaped \\\n" zig-multiline-string-face
+ (" This newline is NOT escaped \\" zig-multiline-string-face
 
 (ert-deftest test-font-lock-backslash-in-str-literal ()
   (zig-test-font-lock
@@ -100,8 +100,8 @@ const python =
 ;"
'(("const" font-lock-keyword-face)
  ("python" font-lock-variable-name-face)
- ("def main():\n" zig-multiline-string-face)
- ("print(\"Hello, world!\")\n" zig-multiline-string-face
+ ("def main():" zig-multiline-string-face)
+ ("print(\"Hello, world!\")" zig-multiline-string-face
 
 (ert-deftest test-font-lock-parameters-pointers-and-arrays ()
   (zig-test-font-lock
@@ -175,6 +175,16 @@ const python =
  ("i123" font-lock-type-face)
  ("u5" font-lock-type-face
 
+(ert-deftest test-font-lock-escaped-backslash ()
+  (zig-test-font-lock
+   "const a = foo('', \"C:\", 
+);"
+   '(("const" font-lock-keyword-face)
+ ("a" font-lock-variable-name-face)
+ ("''" font-lock-string-face)
+ ("\"C:\"" font-lock-string-face)
+ ("" zig-multiline-string-face
+
 ;;===;;
 ;; Indentation tests
 
diff --git a/zig-mode.el b/zig-mode.el
index f2b8831d06..dfccd3f52f 100644
--- a/zig-mode.el
+++ b/zig-mode.el
@@ -361,18 +361,19 @@ This is written mainly to be used as 
`end-of-defun-function' for Zig."
(and (not (looking-at " *\\(//[^\n]*\\)?\n"))
 (current-column)))
  (+ prev-block-indent-col zig-indent-offset
-  ;; is-expr-continutation: True if this line continues an
+  ;; is-expr-continuation: True if this line continues an
   ;; expression from the previous line, false otherwise.
-  (is-expr-continutation
+  (is-expr-continuation
(and
 (not (looking-at "[]});]\\|else"))
 (save-excursion
   (zig-skip-backwards-past-whitespace-and-comments)
   (when (> (point) 1)
 (backward-char)
-(not (looking-at "[,;([{}]")))
+(or (zig-currently-in-str)
+(not (looking-at "[,;([{}]"
  ;; Now we can calculate indent-col:
- (if is-expr-continutation
+ (if is-expr-continuation
  (+ base-indent-col zig-indent-offset)
base-indent-col)
 ;; If point is within the indentation whitespace, move it to the end of the
@@ -383,53 +384,23 @@ This is written mainly to be used as 
`end-of-defun-function' for Zig."
 (indent-line-to indent-col)
   (save-excursion (indent-line-to indent-col)
 
-(defun zig-syntax-propertize-to-newline-if-in-multiline-str (end)
-  ;; First, we need to check if we're in a multiline string literal; if we're
-  ;; not, do nothing.
-  (when (zig-currently-in-str)
-(let ((start (zig-start-of-current-str-or-comment)))
-  (when (save-excursion
-  (goto-char start)
-  (looking-at ""))
-;; At this point, we've determined that we're within a multiline string
-;; literal.  Let `stop' be the position of the closing newline, or
-;; `end', whichever comes first.
-(let ((stop (if (save-excursion
-  (goto-char start)
-  (re-search-forward "\n" end t))
-(prog1 (match-end 0)
-  ;; We found the closing newline, so mark it as the
-  ;; end of this string literal.
-  (put-text-property (match-beginning 0)
- (match-end 0)
- 'syntax-table
- (string-to-syntax "|")))
-  end)))
-  ;; Zig multiline string literals don't support escapes, so mark all
-  ;; backslashes (up to `stop') as punctation instead of escapes.
-  (save-excursion
-(goto-char (1+ start))
-(while (re-search-forward "" stop t)
-  (put-text-property (match-beginning 0) (match-end 0)
- 

[elpa] externals/gtags-mode 543d7ca54d 1/2: Use gtags-mode--local-plist in project-find-functions

2024-04-16 Thread ELPA Syncer
branch: externals/gtags-mode
commit 543d7ca54df5de53615aa8295e2b691f3604f203
Author: Jimmy Aguilar Mena 
Commit: Jimmy Aguilar Mena 

Use gtags-mode--local-plist in project-find-functions

(gtags-mode--local-plist) : Receives dir as new optional argument to set
default argument before setting the gtags-mode--plist.  The argument is
required by project api, but in most cases it will be default-directory;
but it needs to be optional because the same function is used by
xref-backend-functions that doesn't use pass any argument.
---
 gtags-mode.el | 25 +
 1 file changed, 13 insertions(+), 12 deletions(-)

diff --git a/gtags-mode.el b/gtags-mode.el
index abed23ec16..5ad1de27cd 100644
--- a/gtags-mode.el
+++ b/gtags-mode.el
@@ -188,20 +188,21 @@ On success return a list of strings or nil if any error 
occurred."
 (or (gtags-mode--get-plist root)   ;; already exist
(car (push `(:gtagsroot ,root :cache nil) gtags-mode--alist)
 
-(defun gtags-mode--local-plist ()
+(defun gtags-mode--local-plist (&optional dir)
   "Set and return the buffer local value of `gtags-mode--plist'."
   (if (local-variable-p 'gtags-mode--plist)
   gtags-mode--plist
-(gtags-mode--set-connection-locals)
-(setq-local gtags-mode--plist (or (gtags-mode--get-plist default-directory)
- (gtags-mode--create-plist 
default-directory)
+(let ((default-directory (or dir default-directory)))
+  (gtags-mode--set-connection-locals)
+  (setq-local gtags-mode--plist (or (gtags-mode--get-plist 
default-directory)
+   (gtags-mode--create-plist 
default-directory))
 
 (defun gtags-mode--list-completions (prefix)
   "Get the list of completions for PREFIX.
 When PREFIX is nil or empty; return the entire list of
 completions usually from the cache when possible."
   (cond ;; TODO: use with-memoization in the future it will be on emacs 29.1
-   ((not (gtags-mode--local-plist))
+   ((not (gtags-mode--local-plist default-directory))
 (error "Calling `gtags-mode--list-completions' with no gtags-mode--plist"))
((and (stringp prefix) (not (string-blank-p prefix))
 (gtags-mode--exec-sync '("--ignore-case" "--completion") prefix)))
@@ -214,7 +215,7 @@ completions usually from the cache when possible."
 Returns the results as a list of CREATORS outputs similar to
 `mapcar'.  Creator should be a function with 4 input arguments:
 name, code, file, line."
-  (if-let ((root (plist-get (gtags-mode--local-plist) :gtagsroot)))
+  (if-let ((root (plist-get (gtags-mode--local-plist default-directory) 
:gtagsroot)))
   (delete nil (mapcar
   (lambda (line)
 (when (string-match gtags-mode--output-format-regex line)
@@ -238,7 +239,7 @@ This iterates over the buffers and tries to reset
   (with-current-buffer buff
(gtags-mode--set-connection-locals)
(kill-local-variable 'gtags-mode--plist) ;; kill the local to reset it
-   (gtags-mode--local-plist)
+   (gtags-mode--local-plist default-directory)
 
 ;; Interactive commands ==
 
@@ -253,7 +254,7 @@ This iterates over the buffers and tries to reset
 (defun gtags-mode-update ()
   "Update GLOBAL project database."
   (interactive)
-  (when (gtags-mode--local-plist)
+  (when (gtags-mode--local-plist default-directory)
 (gtags-mode--exec-async 'gtags-mode--global '("--update"
 
 ;; Hooks =
@@ -296,7 +297,7 @@ Return as a list of xref location objects."
 
 (defun gtags-mode--imenu-advice ()
   "Make imenu use Global."
-  (when (and buffer-file-name (gtags-mode--local-plist))
+  (when (and buffer-file-name (gtags-mode--local-plist default-directory))
 (gtags-mode--filter-find-symbol
  '("--file") (file-name-nondirectory buffer-file-name)
  (lambda (name _code _file line)
@@ -334,14 +335,14 @@ Return as a list of xref location objects."
   ((eq (buffer-local-value 'gtags-mode--plist buff) project) 
buff)
   ((local-variable-p 'gtags-mode--plist buff) nil)
   (t (with-current-buffer buff
-   (when (eq (gtags-mode--local-plist) project)
+   (when (eq (gtags-mode--local-plist default-directory) 
project)
  (current-buffer))
(buffer-list
 
 ;; Completion-at-point-function (capf) ===
 (defun gtags-mode-completion-function ()
   "Generate completion list."
-  (if (gtags-mode--local-plist)
+  (if (gtags-mode--local-plist default-directory)
   (when-let ((bounds (bounds-of-thing-at-point 'symbol)))
(list (car bounds) (point)
  (completion-table-dynamic #'gtags-mode--list-completions)
@@ -356,7 +357,7 @@ rely on their original or user configured default behavior."
   :lighter gtags-mode

[elpa] externals/gtags-mode 1466890cee 2/2: Use file-name-as-directory for root

2024-04-16 Thread ELPA Syncer
branch: externals/gtags-mode
commit 1466890ceedb7c7a4d916f3efa4d9457aee70496
Author: Jimmy Aguilar Mena 
Commit: Jimmy Aguilar Mena 

Use file-name-as-directory for root
---
 gtags-mode.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gtags-mode.el b/gtags-mode.el
index 5ad1de27cd..e98271fe61 100644
--- a/gtags-mode.el
+++ b/gtags-mode.el
@@ -184,7 +184,8 @@ On success return a list of strings or nil if any error 
occurred."
   "Return dbpath for DIR or nil if none."
   (when-let* ((default-directory dir)
  (root (car (gtags-mode--exec-sync '("--print-dbpath")
-(setq root (concat (file-remote-p default-directory) root))
+(setq root (concat (file-remote-p default-directory) ;; add remote prefix 
if remote
+  (file-name-as-directory root)))   ;; add a / at the end 
is missing
 (or (gtags-mode--get-plist root)   ;; already exist
(car (push `(:gtagsroot ,root :cache nil) gtags-mode--alist)
 



[elpa] externals/gtags-mode updated (3c68518562 -> 1466890cee)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch externals/gtags-mode.

  from  3c68518562 Remove nil buffers from project-buffers
   new  543d7ca54d Use gtags-mode--local-plist in project-find-functions
   new  1466890cee Use file-name-as-directory for root


Summary of changes:
 gtags-mode.el | 28 +++-
 1 file changed, 15 insertions(+), 13 deletions(-)



[nongnu] elpa/org-contrib 3062acd0e3: Remove ob-coq.el now maintained at https://github.com/sp1ff/ob-coq

2024-04-16 Thread ELPA Syncer
branch: elpa/org-contrib
commit 3062acd0e350598727f8dac459ae3a5ee05db7c6
Author: Bastien Guerry 
Commit: Bastien Guerry 

Remove ob-coq.el now maintained at https://github.com/sp1ff/ob-coq

Thanks to Luc Pellissier for maintaining ob-coq.el so far.
---
 README.md  |  1 -
 README.org |  1 -
 lisp/ob-coq.el | 81 --
 3 files changed, 83 deletions(-)

diff --git a/README.md b/README.md
index 775a7f1355..7d309aa250 100644
--- a/README.md
+++ b/README.md
@@ -101,7 +101,6 @@ minor or major release.
 ## Org Babel languages
 
 -   **ob-abc.el:** Org-mode Babel Functions for ABC
--   **ob-coq.el:** Org-mode Babel Functions for Coq
 -   **ob-csharp.el:** Org-mode Babel Functions for csharp evaluation
 -   **ob-ebnf.el:** Org-mode Babel Functions for EBNF
 -   **ob-eukleides.el:** Org-mode Babel Functions for eukleides evaluation
diff --git a/README.org b/README.org
index 43cd2a3eed..12f0afc75f 100644
--- a/README.org
+++ b/README.org
@@ -91,7 +91,6 @@ minor or major release.
 *** Org Babel languages
 
 - ob-abc.el :: Org-mode Babel Functions for ABC
-- ob-coq.el :: Org-mode Babel Functions for Coq
 - ob-csharp.el :: Org-mode Babel Functions for csharp evaluation
 - ob-ebnf.el :: Org-mode Babel Functions for EBNF
 - ob-eukleides.el :: Org-mode Babel Functions for eukleides evaluation
diff --git a/lisp/ob-coq.el b/lisp/ob-coq.el
deleted file mode 100644
index e05259565a..00
--- a/lisp/ob-coq.el
+++ /dev/null
@@ -1,81 +0,0 @@
-;;; ob-coq.el --- Babel Functions for Coq-*- lexical-binding: t; 
-*-
-
-;; Copyright (C) 2010-2021 Free Software Foundation, Inc.
-
-;; Author: Eric Schulte
-;; Maintainer: Luc Pellissier 
-;; Keywords: literate programming, reproducible research
-;; Homepage: https://git.sr.ht/~bzg/org-contrib
-
-;; This file is not part of GNU Emacs.
-
-;; GNU Emacs 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.
-
-;; GNU Emacs 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 GNU Emacs.  If not, see .
-
-;;; Commentary:
-
-;; Rudimentary support for evaluating Coq code blocks.  Currently only
-;; session evaluation is supported.  Requires both coq.el and
-;; coq-inferior.el, both of which are distributed with Coq.
-;;
-;; https://coq.inria.fr/
-
-;;; Code:
-(require 'ob)
-
-(declare-function run-coq "ext:coq-inferior.el" (cmd))
-(declare-function coq-proc "ext:coq-inferior.el" ())
-
-(defvar coq-program-name "coqtop"
-  "Name of the coq toplevel to run.")
-
-(defvar org-babel-coq-buffer "*coq*"
-  "Buffer in which to evaluate coq code blocks.")
-
-(defun org-babel-coq-clean-prompt (string)
-  (if (string-match "^[^[:space:]]+ < " string)
-  (substring string 0 (match-beginning 0))
-string))
-
-(defun org-babel-execute:coq (body params)
-  (let ((full-body (org-babel-expand-body:generic body params))
-   (session (org-babel-coq-initiate-session))
-   (pt (lambda ()
- (marker-position
-  (process-mark (get-buffer-process (current-buffer)))
-(org-babel-coq-clean-prompt
- (org-babel-comint-in-buffer session
-   (let ((start (funcall pt)))
-(with-temp-buffer
-  (insert full-body)
-  (comint-send-region (coq-proc) (point-min) (point-max))
-  (comint-send-string (coq-proc)
-   (if (string= (buffer-substring (- (point-max) 1) (point-max)) ".")
-   "\n"
- ".\n")))
-(while (equal start (funcall pt)) (sleep-for 0.1))
-(buffer-substring start (funcall pt)))
-
-(defun org-babel-coq-initiate-session ()
-  "Initiate a coq session.
-If there is not a current inferior-process-buffer in SESSION then
-create one.  Return the initialized session."
-  (unless (fboundp 'run-coq)
-(error "`run-coq' not defined, load coq-inferior.el"))
-  (save-window-excursion (run-coq coq-program-name))
-  (sit-for 0.1)
-  (get-buffer org-babel-coq-buffer))
-
-(provide 'ob-coq)
-
-;;; ob-coq.el ends here



[nongnu] elpa/slime 91b67bf433: Add sb-impl:+internal-features+ to *features* for #+ highlighting.

2024-04-16 Thread ELPA Syncer
branch: elpa/slime
commit 91b67bf433bb1e12805d68eee8d5fb58e1d1d969
Author: Stas Boukarev 
Commit: Stas Boukarev 

Add sb-impl:+internal-features+ to *features* for #+ highlighting.
---
 swank.lisp | 9 +
 swank/backend.lisp | 4 
 swank/sbcl.lisp| 3 +++
 3 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/swank.lisp b/swank.lisp
index 6893c42f05..a03baa1809 100644
--- a/swank.lisp
+++ b/swank.lisp
@@ -1427,7 +1427,7 @@ FEATURES: a list of keywords
 PACKAGE: a list (&key NAME PROMPT)
 VERSION: the protocol version"
   (let ((c *emacs-connection*))
-(setq *slime-features* *features*)
+(setq *slime-features* (augment-features))
 `(:pid ,(getpid) :style ,(connection.communication-style c)
   :encoding (:coding-systems
  ,(loop for cs in '("utf-8-unix" "iso-latin-1-unix")
@@ -3600,9 +3600,10 @@ The server port is written to PORT-FILE-NAME."
 (defun sync-features-to-emacs ()
   "Update Emacs if any relevant Lisp state has changed."
   ;; FIXME: *slime-features* should be connection-local
-  (unless (eq *slime-features* *features*)
-(setq *slime-features* *features*)
-(send-to-emacs (list :new-features (features-for-emacs)
+  (let ((features (augment-features)))
+(unless (equal *slime-features* features)
+  (setq *slime-features* features)
+  (send-to-emacs (list :new-features (features-for-emacs))
 
 (defun features-for-emacs ()
   "Return `*slime-features*' in a format suitable to send it to Emacs."
diff --git a/swank/backend.lisp b/swank/backend.lisp
index a3f7e9f997..1ba3ade60b 100644
--- a/swank/backend.lisp
+++ b/swank/backend.lisp
@@ -1589,3 +1589,7 @@ Implementations intercept calls to SPEC and call, in this 
order:
 nil)
(prop-value t)
(t nil)
+
+(definterface augment-features ()
+  "*features* or something else "
+  *features*)
diff --git a/swank/sbcl.lisp b/swank/sbcl.lisp
index eadf646028..1cefb0188c 100644
--- a/swank/sbcl.lisp
+++ b/swank/sbcl.lisp
@@ -2099,3 +2099,6 @@ stack."
 
   (defmethod sexp-ref ((s sb-impl::comma) i)
 (sexp-ref (sb-impl::comma-expr s) i)))
+
+(defimplementation augment-features ()
+  (append *features* #+sb-devel sb-impl:+internal-features+))



[elpa] externals/dape 70818c834a 2/2: Merge branch 'externals/dape' of https://git.sv.gnu.org/git/emacs/elpa

2024-04-16 Thread ELPA Syncer
branch: externals/dape
commit 70818c834a6b323314e94e5109a134c226522417
Merge: f5b15f4ced 9f4df93f44
Author: Daniel Pettersson 
Commit: Daniel Pettersson 

Merge branch 'externals/dape' of https://git.sv.gnu.org/git/emacs/elpa



[elpa] externals/dape f5b15f4ced 1/2: Fix info buffer header-line-format

2024-04-16 Thread ELPA Syncer
branch: externals/dape
commit f5b15f4ced421d2ca87038722047193992a116f3
Author: Daniel Pettersson 
Commit: Daniel Pettersson 

Fix info buffer header-line-format

Backwards compatible derived-mode-p usage
---
 dape.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/dape.el b/dape.el
index 3df3e7f4ae..aea69c73d8 100644
--- a/dape.el
+++ b/dape.el
@@ -3224,7 +3224,7 @@ displayed."
   (unless (seq-find (lambda (buffer)
   (and (get-buffer-window buffer)
(with-current-buffer buffer
- (derived-mode-p group
+ (apply 'derived-mode-p group
 (dape--info-buffer-list))
 (setq buffer-displayed-p t)
 (dape--display-buffer
@@ -3255,7 +3255,8 @@ displayed."
   "Store related buffers in `dape--info-buffer-related'."
   (setq dape--info-buffer-related
 (cl-loop with group =
- (cl-find-if 'derived-mode-p
+ (cl-find-if (lambda (group)
+   (apply 'derived-mode-p group))
  dape-info-buffer-window-groups)
  with conn = (dape--live-connection 'stopped t)
  with scopes = (plist-get (dape--current-stack-frame conn)



[nongnu] elpa/smartparens updated (2fc945643f -> d3b6168431)

2024-04-16 Thread ELPA Syncer
elpasync pushed a change to branch elpa/smartparens.

  from  2fc945643f fix(compat): add compat function for syntax-class-to-char
   new  1c6e4711ea test(evil): fix evil tests by updating api
   new  bbdc083ce8 fix(test): do not import ert directly in every test file
   new  39b4379a8c refactor(test): refactor ruby tests to use sp-ert-deftest
   new  5cb1e63e0d test(haskell): fix haskell import
   new  77327ee064 fix(ruby): fix out-of-bounds error when determining line 
position
   new  8e4130dd40 Fix invalid alias definition for `syntax-class-to-char'
   new  c6cd1c307b Merge pull request #1206 from 
juergenhoetzel/fix-invalid-alias-definition
   new  d3b6168431 chore: remove unrelated comment


Summary of changes:
 smartparens-ruby.el |  2 +-
 smartparens.el  | 11 +--
 test/smarparents-clojure-test.el|  1 -
 test/smartparens-evil-test.el   | 12 ++--
 test/smartparens-haskell-test.el|  2 +-
 test/smartparens-javascript-test.el |  1 -
 test/smartparens-lua-test.el|  3 ---
 test/smartparens-movement-test.el   |  1 -
 test/smartparens-ocaml-test.el  |  1 -
 test/smartparens-python-test.el |  1 -
 test/smartparens-ruby-mode-test.el  | 16 
 test/test-helper.el |  1 -
 12 files changed, 21 insertions(+), 31 deletions(-)



[nongnu] elpa/smartparens 5cb1e63e0d 4/8: test(haskell): fix haskell import

2024-04-16 Thread ELPA Syncer
branch: elpa/smartparens
commit 5cb1e63e0dae04a7decfea4e4ab1a5863877ce76
Author: Matus Goljer 
Commit: Matus Goljer 

test(haskell): fix haskell import
---
 test/smartparens-haskell-test.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/smartparens-haskell-test.el b/test/smartparens-haskell-test.el
index 7f928bd8f2..fb9a503412 100644
--- a/test/smartparens-haskell-test.el
+++ b/test/smartparens-haskell-test.el
@@ -1,4 +1,4 @@
-(require 'haskell-mode)
+(require 'haskell)
 (require 'smartparens-haskell)
 
 ;; #710



[nongnu] elpa/smartparens 77327ee064 5/8: fix(ruby): fix out-of-bounds error when determining line position

2024-04-16 Thread ELPA Syncer
branch: elpa/smartparens
commit 77327ee064009f1bb1702a88f3383af3ecf72524
Author: Matus Goljer 
Commit: Matus Goljer 

fix(ruby): fix out-of-bounds error when determining line position

Since the pre-hook runs after the opening delimiter was removed, the
original position of the end delimiter is actually moved back (length
op) points back.  So the check could in some cases at the end of the
buffer result into trying to read positions over the point-max which
crashes.
---
 smartparens-ruby.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/smartparens-ruby.el b/smartparens-ruby.el
index bc906d1d84..31267c7ddb 100644
--- a/smartparens-ruby.el
+++ b/smartparens-ruby.el
@@ -142,8 +142,8 @@ ID, ACTION, CONTEXT."
 (sp-get enc
   (let ((beg-line (line-number-at-pos :beg-in))
 (end-line (line-number-at-pos :end-in)))
-
 (when (equal action 'slurp-backward)
+  (setq end-line (- end-line :op-l))
   (save-excursion
 (sp-forward-sexp)
 (when (looking-at-p ";") (forward-char))



[nongnu] elpa/smartparens bbdc083ce8 2/8: fix(test): do not import ert directly in every test file

2024-04-16 Thread ELPA Syncer
branch: elpa/smartparens
commit bbdc083ce8406f67b9de6b1a222a0d908f8863a2
Author: Matus Goljer 
Commit: Matus Goljer 

fix(test): do not import ert directly in every test file
---
 test/smarparents-clojure-test.el| 1 -
 test/smartparens-javascript-test.el | 1 -
 test/smartparens-lua-test.el| 3 ---
 test/smartparens-movement-test.el   | 1 -
 test/smartparens-ocaml-test.el  | 1 -
 test/smartparens-python-test.el | 1 -
 test/test-helper.el | 1 -
 7 files changed, 9 deletions(-)

diff --git a/test/smarparents-clojure-test.el b/test/smarparents-clojure-test.el
index 87a3001376..f4d760e106 100644
--- a/test/smarparents-clojure-test.el
+++ b/test/smarparents-clojure-test.el
@@ -1,4 +1,3 @@
-(require 'ert)
 (require 'smartparens-clojure)
 (require 'clojure-mode)
 
diff --git a/test/smartparens-javascript-test.el 
b/test/smartparens-javascript-test.el
index 6e27d25476..55c4978190 100644
--- a/test/smartparens-javascript-test.el
+++ b/test/smartparens-javascript-test.el
@@ -1,4 +1,3 @@
-(require 'ert)
 (require 'smartparens-javascript)
 (require 'js2-mode)
 
diff --git a/test/smartparens-lua-test.el b/test/smartparens-lua-test.el
index 87aef99d00..c9ec6f5cef 100644
--- a/test/smartparens-lua-test.el
+++ b/test/smartparens-lua-test.el
@@ -1,9 +1,6 @@
-(require 'ert)
 (require 'smartparens)
 (require 'lua-mode)
 
-
-
 (ert-deftest sp-test-lua-complete-block-in-code ()
   "When inserting the beginning of a block, insert the matching end"
   (sp-test-with-temp-buffer "|"
diff --git a/test/smartparens-movement-test.el 
b/test/smartparens-movement-test.el
index cfed76ddb6..d3155a5bc4 100644
--- a/test/smartparens-movement-test.el
+++ b/test/smartparens-movement-test.el
@@ -1,5 +1,4 @@
 (require 'smartparens)
-(require 'ert)
 
 (ert-deftest sp-test-next-sexp ()
   (sp-test-with-temp-elisp-buffer "|(foo) (bar)"
diff --git a/test/smartparens-ocaml-test.el b/test/smartparens-ocaml-test.el
index 3a4fb04f8a..862bc236ef 100644
--- a/test/smartparens-ocaml-test.el
+++ b/test/smartparens-ocaml-test.el
@@ -1,4 +1,3 @@
-(require 'ert)
 (require 'smartparens)
 (require 'tuareg)
 
diff --git a/test/smartparens-python-test.el b/test/smartparens-python-test.el
index a08ef63a4d..4dba2b9156 100644
--- a/test/smartparens-python-test.el
+++ b/test/smartparens-python-test.el
@@ -1,4 +1,3 @@
-(require 'ert)
 (require 'smartparens-python)
 
 (defun sp-test--python-mode ()
diff --git a/test/test-helper.el b/test/test-helper.el
index 3661c564d6..2a568a6202 100644
--- a/test/test-helper.el
+++ b/test/test-helper.el
@@ -15,7 +15,6 @@
 ;; (when (require 'undercover nil t)
 ;;   (undercover "smartparens*.el"))
 
-(require 'ert)
 (require 'dash)
 (require 'f)
 (require 'cl-lib)



[nongnu] elpa/smartparens 1c6e4711ea 1/8: test(evil): fix evil tests by updating api

2024-04-16 Thread ELPA Syncer
branch: elpa/smartparens
commit 1c6e4711ea3ad7a8ddf369ccb42b26de0190386a
Author: Matus Goljer 
Commit: Matus Goljer 

test(evil): fix evil tests by updating api
---
 test/smartparens-evil-test.el | 12 ++--
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/test/smartparens-evil-test.el b/test/smartparens-evil-test.el
index 2ffbb57c00..cf35b2e0e6 100644
--- a/test/smartparens-evil-test.el
+++ b/test/smartparens-evil-test.el
@@ -7,7 +7,7 @@
 (evil-mode)
 (sp-kill-sexp 1 t)
 (evil-mode -1)
-(should (equal (buffer-string) (evil-get-register ?0)
+(should (equal (buffer-string) (evil-get-register ?0 'no-error)
 
 (ert-deftest sp-test-evil-disabled-copy-sexp ()
   "When `evil-mode' is disabled, copying sexp doesn't modify 0 register."
@@ -15,7 +15,7 @@
 (evil-set-register ?0 nil)
 (evil-mode -1)
 (sp-kill-sexp 1 t)
-(should (not (equal (buffer-string) (evil-get-register ?0))
+(should (not (equal (buffer-string) (evil-get-register ?0 'no-error))
 
 (ert-deftest sp-test-evil-enabled-copy-sexp-with-register ()
   "When `evil-mode' is enabled, copying a sexp with register set will
@@ -25,7 +25,7 @@ copy the sexp into that register."
 (setq evil-this-register ?a)
 (sp-kill-sexp 1 t)
 (evil-mode -1)
-(should (equal (buffer-string) (evil-get-register ?a)
+(should (equal (buffer-string) (evil-get-register ?a 'no-error)
 
 (ert-deftest sp-test-evil-disabled-copy-sexp-with-register ()
   "When `evil-mode' is disabled, copying a sexp with register set will not
@@ -34,7 +34,7 @@ copy the sexp into that register."
 (evil-mode -1)
 (setq evil-this-register ?c)
 (sp-kill-sexp 1 t)
-(should (not (equal (buffer-string) (evil-get-register ?c))
+(should (not (equal (buffer-string) (evil-get-register ?c 'no-error))
 
 (ert-deftest sp-test-evil-enabled-kill-sexp-with-register ()
   "When `evil-mode' is enabled, killing a sexp with register set will
@@ -44,7 +44,7 @@ copy the sexp into that register."
 (setq evil-this-register ?b)
 (sp-kill-sexp 1 nil)
 (evil-mode -1)
-(should (equal "(a b c)" (evil-get-register ?b)
+(should (equal "(a b c)" (evil-get-register ?b 'no-error)
 
 (ert-deftest sp-test-evil-disabled-kill-sexp-with-register ()
   "When `evil-mode' is disabled, killing a sexp with register set will not
@@ -53,4 +53,4 @@ copy the sexp into that register."
 (evil-mode -1)
 (setq evil-this-register ?d)
 (sp-kill-sexp 1 nil)
-(should (not (equal "(a b c)" (evil-get-register ?d))
+(should (not (equal "(a b c)" (evil-get-register ?d 'no-error))



[nongnu] elpa/smartparens c6cd1c307b 7/8: Merge pull request #1206 from juergenhoetzel/fix-invalid-alias-definition

2024-04-16 Thread ELPA Syncer
branch: elpa/smartparens
commit c6cd1c307be47de58d4046c192c0c2f9f2628ba5
Merge: 77327ee064 8e4130dd40
Author: Matus Goljer 
Commit: GitHub 

Merge pull request #1206 from juergenhoetzel/fix-invalid-alias-definition

Fix invalid alias definition for `syntax-class-to-char'
---
 smartparens.el | 9 +
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/smartparens.el b/smartparens.el
index 2c7109c210..3e45ab8461 100644
--- a/smartparens.el
+++ b/smartparens.el
@@ -1858,12 +1858,13 @@ P is the point at which we run `syntax-ppss'"
 (list p (point-min) (point-max))
 (sp-state-last-syntax-ppss-result sp-state) (syntax-ppss p)
 
-(eval-when-compile
-  (defalias 'sp--syntax-class-to-char 'syntax-class-to-char)
-  (when (version< emacs-version "28.1")
+;; `syntax-class-to-char' is new in Emacs 28.1.
+(defalias 'sp--syntax-class-to-char
+  (if (fboundp 'syntax-class-to-char)
+  #'syntax-class-to-char
 ;; Ripped from Emacs 27.0 subr.el.
 ;; See Github Issue#946 and Emacs bug#31692.
-(defun sp--syntax-class-to-char (syntax)
+(lambda (syntax)
   "Return the syntax char of CLASS, described by an integer.
 For example, if SYNTAX is word constituent (the integer 2), the
 character ‘w’ (119) is returned.



[nongnu] elpa/smartparens d3b6168431 8/8: chore: remove unrelated comment

2024-04-16 Thread ELPA Syncer
branch: elpa/smartparens
commit d3b616843167f04b8a9f53dd25e84818c9f6fbce
Author: Matus Goljer 
Commit: Matus Goljer 

chore: remove unrelated comment
---
 smartparens.el | 2 --
 1 file changed, 2 deletions(-)

diff --git a/smartparens.el b/smartparens.el
index 3e45ab8461..f625190765 100644
--- a/smartparens.el
+++ b/smartparens.el
@@ -1862,8 +1862,6 @@ P is the point at which we run `syntax-ppss'"
 (defalias 'sp--syntax-class-to-char
   (if (fboundp 'syntax-class-to-char)
   #'syntax-class-to-char
-;; Ripped from Emacs 27.0 subr.el.
-;; See Github Issue#946 and Emacs bug#31692.
 (lambda (syntax)
   "Return the syntax char of CLASS, described by an integer.
 For example, if SYNTAX is word constituent (the integer 2), the



[nongnu] elpa/smartparens 39b4379a8c 3/8: refactor(test): refactor ruby tests to use sp-ert-deftest

2024-04-16 Thread ELPA Syncer
branch: elpa/smartparens
commit 39b4379a8c8af19206b57b09d625d64ddc3dcc12
Author: Matus Goljer 
Commit: Matus Goljer 

refactor(test): refactor ruby tests to use sp-ert-deftest
---
 test/smartparens-ruby-mode-test.el | 16 
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/test/smartparens-ruby-mode-test.el 
b/test/smartparens-ruby-mode-test.el
index fb49b2f4a3..af37a139a6 100644
--- a/test/smartparens-ruby-mode-test.el
+++ b/test/smartparens-ruby-mode-test.el
@@ -33,7 +33,7 @@ end"
   (should
(sp-ruby-eq-ignore-indent (buffer-string) expected)
 
-(ert-deftest sp-test-ruby-slurp-forward ()
+(sp-ert-deftest sp-test-ruby-slurp-forward
   (sp-ruby-test-slurp-assert 1 "
 if teXst
 end
@@ -249,7 +249,7 @@ end
 
   )
 
-(ert-deftest sp-test-ruby-slurp-backward ()
+(sp-ert-deftest sp-test-ruby-slurp-backward
   (sp-ruby-test-slurp-assert -1 "
 foo.bar
 begin X
@@ -425,7 +425,7 @@ end
 
   )
 
-(ert-deftest sp-test-ruby-slurp-on-single-line ()
+(sp-ert-deftest sp-test-ruby-slurp-on-single-line
   (sp-ruby-test-slurp-assert 1 "
 test {X} test
 " :=> "
@@ -452,7 +452,7 @@ test { test; test }
 
 )
 
-(ert-deftest sp-test-ruby-slurp-with-inline-blocks ()
+(sp-ert-deftest sp-test-ruby-slurp-with-inline-blocks
   (sp-ruby-test-slurp-assert 1 "
 if teXst
 end
@@ -502,7 +502,7 @@ end
   (should
(sp-ruby-eq-ignore-indent (buffer-string) expected)
 
-(ert-deftest sp-test-ruby-barf-forward ()
+(sp-ert-deftest sp-test-ruby-barf-forward
   (sp-ruby-test-barf-assert 1 "
 if teXst
   foo
@@ -612,7 +612,7 @@ end
 ")
   )
 
-(ert-deftest sp-test-ruby-barf-backward ()
+(sp-ert-deftest sp-test-ruby-barf-backward
   (sp-ruby-test-barf-assert -1 "
 begin
   fooX
@@ -702,7 +702,7 @@ end
 ")
   )
 
-(ert-deftest sp-test-ruby-barf-on-single-line ()
+(sp-ert-deftest sp-test-ruby-barf-on-single-line
   (sp-ruby-test-barf-assert 1 "
 test { Xtest }
 " :=> "
@@ -768,7 +768,7 @@ foo = if true
   (should
(sp-ruby-eq-ignore-indent (buffer-string) expected)
 
-(ert-deftest sp-test-ruby-splice ()
+(sp-ert-deftest sp-test-ruby-splice
   (sp-ruby-test-splice-assert 1 "
 if teXst
 end



[nongnu] elpa/smartparens 8e4130dd40 6/8: Fix invalid alias definition for `syntax-class-to-char'

2024-04-16 Thread ELPA Syncer
branch: elpa/smartparens
commit 8e4130dd40a581cd40b00afacbea9c45d016533c
Author: Juergen Hoetzel 
Commit: Juergen Hoetzel 

Fix invalid alias definition for `syntax-class-to-char'

`eval-when-compile' defines the alias symbol only at compile time and
not when the program is loaded and thus results in a void error at
runtime.

Fixes #1204
---
 smartparens.el | 9 +
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/smartparens.el b/smartparens.el
index 2c7109c210..3e45ab8461 100644
--- a/smartparens.el
+++ b/smartparens.el
@@ -1858,12 +1858,13 @@ P is the point at which we run `syntax-ppss'"
 (list p (point-min) (point-max))
 (sp-state-last-syntax-ppss-result sp-state) (syntax-ppss p)
 
-(eval-when-compile
-  (defalias 'sp--syntax-class-to-char 'syntax-class-to-char)
-  (when (version< emacs-version "28.1")
+;; `syntax-class-to-char' is new in Emacs 28.1.
+(defalias 'sp--syntax-class-to-char
+  (if (fboundp 'syntax-class-to-char)
+  #'syntax-class-to-char
 ;; Ripped from Emacs 27.0 subr.el.
 ;; See Github Issue#946 and Emacs bug#31692.
-(defun sp--syntax-class-to-char (syntax)
+(lambda (syntax)
   "Return the syntax char of CLASS, described by an integer.
 For example, if SYNTAX is word constituent (the integer 2), the
 character ‘w’ (119) is returned.



[elpa] main 7cf76ba554: elpa-packages (track-changes): New package

2024-04-16 Thread Stefan Monnier via
branch: main
commit 7cf76ba5548dd672aec44b8f33d22b8abc16200d
Author: Stefan Monnier 
Commit: Stefan Monnier 

elpa-packages (track-changes): New package
---
 elpa-packages | 1 +
 1 file changed, 1 insertion(+)

diff --git a/elpa-packages b/elpa-packages
index da8f4b0caa..7ec00d320b 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -733,6 +733,7 @@
  (topspace :url "https://github.com/trevorpogue/topspace";
   :ignored-files ("LICENSE")
   :news "NEWS.md")
+ (track-changes:core "lisp/emacs-lisp/track-changes.el")
  (tramp:url 
"https://git.savannah.gnu.org/git/tramp.git";
   :branch "externals/tramp"
   :main-file "trampver.el"



[nongnu] elpa/hyperdrive f162c3eea8: Meta: Update transient dependency

2024-04-16 Thread ELPA Syncer
branch: elpa/hyperdrive
commit f162c3eea8429bc9406de53f93463c28df634ac0
Author: Joseph Turner 
Commit: Joseph Turner 

Meta: Update transient dependency
---
 hyperdrive.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hyperdrive.el b/hyperdrive.el
index 876fb5ff86..3a96297ba4 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -7,7 +7,7 @@
 ;; Maintainer: Joseph Turner <~ushin/us...@lists.sr.ht>
 ;; Created: 2022
 ;; Version: 0.4-pre
-;; Package-Requires: ((emacs "28.1") (map "3.0") (compat "29.1.4.4") (plz 
"0.7.2") (persist "0.6") (taxy-magit-section "0.13") (transient "0.5.3"))
+;; Package-Requires: ((emacs "28.1") (map "3.0") (compat "29.1.4.4") (plz 
"0.7.2") (persist "0.6") (taxy-magit-section "0.13") (transient "0.6.0"))
 ;; Homepage: https://git.sr.ht/~ushin/hyperdrive.el
 
 ;; This program is free software; you can redistribute it and/or