[elpa] externals/minuet 0833c9647c 1/3: refactor: simplify transform operation for openai-fim-compatible backend.

2025-04-07 Thread ELPA Syncer 
branch: externals/minuet
commit 0833c9647c2a922f6d3ae0c702e2655c66c08ede
Author: Milan Glacier 
Commit: Milan Glacier 

refactor: simplify transform operation for openai-fim-compatible backend.
---
 minuet.el | 9 +++--
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/minuet.el b/minuet.el
index ce9eb88565..54730d1612 100644
--- a/minuet.el
+++ b/minuet.el
@@ -888,12 +888,9 @@ arrive."
  (transformed `(:end-point ,end-point
 :headers ,headers
 :body ,body))
- (transformed (if transform-functions
-  (progn
-(dolist (fn transform-functions)
-  (setq transformed (or (funcall fn transformed) 
transformed)))
-transformed)
-transformed))
+ (transformed (progn (dolist (fn transform-functions)
+   (setq transformed (or (funcall fn transformed) 
transformed)))
+ transformed))
  ;; Extract transformed components
  (end-point (plist-get transformed :end-point))
  (headers (plist-get transformed :headers))

[elpa] externals/minuet updated (9bfe43d55f -> 2e61e6416b)

2025-04-07 Thread ELPA Syncer 
elpasync pushed a change to branch externals/minuet.

  from  9bfe43d55f doc: Add DeepInfra FIM example for using with 
OpenAI-FIM-Compatible provider.
   new  0833c9647c refactor: simplify transform operation for 
openai-fim-compatible backend.
   new  29d5bb6276 doc: recommend DeepInfra FIM user to use `<|endoftext|>` 
as stop sequence.
   new  2e61e6416b doc: update README.


Summary of changes:
 minuet.el  | 9 +++--
 recipes.md | 3 ++-
 2 files changed, 5 insertions(+), 7 deletions(-)

[elpa] externals/minuet updated (961a678fc2 -> 9bfe43d55f)

2025-04-07 Thread ELPA Syncer 
elpasync pushed a change to branch externals/minuet.

  from  961a678fc2 chore: update package description.
   new  c8ec33a497 feat: introduce transform option for 
OpenAI-FIM-compatible provider.
   new  9bfe43d55f doc: Add DeepInfra FIM example for using with 
OpenAI-FIM-Compatible provider.


Summary of changes:
 minuet.el  | 54 +++--
 recipes.md | 82 +++---
 2 files changed, 119 insertions(+), 17 deletions(-)

[elpa] externals/minuet 9bfe43d55f 2/2: doc: Add DeepInfra FIM example for using with OpenAI-FIM-Compatible provider.

2025-04-07 Thread ELPA Syncer 
branch: externals/minuet
commit 9bfe43d55fe7f4e788572fcd754740186df30c40
Author: Milan Glacier 
Commit: Milan Glacier 

doc: Add DeepInfra FIM example for using with OpenAI-FIM-Compatible 
provider.
---
 recipes.md | 82 +++---
 1 file changed, 78 insertions(+), 4 deletions(-)

diff --git a/recipes.md b/recipes.md
index 9b088d4c90..e21a928660 100644
--- a/recipes.md
+++ b/recipes.md
@@ -1,7 +1,7 @@
 # Launching the llama.cpp Server: Example Script
 
-This guide provides several configuration variants for the `qwen2.5-coder`
-based on local computing power, specifically the available VRAM.
+This guide provides several configuration variants for the `qwen2.5-coder` 
based
+on local computing power, specifically the available VRAM.
 
 ### **For Systems with More Than 16GB VRAM**
 
@@ -72,10 +72,84 @@ llama-server \
 > Symbols like `<|fim_begin|>` and `<|fim_suffix|>` are special tokens
 > that serve as prompt boundaries. Some LLMs, like Qwen2.5-Coder, have
 > been trained with specific tokens to better understand prompt
-> composition. Different LLMs use different special tokens during
+> composition.  Different LLMs use different special tokens during
 > training, so you should adjust these tokens according to your
 > preferred LLM.
 
 ## **Acknowledgment**
 
-- [llama.vim](https://github.com/ggml-org/llama.vim): A reference for CLI 
parameters used in launching the `llama.cpp` server.
+- [llama.vim](https://github.com/ggml-org/llama.vim): A reference for CLI
+  parameters used in launching the `llama.cpp` server.
+
+# Using Non-OpenAI-Compatible FIM APIs with DeepInfra
+
+The `openai_fim_compatible` backend supports advanced customization to 
integrate
+with alternative providers.
+
+- **`:transform`**: A list of functions that accept a plist containing fields
+  listed below. Each function processes and returns a transformed version of
+  these attributes.
+
+  - `:end_point`: The API endpoint for the completion request.
+  - `:headers`: HTTP headers for the request.
+  - `:body`: The request body for the API.
+
+- **`:get_text_fn`**: Function to extract text from streaming responses.
+
+Below is an example configuration for integrating the `openai_fim_compatible`
+backend with the DeepInfra FIM API and Qwen-2.5-Coder-32B-Instruct model.
+
+```lisp
+(use-package minuet
+  :config
+  (setq minuet-provider 'openai-fim-compatible)
+
+  (plist-put minuet-openai-fim-compatible-options :end-point 
"https://api.deepinfra.com/v1/inference/";)
+  (plist-put minuet-openai-fim-compatible-options :api-key "DEEPINFRA_API_KEY")
+  (plist-put minuet-openai-fim-compatible-options :model 
"Qwen/Qwen2.5-Coder-32B-Instruct")
+  (plist-put minuet-openai-fim-compatible-options :transform 
'(minuet-deepinfra-fim-transform))
+
+  (minuet-set-optional-options minuet-openai-fim-compatible-options 
:max_tokens 56)
+  (minuet-set-optional-options minuet-openai-fim-compatible-options :stop 
["\n\n"])
+
+  ;; DeepInfra FIM does not support the `suffix` option in FIM
+  ;; completion.  Therefore, we must disable it and manually
+  ;; populate the special tokens required for FIM completion.
+  (minuet-set-optional-options minuet-openai-fim-compatible-options :suffix 
nil :template)
+
+  ;; Custom prompt formatting for Qwen model
+  (minuet-set-optional-options minuet-openai-fim-compatible-options
+   :prompt
+   (defun 
minuet-deepinfra-fim-qwen-prompt-function (ctx)
+ (format 
"<|fim_prefix|>%s\n%s<|fim_suffix|>%s<|fim_middle|>"
+ (plist-get ctx :language-and-tab)
+ (plist-get ctx :before-cursor)
+ (plist-get ctx :after-cursor)))
+   :template)
+
+  ;; Function to transform requests data according to DeepInfra's API format.
+  (defun minuet-deepinfra-fim-transform (data)
+;; DeepInfra requires the endpoint to be formatted as: 
https://api.deepinfra.com/v1/inference/$MODEL_NAME
+`(:end-point ,(concat (plist-get data :end-point)
+  (--> data
+   (plist-get it :body)
+   (plist-get it :model)))
+  ;; No modifications needed for headers.
+  :headers ,(plist-get data :headers)
+  ;; DeepInfra uses `input` instead of `prompt`, and does not require 
:model in the request body.
+  :body ,(--> data
+  (plist-get it :body)
+  (plist-put it :input (plist-get it :prompt))
+  (map-delete it :model)
+  (map-delete it :prompt
+
+  ;; Function to extract generated text from DeepInfra's JSON output.
+  (plist-put minuet-openai-fim-compatible-options
+ :get-text-fn
+ (defun minuet--deepinfra-get-text-fn (json)
+   ;; DeepInfra's response format is: `json.token

[elpa] externals/minuet c8ec33a497 1/2: feat: introduce transform option for OpenAI-FIM-compatible provider.

2025-04-07 Thread ELPA Syncer 
branch: externals/minuet
commit c8ec33a497808dd269921d6520810792ce49f709
Author: Milan Glacier 
Commit: Milan Glacier 

feat: introduce transform option for OpenAI-FIM-compatible provider.
---
 minuet.el | 54 +-
 1 file changed, 41 insertions(+), 13 deletions(-)

diff --git a/minuet.el b/minuet.el
index 976cf19d5d..ce9eb88565 100644
--- a/minuet.el
+++ b/minuet.el
@@ -299,6 +299,10 @@ fib(5)")
 :api-key "CODESTRAL_API_KEY"
 :template (:prompt minuet--default-fim-prompt-function
:suffix minuet--default-fim-suffix-function)
+;; a list of functions to transform the end-point, headers, and body
+:transform ()
+;; function to extract LLM-generated text from JSON output
+:get-text-fn minuet--openai-get-text-fn
 :optional nil)
   "Config options for Minuet Codestral provider.")
 
@@ -327,6 +331,10 @@ fib(5)")
 :name "Deepseek"
 :template (:prompt minuet--default-fim-prompt-function
:suffix minuet--default-fim-suffix-function)
+;; a list of functions to transform the end-point, headers, and body
+:transform ()
+;; function to extract LLM-generated text from JSON output
+:get-text-fn minuet--openai-fim-get-text-fn
 :optional nil)
   "Config options for Minuet OpenAI FIM compatible provider.")
 
@@ -856,10 +864,12 @@ OPTIONS are the provider options.  GET-TEXT-FN are the 
function to get
 the completion items from json.  CONTEXT is to be used to build the
 prompt.  CALLBACK is the function to be called when completion items
 arrive."
-  (let ((total-try (or minuet-n-completions 1))
-(name (plist-get options :name))
-(body (json-serialize
-   `(,@(plist-get options :optional)
+  (let* ((total-try (or minuet-n-completions 1))
+ ;; Initialize input components
+ (name (plist-get options :name))
+ (end-point (plist-get options :end-point))
+ (transform-functions (plist-get options :transform))
+ (body `(,@(plist-get options :optional)
  :stream t
  :model ,(plist-get options :model)
  :prompt ,(funcall (--> options
@@ -869,17 +879,35 @@ arrive."
  ,@(when-let* ((suffix-fn (--> options
(plist-get it :template)
(plist-get it :suffix
- (list :suffix (funcall suffix-fn context))
-completion-items)
+ (list :suffix (funcall suffix-fn context)
+ (headers `(("Content-Type" . "application/json")
+("Accept" . "application/json")
+("Authorization" .
+ ,(concat "Bearer " (minuet--get-api-key (plist-get 
options :api-key))
+ ;; Apply transformations
+ (transformed `(:end-point ,end-point
+:headers ,headers
+:body ,body))
+ (transformed (if transform-functions
+  (progn
+(dolist (fn transform-functions)
+  (setq transformed (or (funcall fn transformed) 
transformed)))
+transformed)
+transformed))
+ ;; Extract transformed components
+ (end-point (plist-get transformed :end-point))
+ (headers (plist-get transformed :headers))
+ (body (plist-get transformed :body))
+ (body-json (json-serialize body))
+ ;; placeholder for completion items
+ completion-items)
 (dotimes (_ total-try)
   (minuet--with-temp-response
 (push
- (plz 'post (plist-get options :end-point)
-   :headers `(("Content-Type" . "application/json")
-  ("Accept" . "application/json")
-  ("Authorization" . ,(concat "Bearer " 
(minuet--get-api-key (plist-get options :api-key)
+ (plz 'post end-point
+   :headers headers
:timeout minuet-request-timeout
-   :body body
+   :body body-json
:as 'string
:filter (minuet--make-process-stream-filter --response--)
:then
@@ -914,7 +942,7 @@ arrive."
 CONTEXT and CALLBACK will be passed to the base function."
   (minuet--openai-fim-complete-base
(plist-put (copy-tree minuet-codestral-options) :name "Codestral")
-   #'minuet--openai-get-text-fn
+   (plist-get minuet-codestral-options :get-text-fn)
context
callback))
 
@@ -923,7 +951,7 @@ CONTEXT and CALLBACK will be passed to the base function."
 CONTEXT and CALLBACK will be passed to the base function."
   (minuet--openai-fim-complete-base
(copy-tree minuet-openai-fim-compatible-options)
-   #'minuet--openai-fim-get-text-fn
+   (plist-get minuet-openai-fim-compatible-options :get-text-fn)
context
callback))

[elpa] externals/minuet 2e61e6416b 3/3: doc: update README.

2025-04-07 Thread ELPA Syncer 
branch: externals/minuet
commit 2e61e6416bed019ec81e556396b268008d074e2b
Author: Milan Glacier 
Commit: Milan Glacier 

doc: update README.
---
 recipes.md | 1 +
 1 file changed, 1 insertion(+)

diff --git a/recipes.md b/recipes.md
index f0315482c6..330b846684 100644
--- a/recipes.md
+++ b/recipes.md
@@ -104,6 +104,7 @@ backend with the DeepInfra FIM API and 
Qwen-2.5-Coder-32B-Instruct model.
   :config
   (setq minuet-provider 'openai-fim-compatible)
 
+  (plist-put minuet-openai-fim-compatible-options :name "DeepInfra")
   (plist-put minuet-openai-fim-compatible-options :end-point 
"https://api.deepinfra.com/v1/inference/";)
   (plist-put minuet-openai-fim-compatible-options :api-key "DEEPINFRA_API_KEY")
   (plist-put minuet-openai-fim-compatible-options :model 
"Qwen/Qwen2.5-Coder-32B-Instruct")

[elpa] externals/tramp 9d65263f0f: Fix Package-Requires (Bug#77403)

2025-04-07 Thread ELPA Syncer 
branch: externals/tramp
commit 9d65263f0f0eba37b8606a3abbe22e04d816c187
Author: Michael Albinus 
Commit: Michael Albinus 

Fix Package-Requires (Bug#77403)
---
 tramp.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tramp.el b/tramp.el
index ff34c5356d..cdd839a992 100644
--- a/tramp.el
+++ b/tramp.el
@@ -8,7 +8,7 @@
 ;; Keywords: comm, processes
 ;; Package: tramp
 ;; Version: 2.7.2.3
-;; Package-Requires: ((emacs 27.1))
+;; Package-Requires: ((emacs "27.1"))
 ;; Package-Type: multi
 ;; URL: https://www.gnu.org/software/tramp/

[elpa] externals/pinentry 0079964a1d: Display pinentry title when provided

2025-04-07 Thread ELPA Syncer 
branch: externals/pinentry
commit 0079964a1dde954ccb2ce8a28613d8020c549a36
Author: Sergey Trofimov 
Commit: Daiki Ueno 

Display pinentry title when provided
---
 pinentry.el | 10 ++
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/pinentry.el b/pinentry.el
index f9fd53b9c1..36dc09bdce 100644
--- a/pinentry.el
+++ b/pinentry.el
@@ -113,9 +113,11 @@ If local sockets are not supported, this is nil.")
buffer-read-only t))
 
 (defun pinentry--prompt (labels query-function &rest query-args)
-  (let ((desc (cdr (assq 'desc labels)))
-(error (cdr (assq 'error labels)))
-(prompt (cdr (assq 'prompt labels
+  (let* ((title-label (cdr (assq 'title labels)))
+ (desc-label (cdr (assq 'desc labels)))
+ (desc (if title-label (concat title-label "\n" desc-label) 
desc-label))
+ (error (cdr (assq 'error labels)))
+ (prompt (cdr (assq 'prompt labels
 (when (string-match "[ \n]*\\'" prompt)
   (setq prompt (concat
 (substring
@@ -150,7 +152,7 @@ If local sockets are not supported, this is nil.")
 pinentry-prompt-window-height
 (prog1 (apply query-function prompt query-args)
   (quit-window)))
-  (apply query-function (concat desc "\n" prompt) query-args
+  (apply query-function (if desc (concat desc "\n" prompt) prompt) 
query-args
 
 ;;;###autoload
 (defun pinentry-start (&optional quiet)

[elpa] externals/matlab-mode 6ec11ebe5a: emacsdocomplete.m: improve matlab-shell tab completion for R2025a

2025-04-07 Thread ELPA Syncer 
branch: externals/matlab-mode
commit 6ec11ebe5a60171e82048557fabf96da7b63b441
Author: John Ciolfi 
Commit: John Ciolfi 

emacsdocomplete.m: improve matlab-shell tab completion for R2025a

This commit updates matlab-shell tab completion to complete filenames in 
R2025a and later.
---
 toolbox/emacsdocomplete.m | 99 +++
 1 file changed, 57 insertions(+), 42 deletions(-)

diff --git a/toolbox/emacsdocomplete.m b/toolbox/emacsdocomplete.m
index e713b1e001..ac11487590 100644
--- a/toolbox/emacsdocomplete.m
+++ b/toolbox/emacsdocomplete.m
@@ -27,63 +27,71 @@ function emacsdocomplete(substring)
 
 persistent verNum;
 if isempty(verNum)
-v = ver('MATLAB'); %#ok<*VERMATLAB>
+v  = ver('MATLAB'); %#ok<*VERMATLAB>
 verNum = str2double(v.Version);
 end
 
+qStr = strrep(substring, , '');
+lStr = num2str(length(substring));
+
 if verNum >= 25 % R2025a and later
 
-cmd = ['builtin(''_programmingAidsTest'', , ''', ...
-   substring, ''', ', num2str(length(substring)), ', [])'];
-json = evalin('base', cmd);
-completionInfo = jsondecode(json);
+cmd   = ['builtin(''_programmingAidsTest'', , ''', qStr, ''', ', 
lStr, ', [])'];
+cInfo = jsondecode(evalin('base', cmd)); % use base workspace for 
variable completions
+cMap  = dictionary('', true);
+
 disp(['Completions-Lisp:', newline, '''(']);
-if strcmp(completionInfo.widgetType, 'completion')
-useCellIndex = iscell(completionInfo.widgetData.choices);
-nChoices = length(completionInfo.widgetData.choices);
-for idx = 1 : nChoices
-if useCellIndex
-entry = completionInfo.widgetData.choices{idx};
-else
-entry = completionInfo.widgetData.choices(idx);
-end
-if isfield(entry, 'purpose')
-purpose = [entry.purpose, ' '];
-else
-purpose = '';
+if isfield(cInfo, "signatures")
+sigs  = cInfo.signatures;
+cSigs = iscell(sigs);
+for i = 1 : length(sigs)
+if cSigs, args = sigs{i}.inputArguments; else, args = 
sigs(i).inputArguments; end
+cArgs = iscell(args);
+for j = 1 : length(args)
+if cArgs, arg = args{j}; else, arg = args(j); end
+if isfield(arg, 'widgetData') && isfield(arg.widgetData, 
'choices')
+DispCompletionChoices(arg.widgetData.choices);
+end
 end
-desc = [purpose, '(' entry.matchType, ')'];
-desc = regexprep(desc,'"', '\\"');
-disp(['  ("', entry.completion, '" . "', desc, '")']);
 end
+elseif isfield(cInfo, 'widgetData') && isfield(cInfo.widgetData, 
'choices')
+DispCompletionChoices(cInfo.widgetData.choices);
 end
 disp(')');
 
 else % R2024b and earlier
 
 if verNum < 8.4
-% Pre R2014b: partial_string
-extracmd = '';
+extracmd = ''; % Pre R2014b: partial_string
 else
-% Post R2014b: partial_string, caret, num
-extracmd = [ ', ' num2str(length(substring)) ',0' ];
+extracmd = [', ', lStr, ', 0']; % Post R2014b: partial_string, 
caret, num
 end
+cmd = ['matlabMCRprocess_emacs = com.mathworks.jmi.MatlabMCR;' ...
+   'emacs_completions_output = 
matlabMCRprocess_emacs.mtFindAllTabCompletions(''' ...
+   qStr  extracmd '),' ...
+   
'clear(''matlabMCRprocess_emacs'',''emacs_completions_output'');'];
+evalin('base', cmd); % run in base to get completions on base 
workspace variables
 
-substringQuoted = strrep(substring, , '');
-
-command = ...
-['matlabMCRprocess_emacs = com.mathworks.jmi.MatlabMCR;' ...
- 'emacs_completions_output = 
matlabMCRprocess_emacs.mtFindAllTabCompletions(''' ...
- substringQuoted  extracmd '),' ...
- 
'clear(''matlabMCRprocess_emacs'',''emacs_completions_output'');'];
-
-% Completion engine needs to run in the base workspace to know what 
the variables you have
-% to work with are.
-evalin('base', command);
+end
 
+function DispCompletionChoices(choices)
+nChoices = length(choices);
+cChoices = iscell(choices);
+for choiceIdx = 1 : nChoices
+if cChoices, entry = choices{choiceIdx}; else, entry = 
choices(choiceIdx); end
+if ~cMap.isKey(entry.completion)
+cMap(entry.completion) = true;
+if isfield(entry, 'purpose'), info = [entry.purpose, ' ']; 
else, info = ''; end
+desc = [info, '(' entry.matchType, ')'];
+desc =

[elpa] externals/modus-themes 42e161138b 2/3: REMOVE bg-char mappings and use search faces for Avy and related

2025-04-07 Thread ELPA Syncer 
branch: externals/modus-themes
commit 42e161138bd287e3f39f8e9bb9fef88363fa99b3
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

REMOVE bg-char mappings and use search faces for Avy and related

These are like search matches, anyway, plus we make the code more
simple on our end.
---
 modus-operandi-deuteranopia-theme.el |  4 
 modus-operandi-theme.el  |  4 
 modus-operandi-tinted-theme.el   |  4 
 modus-operandi-tritanopia-theme.el   |  4 
 modus-themes.el  | 18 +-
 modus-vivendi-deuteranopia-theme.el  |  4 
 modus-vivendi-theme.el   |  4 
 modus-vivendi-tinted-theme.el|  4 
 modus-vivendi-tritanopia-theme.el|  4 
 9 files changed, 9 insertions(+), 41 deletions(-)

diff --git a/modus-operandi-deuteranopia-theme.el 
b/modus-operandi-deuteranopia-theme.el
index 973f2082db..b690f64841 100644
--- a/modus-operandi-deuteranopia-theme.el
+++ b/modus-operandi-deuteranopia-theme.el
@@ -172,10 +172,6 @@ standard)."
   (bg-region   "#bdbdbd")
   (fg-region   "#00")
 
-  (bg-char-0 "#7faaff")
-  (bg-char-1 "#dfe000")
-  (bg-char-2 "#7feaff")
-
   (bg-mode-line-active"#d0d6ff")
   (fg-mode-line-active"#0f0f0f")
   (border-mode-line-active"#4f4f74")
diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 1602fea552..6f92f86461 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -170,10 +170,6 @@ which corresponds to a minimum contrast in relative 
luminance of
   (bg-region   "#bdbdbd")
   (fg-region   "#00")
 
-  (bg-char-0 "#7feaff")
-  (bg-char-1 "#ffaaff")
-  (bg-char-2 "#dff000")
-
   (bg-mode-line-active"#c8c8c8")
   (fg-mode-line-active"#00")
   (border-mode-line-active"#5a5a5a")
diff --git a/modus-operandi-tinted-theme.el b/modus-operandi-tinted-theme.el
index 1509be035f..60762684f3 100644
--- a/modus-operandi-tinted-theme.el
+++ b/modus-operandi-tinted-theme.el
@@ -170,10 +170,6 @@ which corresponds to a minimum contrast in relative 
luminance of
   (bg-region   "#c2bcb5")
   (fg-region   "#00")
 
-  (bg-char-0 "#7feaff")
-  (bg-char-1 "#ffaaff")
-  (bg-char-2 "#dff000")
-
   (bg-mode-line-active"#cab9b2")
   (fg-mode-line-active"#00")
   (border-mode-line-active"#545454")
diff --git a/modus-operandi-tritanopia-theme.el 
b/modus-operandi-tritanopia-theme.el
index 3051ff71ce..3b6d6e2f51 100644
--- a/modus-operandi-tritanopia-theme.el
+++ b/modus-operandi-tritanopia-theme.el
@@ -172,10 +172,6 @@ standard)."
   (bg-region   "#bdbdbd")
   (fg-region   "#00")
 
-  (bg-char-0 "#ff908f")
-  (bg-char-1 "#bfbfff")
-  (bg-char-2 "#5fcfdf")
-
   (bg-mode-line-active"#afe0f2")
   (fg-mode-line-active"#0f0f0f")
   (border-mode-line-active"#2f4f44")
diff --git a/modus-themes.el b/modus-themes.el
index 4a9f2a3f47..77aee77f2b 100644
--- a/modus-themes.el
+++ b/modus-themes.el
@@ -1875,11 +1875,11 @@ FG and BG are the main colors."
 `(auto-dim-other-buffers-hide-face ((,c :foreground ,bg-inactive 
:background ,bg-inactive)))
 ; avy
 `(avy-background-face ((,c :background ,bg-dim :foreground ,fg-dim :extend 
t)))
-`(avy-goto-char-timer-face ((,c :inherit bold :background ,bg-active)))
-`(avy-lead-face ((,c :inherit (bold modus-themes-reset-soft) :background 
,bg-char-0)))
-`(avy-lead-face-0 ((,c :inherit (bold modus-themes-reset-soft) :background 
,bg-char-1)))
-`(avy-lead-face-1 ((,c :inherit modus-themes-reset-soft :background 
,bg-inactive)))
-`(avy-lead-face-2 ((,c :inherit (bold modus-themes-reset-soft) :background 
,bg-char-2)))
+`(avy-goto-char-timer-face ((,c :inherit (bold modus-themes-search-lazy 
modus-themes-reset-soft
+`(avy-lead-face ((,c :inherit (bold modus-themes-search-current 
modus-themes-reset-soft
+`(avy-lead-face-0 ((,c :inherit (bold modus-themes-search-current 
modus-themes-reset-soft
+`(avy-lead-face-1 ((,c :inherit (bold modus-themes-search-current 
modus-themes-reset-soft
+`(avy-lead-face-2 ((,c :inherit (bold modus-themes-search-current 
modus-themes-reset-soft
 ; aw (ace-window)
 `(aw-background-face ((,c :foreground "gray50")))
 `(aw-key-face ((,c :inherit modus-themes-key-binding)))
@@ -2052,8 +2052,8 @@ FG and BG are the main colors."
 ; corfu-candidate-overlay
 `(corfu-candidate-overlay-face ((t :inherit shadow)))
 ; corfu-quick
-`(corfu-quick1 ((,c :inherit bold :background ,bg-char-0)))
-`(corfu-quick2 ((,c :inherit bold :background ,bg-char-1)))
+`(corfu-quick1 ((,c :inherit (bold modus-themes-search-current
+`(corfu-quick2 ((,c :inherit (bold modus-themes-search-current
 ; counsel
 `(counsel-active-mode ((,c :foreg

[nongnu] elpa/cider updated (2139682ba1 -> 4b175e6387)

2025-04-07 Thread ELPA Syncer 
elpasync pushed a change to branch elpa/cider.

  from  2139682ba1 Enable dynamic indentation for clojure-ts-mode
   new  35cacc731f Bump cider-nrepl to 0.54.0
   new  4bfde698e4 [inspector] Introduce analytics feature
   new  4b175e6387 [docs] Update inspector docs


Summary of changes:
 CHANGELOG.md   | 17 +++--
 cider-inspector.el | 22 ++-
 cider.el   |  2 +-
 dev/docker-sample-project/project.clj  |  2 +-
 dev/tramp-sample-project/project.clj   |  2 +-
 .../ROOT/pages/basics/middleware_setup.adoc| 10 ++---
 doc/modules/ROOT/pages/basics/up_and_running.adoc  |  4 +-
 doc/modules/ROOT/pages/cljs/shadow-cljs.adoc   |  2 +-
 doc/modules/ROOT/pages/cljs/up_and_running.adoc|  2 +-
 doc/modules/ROOT/pages/debugging/inspector.adoc| 13 ---
 test/cider-tests.el| 44 +++---
 11 files changed, 75 insertions(+), 45 deletions(-)

[nongnu] elpa/cider 4bfde698e4 2/3: [inspector] Introduce analytics feature

2025-04-07 Thread ELPA Syncer 
branch: elpa/cider
commit 4bfde698e4a367a77eda240c27b29ca97a136bf8
Author: Oleksandr Yakushev 
Commit: Oleksandr Yakushev 

[inspector] Introduce analytics feature
---
 cider-inspector.el | 22 +-
 1 file changed, 21 insertions(+), 1 deletion(-)

diff --git a/cider-inspector.el b/cider-inspector.el
index 5621f6d9f1..365bede3cb 100644
--- a/cider-inspector.el
+++ b/cider-inspector.el
@@ -91,6 +91,12 @@ by clicking or navigating to them by other means."
   :type 'boolean
   :package-version '(cider . "0.27.0"))
 
+(defcustom cider-inspector-display-analytics-hint t
+  "When true, display hint about analytics feature for eligible objects.
+Can be turned to nil once the user sees and acknowledges the feature."
+  :type 'boolean
+  :package-version '(cider . "1.18.0"))
+
 (defvar cider-inspector-uninteresting-regexp
   (concat "nil"  ; nils are not interesting
   "\\|:" clojure--sym-regexp ; nor keywords
@@ -125,6 +131,7 @@ by clicking or navigating to them by other means."
 (define-key map "c" #'cider-inspector-set-max-coll-size)
 (define-key map "C" #'cider-inspector-set-max-nested-depth)
 (define-key map "v" #'cider-inspector-toggle-view-mode)
+(define-key map "y" #'cider-inspector-display-analytics)
 (define-key map "d" #'cider-inspector-def-current-val)
 (define-key map "t" #'cider-inspector-tap-current-val)
 (define-key map "1" #'cider-inspector-tap-at-point)
@@ -325,6 +332,17 @@ MAX-NESTED-DEPTH is the new value."
   (interactive (list (read-number "Max nested depth: " 
cider-inspector-max-nested-depth)))
   (cider-inspector--refresh-with-opts "max-nested-depth" max-nested-depth))
 
+(defun cider-inspector-display-analytics ()
+  "Toggle the display of analytics for the inspected object."
+  (interactive)
+  ;; Disable hint about analytics feature so that it is never displayed again.
+  (when cider-inspector-display-analytics-hint
+(customize-set-variable 'cider-inspector-display-analytics-hint nil))
+  (let ((result (cider-nrepl-send-sync-request `("op" 
"inspect-display-analytics")
+   (cider-current-repl
+(when (nrepl-dict-get result "value")
+  (cider-inspector--render-value result :next-inspectable
+
 (defun cider-inspector-toggle-view-mode ()
   "Toggle the view mode of the inspector between normal and object view mode."
   (interactive)
@@ -490,7 +508,9 @@ MAX-COLL-SIZE if non nil."
   ,@(when cider-inspector-max-coll-size
   `("max-coll-size" ,cider-inspector-max-coll-size))
   ,@(when cider-inspector-max-nested-depth
-  `("max-nested-depth" ,cider-inspector-max-nested-depth
+  `("max-nested-depth" ,cider-inspector-max-nested-depth))
+  ,@(when cider-inspector-display-analytics-hint
+  `("display-analytics-hint" "true"
 (cider-nrepl-send-sync-request (cider-current-repl
 
 (declare-function cider-set-buffer-ns "cider-mode")

[nongnu] elpa/julia-mode 74f6cbe8f4 2/3: Merge pull request #219 from tpapp/tp/fix-julia--find-latex-bobp

2025-04-07 Thread ELPA Syncer 
branch: elpa/julia-mode
commit 74f6cbe8f4c16b3383872422039ba2c0c5e9759a
Merge: 0f4d74f904 cdff61a0e6
Author: Tamas K. Papp 
Commit: GitHub 

Merge pull request #219 from tpapp/tp/fix-julia--find-latex-bobp

Fix julia--find-latex erroring when called at the beginning of buffer.
---
 julia-mode-tests.el | 12 +++-
 julia-mode.el   |  2 +-
 2 files changed, 8 insertions(+), 6 deletions(-)

diff --git a/julia-mode-tests.el b/julia-mode-tests.el
index b6b2969eaf..69436de70c 100644
--- a/julia-mode-tests.el
+++ b/julia-mode-tests.el
@@ -913,14 +913,15 @@ end" 'julia-end-of-defun "function f(x)" "return fact(x)[ 
\n]+end" 'end))
 ;;;
 
 (defun julia--find-latex (contents position)
-  "Find bounds of LaTeX symbol in CONTENTS with point at POSITION, `'((start . 
end) string)'."
+  "Find bounds of LaTeX symbol in CONTENTS with point at POSITION, `'((start . 
end) string)'. Return NIL if no symbol is found."
   (with-temp-buffer
 (julia-mode)
 (insert contents)
 (goto-char position)
-(let* ((beg (julia--latexsub-start-symbol))
-   (end (julia-mode--latexsubs-longest-partial-end beg)))
-  (list (cons beg end) (buffer-substring beg end)
+(let ((beg (julia--latexsub-start-symbol)))
+  (when beg
+(let ((end (julia-mode--latexsubs-longest-partial-end beg)))
+  (list (cons beg end) (buffer-substring beg end)))
 
 (ert-deftest julia--test-find-latex ()
   (should (equal (julia--find-latex "\\alpha " 7) '((1 . 7) "\\alpha")))
@@ -929,7 +930,8 @@ end" 'julia-end-of-defun "function f(x)" "return fact(x)[ 
\n]+end" 'end))
   (should (equal (julia--find-latex "x\\alpha " 3) '((2 . 8) "\\alpha")))
   (should (equal (julia--find-latex "\\kappa\\alpha(" 13) '((7 . 13) 
"\\alpha")))
   (should (equal (julia--find-latex "\\kappa\\alpha(" 4) '((1 . 7) "\\kappa")))
-  (should (equal (julia--find-latex "α\\hat_mean" 3) '((2 . 6) "\\hat"
+  (should (equal (julia--find-latex "α\\hat_mean" 3) '((2 . 6) "\\hat")))
+  (should (not (julia--find-latex "   later" 1
 
 ;;;
 ;;; abbrev tests
diff --git a/julia-mode.el b/julia-mode.el
index 78f4021072..66cd5e4f04 100644
--- a/julia-mode.el
+++ b/julia-mode.el
@@ -884,7 +884,7 @@ If there is not a LaTeX-like symbol at point, return nil."
 ;; "\^(", "\1/", and "\^=)" are valid.
 (member (char-syntax (char-before)) '(?\s ?< ?> ?\\
   (backward-char))
-(when (= ?\\ (char-before))
+(when (and (not (bobp)) (= ?\\ (char-before)))
   (- (point) 1
 
 ;; Sometimes you want to complete a symbol `point' is in middle of

[nongnu] elpa/julia-mode cdff61a0e6 1/3: Fix julia--find-latex erroring when called at the beginning of buffer.

2025-04-07 Thread ELPA Syncer 
branch: elpa/julia-mode
commit cdff61a0e6c102f04312638d46fe54c00b0fea0f
Author: Tamás K. Papp 
Commit: Tamás K. Papp 

Fix julia--find-latex erroring when called at the beginning of buffer.

Add a test for this case (which failed previously).
---
 julia-mode-tests.el | 12 +++-
 julia-mode.el   |  2 +-
 2 files changed, 8 insertions(+), 6 deletions(-)

diff --git a/julia-mode-tests.el b/julia-mode-tests.el
index b6b2969eaf..69436de70c 100644
--- a/julia-mode-tests.el
+++ b/julia-mode-tests.el
@@ -913,14 +913,15 @@ end" 'julia-end-of-defun "function f(x)" "return fact(x)[ 
\n]+end" 'end))
 ;;;
 
 (defun julia--find-latex (contents position)
-  "Find bounds of LaTeX symbol in CONTENTS with point at POSITION, `'((start . 
end) string)'."
+  "Find bounds of LaTeX symbol in CONTENTS with point at POSITION, `'((start . 
end) string)'. Return NIL if no symbol is found."
   (with-temp-buffer
 (julia-mode)
 (insert contents)
 (goto-char position)
-(let* ((beg (julia--latexsub-start-symbol))
-   (end (julia-mode--latexsubs-longest-partial-end beg)))
-  (list (cons beg end) (buffer-substring beg end)
+(let ((beg (julia--latexsub-start-symbol)))
+  (when beg
+(let ((end (julia-mode--latexsubs-longest-partial-end beg)))
+  (list (cons beg end) (buffer-substring beg end)))
 
 (ert-deftest julia--test-find-latex ()
   (should (equal (julia--find-latex "\\alpha " 7) '((1 . 7) "\\alpha")))
@@ -929,7 +930,8 @@ end" 'julia-end-of-defun "function f(x)" "return fact(x)[ 
\n]+end" 'end))
   (should (equal (julia--find-latex "x\\alpha " 3) '((2 . 8) "\\alpha")))
   (should (equal (julia--find-latex "\\kappa\\alpha(" 13) '((7 . 13) 
"\\alpha")))
   (should (equal (julia--find-latex "\\kappa\\alpha(" 4) '((1 . 7) "\\kappa")))
-  (should (equal (julia--find-latex "α\\hat_mean" 3) '((2 . 6) "\\hat"
+  (should (equal (julia--find-latex "α\\hat_mean" 3) '((2 . 6) "\\hat")))
+  (should (not (julia--find-latex "   later" 1
 
 ;;;
 ;;; abbrev tests
diff --git a/julia-mode.el b/julia-mode.el
index 78f4021072..66cd5e4f04 100644
--- a/julia-mode.el
+++ b/julia-mode.el
@@ -884,7 +884,7 @@ If there is not a LaTeX-like symbol at point, return nil."
 ;; "\^(", "\1/", and "\^=)" are valid.
 (member (char-syntax (char-before)) '(?\s ?< ?> ?\\
   (backward-char))
-(when (= ?\\ (char-before))
+(when (and (not (bobp)) (= ?\\ (char-before)))
   (- (point) 1
 
 ;; Sometimes you want to complete a symbol `point' is in middle of

[nongnu] elpa/gptel 55355bdead: gptel-org: Make gptel-org-branching-context global

2025-04-07 Thread ELPA Syncer 
branch: elpa/gptel
commit 55355bdead3d19d520157236f4420241cdb89e63
Author: Karthik Chikmagalur 
Commit: Karthik Chikmagalur 

gptel-org: Make gptel-org-branching-context global

* gptel-org.el (gptel-org-branching-context): Make it a global
variable as its buffer-locality is causing confusion (#764)

* NEWS: Mention change.
---
 NEWS | 5 +
 gptel-org.el | 1 -
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/NEWS b/NEWS
index 45ca70d2eb..0576bbf1b7 100644
--- a/NEWS
+++ b/NEWS
@@ -4,8 +4,13 @@
 
 ** Breaking changes
 
+- ~gptel-org-branching-context~ is now a global variable.  It was
+  buffer-local by default in past releases.
+
 ** New models and backends
 
+- Add support for ~gemini-2.5-pro-exp-03-25~.
+
 ** New features and UI changes
 
 - The new option ~gptel-curl-extra-args~ can be used to specify extra
diff --git a/gptel-org.el b/gptel-org.el
index cc05e524e5..a26a961b4a 100644
--- a/gptel-org.el
+++ b/gptel-org.el
@@ -143,7 +143,6 @@ heading 2.2 text
 -
 
 This makes it feasible to have multiple conversation branches."
-  :local t
   :type 'boolean
   :group 'gptel)

[nongnu] elpa/julia-mode updated (0f4d74f904 -> 7fc071eb2c)

2025-04-07 Thread ELPA Syncer 
elpasync pushed a change to branch elpa/julia-mode.

  from  0f4d74f904 version bump (added public keyword)
   new  cdff61a0e6 Fix julia--find-latex erroring when called at the 
beginning of buffer.
   new  74f6cbe8f4 Merge pull request #219 from 
tpapp/tp/fix-julia--find-latex-bobp
   new  7fc071eb2c Use keyword arguments for defining minor modes. Fixes 
#220.


Summary of changes:
 julia-mode-tests.el | 12 +++-
 julia-mode.el   |  4 ++--
 2 files changed, 9 insertions(+), 7 deletions(-)

[nongnu] elpa/julia-mode 7fc071eb2c 3/3: Use keyword arguments for defining minor modes. Fixes #220.

2025-04-07 Thread ELPA Syncer 
branch: elpa/julia-mode
commit 7fc071eb2c383d44be6d61ea6cef73b0cc8ef9b7
Author: Tamás K. Papp 
Commit: Tamás K. Papp 

Use keyword arguments for defining minor modes. Fixes #220.
---
 julia-mode.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/julia-mode.el b/julia-mode.el
index 66cd5e4f04..60f8bfa649 100644
--- a/julia-mode.el
+++ b/julia-mode.el
@@ -997,7 +997,7 @@ command is only entered if it is supported in Julia. The
 following commands are defined:
 
 \\{LaTeX-math-mode-map}"
-  nil nil (list (cons (LaTeX-math-abbrev-prefix) LaTeX-math-keymap))
+  :keymap (list (cons (LaTeX-math-abbrev-prefix) LaTeX-math-keymap))
   (if julia-math-mode
   (setq-local LaTeX-math-insert-function #'julia-math-insert)

[nongnu] elpa/dracula-theme 8b3a005db9 3/3: Ensure :inherit is the first face attribute

2025-04-07 Thread ELPA Syncer 
branch: elpa/dracula-theme
commit 8b3a005db9e8b7ac57e683bc6631cdc7643e8150
Author: Étienne Deparis 
Commit: Étienne Deparis 

Ensure :inherit is the first face attribute
---
 dracula-theme.el | 11 +++
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/dracula-theme.el b/dracula-theme.el
index ecb0b69fe7..bc0d28351c 100644
--- a/dracula-theme.el
+++ b/dracula-theme.el
@@ -925,14 +925,17 @@ read it before opening a new issue about your will.")
 :foreground ,dracula-fg
 :weight bold)
;; tab-bar & tab-line (since Emacs 27.1)
-   (tab-bar :foreground ,dracula-purple :background 
,dracula-current
-:inherit variable-pitch)
+   (tab-bar :inherit variable-pitch
+:foreground ,dracula-purple
+:background ,dracula-current)
(tab-bar-tab :foreground ,dracula-pink :background ,dracula-bg
 :box (:line-width 2 :color ,dracula-bg :style nil))
(tab-bar-tab-inactive :foreground ,dracula-purple :background 
,bg2
  :box (:line-width 2 :color ,bg2 :style 
nil))
-   (tab-line :foreground ,dracula-purple :background 
,dracula-current
- :height 0.92 :inherit variable-pitch)
+   (tab-line :inherit variable-pitch
+ :foreground ,dracula-purple
+ :background ,dracula-current
+ :height 0.92)
(tab-line-close-highlight :foreground ,dracula-red)
(tab-line-highlight :weight bold)
(tab-line-tab :foreground ,dracula-purple :background ,bg2

[nongnu] elpa/cider 35cacc731f 1/3: Bump cider-nrepl to 0.54.0

2025-04-07 Thread ELPA Syncer 
branch: elpa/cider
commit 35cacc731f0d1e1c08bc0af57d78b7b0247b04a0
Author: Oleksandr Yakushev 
Commit: Oleksandr Yakushev 

Bump cider-nrepl to 0.54.0
---
 CHANGELOG.md   |  4 +-
 cider.el   |  2 +-
 dev/docker-sample-project/project.clj  |  2 +-
 dev/tramp-sample-project/project.clj   |  2 +-
 .../ROOT/pages/basics/middleware_setup.adoc| 10 ++---
 doc/modules/ROOT/pages/basics/up_and_running.adoc  |  4 +-
 doc/modules/ROOT/pages/cljs/shadow-cljs.adoc   |  2 +-
 doc/modules/ROOT/pages/cljs/up_and_running.adoc|  2 +-
 test/cider-tests.el| 44 +++---
 9 files changed, 36 insertions(+), 36 deletions(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index ee94a638ea..886845a37c 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -8,11 +8,11 @@
 - [#3793](https://github.com/clojure-emacs/cider/issues/3793): **(Breaking)** 
Remove features that relied on printed exception parsing:
   - `cider-stacktrace-analyze-string` and `cider-stacktrace-analyze-at-point` 
functions.
   - Automatic stacktrace parsing in log viewer.
-- Bump the injected `cider-nrepl` to 
[0.53.1](https://github.com/clojure-emacs/cider-nrepl/blob/master/CHANGELOG.md#0531-2025-03-26).
-- Bump the injected `cider-nrepl` to 
[0.53.2](https://github.com/clojure-emacs/cider-nrepl/blob/master/CHANGELOG.md#0532-2025-03-26).
+- Bump the injected `cider-nrepl` to 
[0.54.0](https://github.com/clojure-emacs/cider-nrepl/blob/master/CHANGELOG.md#0540-2025-04-05).
   - Info: recognize printed Java classes/methods and munged Clojure functions 
in stacktrace outputs.
   - Inspector: add dedicated view for Exceptions.
   - Stop vendoring Haystack dependency.
+  - Stop vendoring Puget dependency. You can still user `puget` 
pretty-printing for CIDER, but you need to depend on Puget explicitly. If Puget 
is not found on the classpath, CIDER will revert to `clojure.pprint/pprint` for 
pretty-printing.
 - [#3777](https://github.com/clojure-emacs/cider/issues/3777): Inspector no 
longer displays parsed Javadoc for Java classes and members.
 - [#3784](https://github.com/clojure-emacs/cider/issues/3784): Inspector: make 
point less erratic when navigating between inspector screens.
 - [#3790](https://github.com/clojure-emacs/cider/issues/3790): Stacktrace: 
show messages and data for all exception causes by default.
diff --git a/cider.el b/cider.el
index 30b5a97b27..c1d292fcf5 100644
--- a/cider.el
+++ b/cider.el
@@ -573,7 +573,7 @@ the artifact.")
 
 Used when `cider-jack-in-auto-inject-clojure' is set to `latest'.")
 
-(defconst cider-required-middleware-version "0.53.2"
+(defconst cider-required-middleware-version "0.54.0"
   "The CIDER nREPL version that's known to work properly with CIDER.")
 
 (defcustom cider-injected-middleware-version cider-required-middleware-version
diff --git a/dev/docker-sample-project/project.clj 
b/dev/docker-sample-project/project.clj
index b073e0db48..550cf05dd4 100644
--- a/dev/docker-sample-project/project.clj
+++ b/dev/docker-sample-project/project.clj
@@ -2,4 +2,4 @@
   :dependencies [[org.clojure/clojure "1.11.1"]
  [clj-http "3.12.3"]]
   :source-paths ["src"]
-  :plugins [[cider/cider-nrepl "0.53.2"]])
+  :plugins [[cider/cider-nrepl "0.54.0"]])
diff --git a/dev/tramp-sample-project/project.clj 
b/dev/tramp-sample-project/project.clj
index d874cbe4e8..aa2a1c93c3 100644
--- a/dev/tramp-sample-project/project.clj
+++ b/dev/tramp-sample-project/project.clj
@@ -2,5 +2,5 @@
   :dependencies [[org.clojure/clojure "1.11.1"]
  [clj-http "3.12.3"]]
   :source-paths ["src"]
-  :plugins [[cider/cider-nrepl "0.53.2"]
+  :plugins [[cider/cider-nrepl "0.54.0"]
 [refactor-nrepl "3.9.0"]])
diff --git a/doc/modules/ROOT/pages/basics/middleware_setup.adoc 
b/doc/modules/ROOT/pages/basics/middleware_setup.adoc
index c6075de990..611f52759c 100644
--- a/doc/modules/ROOT/pages/basics/middleware_setup.adoc
+++ b/doc/modules/ROOT/pages/basics/middleware_setup.adoc
@@ -20,14 +20,14 @@ Use the convenient plugin for defaults, either in your 
project's
 
 [source,clojure]
 
-:plugins [[cider/cider-nrepl "0.53.2"]]
+:plugins [[cider/cider-nrepl "0.54.0"]]
 
 
 A minimal `profiles.clj` for CIDER would be:
 
 [source,clojure]
 
-{:repl {:plugins [[cider/cider-nrepl "0.53.2"]]}}
+{:repl {:plugins [[cider/cider-nrepl "0.54.0"]]}}
 
 
 WARNING: Be careful not to place this in the `:user` profile, as this way 
CIDER's
@@ -43,11 +43,11 @@ run `cider-connect` or `cider-connect-cljs`.
 
 [source,clojure]
 
-  :cider-clj {:extra-deps {cider/cider-nrepl {:mvn/version "0.53.2"}}
+  :cider-clj {:extra-deps {cider/cider-nrepl {:mvn/version "0.54.0"}}
   :main-opts ["-m" "nrepl.cmdline" "--middleware" 
"[cider.nrepl/cider-middleware]"]}
 
   :cider-cljs {:extra-deps {org.clojure/clojurescript {:mvn/version "1.10.339"}
-

[nongnu] elpa/cider 2b2492beee: Fix cider-find-keyword for clojure-ts-mode

2025-04-07 Thread ELPA Syncer 
branch: elpa/cider
commit 2b2492beeef176e7bff0c92a257849b32842d1c3
Author: Roman Rudakov 
Commit: Bozhidar Batsov 

Fix cider-find-keyword for clojure-ts-mode
---
 CHANGELOG.md|  4 ++
 cider-find.el   |  2 +-
 cider-util.el   | 16 ++
 test/clojure-ts-mode/cider-find-ts-tests.el | 88 +
 test/clojure-ts-mode/cider-util-ts-tests.el | 34 +++
 5 files changed, 143 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index e0c646c178..24a45f9244 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -30,6 +30,10 @@
 
 - [#3784](https://github.com/clojure-emacs/cider/issues/3784): Inspector: make 
point less erratic when navigating between inspector screens.
 
+### Bugs fixed
+
+- `cider-find-keyword` doesn't work with `clojure-ts-mode`.
+
 ## 1.17.1 (2025-02-25)
 
 ### Changes
diff --git a/cider-find.el b/cider-find.el
index baabf8bf14..7e6550e096 100644
--- a/cider-find.el
+++ b/cider-find.el
@@ -206,7 +206,7 @@ are disregarded."
 (current-point (point)))
 (while continue
   (setq found (and (search-forward-regexp kw nil 'noerror)
-   (member 'clojure-keyword-face (text-properties-at 
(1- (point))
+   (cider-keyword-at-point-p (1- (point)
   (setq continue (and (not found)
   ;; if we haven't moved, there's nothing left to 
search:
   (not (equal current-point (point)
diff --git a/cider-util.el b/cider-util.el
index 4cd4244395..0f2e360c81 100644
--- a/cider-util.el
+++ b/cider-util.el
@@ -69,6 +69,10 @@ Setting this to nil removes the fontification restriction."
   "Return non-nil if current buffer is managed by a ClojureC major mode."
   (derived-mode-p 'clojurec-mode 'clojure-ts-clojurec-mode))
 
+(defun cider-clojure-ts-mode-p ()
+  "Return non-nil if current buffer is managed by a Clojure[TS] major mode."
+  (derived-mode-p 'clojure-ts-mode))
+
 (defun cider-util--clojure-buffers ()
   "Return a list of all existing `clojure-mode' buffers."
   (seq-filter
@@ -107,6 +111,18 @@ If BUFFER is provided act on that buffer instead."
   (with-current-buffer (or buffer (current-buffer))
 (or (cider-clojurec-major-mode-p
 
+(defun cider-keyword-at-point-p (&optional point)
+  "Return non-nil if POINT is in a Clojure keyword.
+
+Take into consideration current major mode."
+  (let ((pos (or point (point
+(if (and (cider-clojure-ts-mode-p)
+ (fboundp 'clojure-ts--keyword-node-p)
+ (fboundp 'treesit-node-parent)
+ (fboundp 'treesit-node-at))
+(clojure-ts--keyword-node-p (treesit-node-parent (treesit-node-at 
pos)))
+  (member 'clojure-keyword-face (text-properties-at pos)
+
 
 ;;; Thing at point
 
diff --git a/test/clojure-ts-mode/cider-find-ts-tests.el 
b/test/clojure-ts-mode/cider-find-ts-tests.el
new file mode 100644
index 00..d3db256f3f
--- /dev/null
+++ b/test/clojure-ts-mode/cider-find-ts-tests.el
@@ -0,0 +1,88 @@
+;;; cider-find-ts-tests.el ---   -*- lexical-binding: t; 
-*-
+
+;; Copyright (C) 2025  Roman Rudakov
+
+;; Author: Roman Rudakov 
+
+;; This program is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see .
+
+;;; Commentary:
+
+;; This is part of CIDER
+
+;;; Code:
+
+(require 'buttercup)
+(require 'cider-find)
+
+(describe "cider--find-keyword-loc (TreeSitter)"
+  (it "finds the given keyword, discarding false positives"
+(with-clojure-ts-buffer "(ns some.ns)
+;; ::foo
+\"::foo\"
+#_::foo
+::foobar
+\"
+::foo
+\"
+::foo
+more
+stuff"
+  (let* ((sample-buffer (current-buffer)))
+(spy-on 'cider-ensure-connected :and-return-value t)
+(spy-on 'cider-sync-request:ns-path :and-call-fake (lambda (kw-ns _)
+ kw-ns))
+(spy-on 'cider-resolve-alias :and-call-fake (lambda (_ns ns-qualifier)
+  ns-qualifier))
+(spy-on 'cider-find-file :and-call-fake (lambda (kw-ns)
+  (when (equal kw-ns "some.ns")
+sample-buffer)))
+
+(nrepl-dbind-response (cider--find-keyword-loc "::some.ns/foo") (dest 
dest-point)
+

[nongnu] elpa/dracula-theme 113ee6023b 2/3: Add lexical-binding comment

2025-04-07 Thread ELPA Syncer 
branch: elpa/dracula-theme
commit 113ee6023bf33203e7bccc9f712aed1c05f8829c
Author: Étienne Deparis 
Commit: Étienne Deparis 

Add lexical-binding comment
---
 dracula-theme.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/dracula-theme.el b/dracula-theme.el
index 2f740430d1..ecb0b69fe7 100644
--- a/dracula-theme.el
+++ b/dracula-theme.el
@@ -1,4 +1,4 @@
-;;; dracula-theme.el --- Dracula Theme
+;;; dracula-theme.el --- Dracula Theme -*- lexical-binding: t; -*-
 
 ;; Copyright 2015-present, All rights reserved
 ;;

[nongnu] elpa/dracula-theme 7c05995ba2 1/3: Add changelog entry for auctex changes

2025-04-07 Thread ELPA Syncer 
branch: elpa/dracula-theme
commit 7c05995ba2537ad112e8f452da39bb75f84bed77
Author: Étienne Deparis 
Commit: Étienne Deparis 

Add changelog entry for auctex changes
---
 dracula-theme.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/dracula-theme.el b/dracula-theme.el
index bbec2d3151..2f740430d1 100644
--- a/dracula-theme.el
+++ b/dracula-theme.el
@@ -23,6 +23,7 @@
 ;; Add missing comma in front of lsp-ui-sideline-current-symbol color
 ;; Change default region face
 ;; Improve tab-line-* faces
+;; Improve auctex (LaTeX) faces
 
  Version 1.8.2

[nongnu] elpa/dracula-theme updated (ab09e8532c -> 8b3a005db9)

2025-04-07 Thread ELPA Syncer 
elpasync pushed a change to branch elpa/dracula-theme.

  from  ab09e8532c Merge pull request #109 from greg19/auctex
   new  7c05995ba2 Add changelog entry for auctex changes
   new  113ee6023b Add lexical-binding comment
   new  8b3a005db9 Ensure :inherit is the first face attribute


Summary of changes:
 dracula-theme.el | 14 +-
 1 file changed, 9 insertions(+), 5 deletions(-)

[elpa] externals/dired-preview 537f37574a: Make dired-preview--infer-type check for directory before large file

2025-04-07 Thread ELPA Syncer 
branch: externals/dired-preview
commit 537f37574a4214240c7264f8fd2e2f83ee539989
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Make dired-preview--infer-type check for directory before large file

This is because directories may register as "large file" on the Mac
and result in an error.

Thanks to Sean Devlin for bringing this matter to my attention in
issue 27: .
---
 dired-preview.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/dired-preview.el b/dired-preview.el
index f0562cf78e..6279990f44 100644
--- a/dired-preview.el
+++ b/dired-preview.el
@@ -340,12 +340,12 @@ FILE."
  ((and dired-preview-ignored-extensions-regexp
(string-match-p dired-preview-ignored-extensions-regexp 
file-nondir))
   (cons 'ignore file))
+ ((file-directory-p file)
+  (cons 'directory file))
  ((dired-preview--file-large-p file)
   (cons 'large file))
  ((string-match-p dired-preview-image-extensions-regexp file-nondir)
   (cons 'image file))
- ((file-directory-p file)
-  (cons 'directory file))
  (t
   (cons 'text file)

[elpa] externals/modus-themes 7c8d4766e1 3/3: Update meow sample code to not use bg-char mappings that I removed in 42e1611

2025-04-07 Thread ELPA Syncer 
branch: externals/modus-themes
commit 7c8d4766e1583a5c6c533ce19c8b130401df984d
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Update meow sample code to not use bg-char mappings that I removed in 
42e1611
---
 doc/modus-themes.info | 104 +-
 doc/modus-themes.org  |  12 +++---
 2 files changed, 58 insertions(+), 58 deletions(-)

diff --git a/doc/modus-themes.info b/doc/modus-themes.info
index b6c344484f..90ca758f2b 100644
--- a/doc/modus-themes.info
+++ b/doc/modus-themes.info
@@ -4128,13 +4128,13 @@ styles to use.  The following is but a basic attempt to 
get started.
(modus-themes-with-colors
  (custom-set-faces
   ;; FIXME: What is a "region cursor" and should it differ from the 
position highlights below?
-  `(meow-region-cursor-1 ((,c :inherit (bold modus-themes-reset-soft) 
:background ,bg-char-0)))
-  `(meow-region-cursor-2 ((,c :inherit (bold modus-themes-reset-soft) 
:background ,bg-char-1)))
-  `(meow-region-cursor-3 ((,c :inherit (bold modus-themes-reset-soft) 
:background ,bg-char-2)))
+  `(meow-region-cursor-1 ((,c :inherit (bold 
modus-themes-search-current modus-themes-reset-soft
+  `(meow-region-cursor-2 ((,c :inherit (bold 
modus-themes-search-current modus-themes-reset-soft
+  `(meow-region-cursor-3 ((,c :inherit (bold 
modus-themes-search-current modus-themes-reset-soft
 
-  `(meow-position-highlight-number-1 ((,c :inherit (bold 
modus-themes-reset-soft) :background ,bg-char-0)))
-  `(meow-position-highlight-number-2 ((,c :inherit (bold 
modus-themes-reset-soft) :background ,bg-char-1)))
-  `(meow-position-highlight-number-3 ((,c :inherit (bold 
modus-themes-reset-soft) :background ,bg-char-2))
+  `(meow-position-highlight-number-1 ((,c :inherit (bold 
modus-themes-search-current modus-themes-reset-soft
+  `(meow-position-highlight-number-2 ((,c :inherit (bold 
modus-themes-search-current modus-themes-reset-soft
+  `(meow-position-highlight-number-3 ((,c :inherit (bold 
modus-themes-search-current modus-themes-reset-soft)))
 
  (add-hook 'enable-theme-functions #'my-modus-themes-custom-faces)
 
@@ -6674,52 +6674,52 @@ Node: DIY Use more spacious margins or padding in Emacs 
frames169770
 Node: DIY Custom hl-todo colors174027
 Node: DIY Add support for solaire-mode175844
 Node: DIY Add support for meow-mode178950
-Node: DIY Add support for combobulate180730
-Node: DIY Use a hook at the post-load-theme phase184353
-Node: DIY A theme-agnostic hook for theme loading186476
-Node: Face coverage189107
-Node: Supported packages189559
-Node: Indirectly covered packages195500
-Node: Notes on individual packages196856
-Node: Note on calendarel weekday and weekend colors197956
-Node: Note on git-gutter in Doom Emacs199104
-Node: Note on php-mode multiline comments201604
-Node: Note on underlines in compilation buffers202364
-Node: Note on inline Latex in Org buffers203236
-Node: Note on dimmerel203846
-Node: Note on display-fill-column-indicator-mode205331
-Node: Note on highlight-parenthesesel206784
-Node: Note on mmm-modeel background colors212865
-Node: Note for prism215219
-Node: Note on company-mode overlay pop-up218441
-Ref: Note on company-mode overlay pop-up-Footnote-1219171
-Ref: Note on company-mode overlay pop-up-Footnote-2219238
-Node: Note on ERC escaped color sequences219293
-Ref: Note on ERC escaped color sequences-Footnote-1220721
-Node: Note on powerline or spaceline220831
-Node: Note on SHR colors221245
-Node: Note on SHR fonts221669
-Node: Note on Ement colors and fonts222356
-Node: Note on pdf-tools link hints223866
-Node: Note on the Notmuch logo226326
-Node: Note on goto-address-mode faces226864
-Node: Frequently Asked Questions227982
-Node: Is the contrast ratio about adjacent colors?228615
-Node: What does it mean to avoid exaggerations?230124
-Node: Why are colors mostly variants of blue magenta cyan?231976
-Node: What is the best setup for legibility?236310
-Node: Are these color schemes?238958
-Node: Port the Modus themes to other platforms?242642
-Node: Contributing245488
-Node: Sources of the themes245887
-Node: Issues you can help with246783
-Node: Patches require copyright assignment to the FSF248176
-Node: Acknowledgements250398
-Node: GNU Free Documentation License254731
-Node: Indices280095
-Node: Function index280274
-Node: Variable index281870
-Node: Concept index285370
+Node: DIY Add support for combobulate180760
+Node: DIY Use a hook at the post-load-theme phase184383
+Node: DIY A theme-agnostic hook for theme loading186506
+Node: Face coverage189137
+Node: Supported packages189589
+Node: Indirectly covered packages195530
+Node: Notes on individual packages196886
+Node: Note on calendarel weekday and weekend colors197986
+Node: Note on git-gutter in Doom Emacs199134
+Node: Note on php-mode mul

[nongnu] elpa/gptel updated (4b505e72e9 -> e19b700a89)

2025-04-07 Thread ELPA Syncer 
elpasync pushed a change to branch elpa/gptel.

  from  4b505e72e9 gptel: Set process coding to utf-8-unix explicitly (#754)
   new  f79c9d08dc README: Instructions for Mistral Le Chat (#766)
   new  e19b700a89 gptel-rewrite: Make other modes not clobber rewrite 
overlay (#744)


Summary of changes:
 README.org   | 37 +
 gptel-rewrite.el |  5 +++--
 2 files changed, 40 insertions(+), 2 deletions(-)

[nongnu] elpa/gptel f79c9d08dc 1/2: README: Instructions for Mistral Le Chat (#766)

2025-04-07 Thread ELPA Syncer 
branch: elpa/gptel
commit f79c9d08dc01e3da25b1aba334e1fa8719ef4c10
Author: Ethan Ligon 
Commit: GitHub 

README: Instructions for Mistral Le Chat (#766)

README.org: Add instructions for Mistral Le Chat,
 addressing issue #703.
---
 README.org | 37 +
 1 file changed, 37 insertions(+)

diff --git a/README.org b/README.org
index afe03f6d09..79723a2f75 100644
--- a/README.org
+++ b/README.org
@@ -21,6 +21,7 @@ gptel is a simple Large Language Model chat client for Emacs, 
with support for m
 | Kagi Summarizer| ✓| [[https://kagi.com/settings?p=api][API key]] 
   |
 | Azure  | ✓| Deployment and API key |
 | Groq   | ✓| [[https://console.groq.com/keys][API key]]   
 |
+| Mistral Le Chat| ✓| [[https://console.mistral.ai/api-keys][API 
key]]|
 | Perplexity | ✓| 
[[https://docs.perplexity.ai/docs/getting-started][API key]]
|
 | OpenRouter | ✓| [[https://openrouter.ai/keys][API key]]  
  |
 | together.ai| ✓| 
[[https://api.together.xyz/settings/api-keys][API key]]|
@@ -104,6 +105,7 @@ gptel uses Curl if available, but falls back to the 
built-in url-retrieve to wor
   - [[#perplexity][Perplexity]]
   - [[#anthropic-claude][Anthropic (Claude)]]
   - [[#groq][Groq]]
+  - [[#mistral-le-chat][Mistral Le Chat]]
   - [[#openrouter][OpenRouter]]
   - [[#privategpt][PrivateGPT]]
   - [[#deepseek][DeepSeek]]
@@ -603,6 +605,41 @@ The above code makes the backend available to select.  If 
you want it to be the
 #+html: 
 
 #+html: 
+ Mistral Le Chat
+#+html: 
+
+Register a backend with
+#+begin_src emacs-lisp
+;; Mistral offers an OpenAI compatible API
+(gptel-make-openai "MistralLeChat"  ;Any name you want
+  :host "api.mistral.ai"
+  :endpoint "/v1/chat/completions"
+  :protocol "https"
+  :key "your-api-key"   ;can be a function that returns the key
+  :models '("mistral-small"))
+#+end_src
+
+You can pick this backend from the menu when using gptel (see 
[[#usage][Usage]]).
+
+* (Optional) Set as the default gptel backend
+
+The above code makes the backend available to select.  If you want it to be 
the default backend for gptel, you can set this as the value of 
=gptel-backend=.  Use this instead of the above.
+#+begin_src emacs-lisp
+;; OPTIONAL configuration
+(setq gptel-model   'mistral-small
+  gptel-backend
+  (gptel-make-openai "MistralLeChat"  ;Any name you want
+:host "api.mistral.ai"
+:endpoint "/v1/chat/completions"
+:protocol "https"
+:key "your-api-key"   ;can be a function that returns the 
key
+:models '("mistral-small")))
+#+end_src
+
+#+html: 
+
+#+html: 
+
  OpenRouter
 #+html:

[nongnu] elpa/gptel e19b700a89 2/2: gptel-rewrite: Make other modes not clobber rewrite overlay (#744)

2025-04-07 Thread ELPA Syncer 
branch: elpa/gptel
commit e19b700a89ed3120b5785b58f95ab738fb50230e
Author: Henrik Ahlgren 
Commit: GitHub 

gptel-rewrite: Make other modes not clobber rewrite overlay (#744)

When rewriting sections of Lisp or other code where the initial
character is a parenthesis, it results in `show-paren-mode'
highlighting the entire overlay when the point is positioned within
the overlay area.  Other modes like `hl-line-mode' cause similar
issues.  Avoid this by using a very high priority for
`gptel-rewrite-highlight-face'.  (#691)

* gptel-rewrite.el (gptel-rewrite-highlight-face): Inherit from the
`default' face to avoid foreground being the same as
`show-paren-match', which is usually a reverse color.
(gptel--rewrite-callback): Use priority 2000.
---
 gptel-rewrite.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/gptel-rewrite.el b/gptel-rewrite.el
index e66b15f0ce..68fd8fa7a2 100644
--- a/gptel-rewrite.el
+++ b/gptel-rewrite.el
@@ -87,9 +87,9 @@ overlay."
 
 (defface gptel-rewrite-highlight-face
   'class color) (min-colors 88) (background dark))
- :background "#041714" :extend t)
+ :background "#041714" :extend t :inherit default)
 (((class color) (min-colors 88) (background light))
- :background "light goldenrod yellow" :extend t)
+ :background "light goldenrod yellow" :extend t :inherit default)
 (t :inherit secondary-selection))
   "Face for highlighting regions with pending rewrites."
   :group 'gptel)
@@ -434,6 +434,7 @@ INFO is the async communication channel for the rewrite 
request."
   (add-hook 'eldoc-documentation-functions 
#'gptel--rewrite-key-help nil 'local)
   ;; (overlay-put ov 'gptel-rewrite response)
   (overlay-put ov 'face 'gptel-rewrite-highlight-face)
+ (overlay-put ov 'priority 2000)
   (overlay-put ov 'keymap gptel-rewrite-actions-map)
   (overlay-put ov 'mouse-face 'highlight)
   (overlay-put

[elpa] externals/modus-themes 80b8de398f 1/3: Revise all "paren" colours to be mappings

2025-04-07 Thread ELPA Syncer 
branch: externals/modus-themes
commit 80b8de398f4e102e5641d401af8079b001210c95
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Revise all "paren" colours to be mappings
---
 modus-operandi-deuteranopia-theme.el | 14 +++---
 modus-operandi-theme.el  | 14 +++---
 modus-operandi-tinted-theme.el   | 14 +++---
 modus-operandi-tritanopia-theme.el   | 14 +++---
 modus-vivendi-deuteranopia-theme.el  | 14 +++---
 modus-vivendi-theme.el   | 14 +++---
 modus-vivendi-tinted-theme.el| 14 +++---
 modus-vivendi-tritanopia-theme.el| 14 +++---
 8 files changed, 56 insertions(+), 56 deletions(-)

diff --git a/modus-operandi-deuteranopia-theme.el 
b/modus-operandi-deuteranopia-theme.el
index bb705ea709..973f2082db 100644
--- a/modus-operandi-deuteranopia-theme.el
+++ b/modus-operandi-deuteranopia-theme.el
@@ -216,13 +216,6 @@ standard)."
 
   (bg-diff-context"#f3f3f3")
 
-;;; Paren match
-
-  (bg-paren-match"#5fcfff")
-  (fg-paren-matchfg-main)
-  (bg-paren-expression   "#efd3f5")
-  (underline-paren-match unspecified)
-
 ;;; Mappings
 
  General mappings
@@ -275,6 +268,13 @@ standard)."
   (type cyan-cooler)
   (variable cyan)
 
+ Paren match
+
+  (bg-paren-matchbg-cyan-subtle)
+  (fg-paren-matchfg-main)
+  (underline-paren-match unspecified)
+  (bg-paren-expression   bg-yellow-nuanced)
+
  Accent mappings
 
   (accent-0 blue-warmer)
diff --git a/modus-operandi-theme.el b/modus-operandi-theme.el
index 1d4c47a42c..1602fea552 100644
--- a/modus-operandi-theme.el
+++ b/modus-operandi-theme.el
@@ -214,13 +214,6 @@ which corresponds to a minimum contrast in relative 
luminance of
 
   (bg-diff-context"#f3f3f3")
 
-;;; Paren match
-
-  (bg-paren-match"#5fcfff")
-  (fg-paren-matchfg-main)
-  (bg-paren-expression   "#efd3f5")
-  (underline-paren-match unspecified)
-
 ;;; Mappings
 
  General mappings
@@ -273,6 +266,13 @@ which corresponds to a minimum contrast in relative 
luminance of
   (type cyan-cooler)
   (variable cyan)
 
+ Paren match
+
+  (bg-paren-matchbg-cyan-subtle)
+  (fg-paren-matchfg-main)
+  (underline-paren-match unspecified)
+  (bg-paren-expression   bg-yellow-nuanced)
+
  Accent mappings
 
   (accent-0 blue)
diff --git a/modus-operandi-tinted-theme.el b/modus-operandi-tinted-theme.el
index 39ccf302ef..1509be035f 100644
--- a/modus-operandi-tinted-theme.el
+++ b/modus-operandi-tinted-theme.el
@@ -214,13 +214,6 @@ which corresponds to a minimum contrast in relative 
luminance of
 
   (bg-diff-context"#efe9df")
 
-;;; Paren match
-
-  (bg-paren-match"#7fdfcf")
-  (fg-paren-matchfg-main)
-  (bg-paren-expression   "#efd3f5")
-  (underline-paren-match unspecified)
-
 ;;; Mappings
 
  General mappings
@@ -273,6 +266,13 @@ which corresponds to a minimum contrast in relative 
luminance of
   (type green-cooler)
   (variable green-warmer)
 
+ Paren match
+
+  (bg-paren-matchbg-cyan-subtle)
+  (fg-paren-matchfg-main)
+  (underline-paren-match unspecified)
+  (bg-paren-expression   bg-yellow-nuanced)
+
  Accent mappings
 
   (accent-0 red-cooler)
diff --git a/modus-operandi-tritanopia-theme.el 
b/modus-operandi-tritanopia-theme.el
index 6599fe3139..3051ff71ce 100644
--- a/modus-operandi-tritanopia-theme.el
+++ b/modus-operandi-tritanopia-theme.el
@@ -216,13 +216,6 @@ standard)."
 
   (bg-diff-context"#f3f3f3")
 
-;;; Paren match
-
-  (bg-paren-match"#5fcfff")
-  (fg-paren-matchfg-main)
-  (bg-paren-expression   "#efd3f5")
-  (underline-paren-match unspecified)
-
 ;;; Mappings
 
  General mappings
@@ -275,6 +268,13 @@ standard)."
   (type blue-warmer)
   (variable cyan-cooler)
 
+ Paren match
+
+  (bg-paren-matchbg-cyan-subtle)
+  (fg-paren-matchfg-main)
+  (underline-paren-match unspecified)
+  (bg-paren-expression   bg-red-nuanced)
+
  Accent mappings
 
   (accent-0 cyan)
diff --git a/modus-vivendi-deuteranopia-theme.el 
b/modus-vivendi-deuteranopia-theme.el
index eb9f548838..ba171e0a27 100644
--- a/modus-vivendi-deuteranopia-theme.el
+++ b/modus-vivendi-deuteranopia-theme.el
@@ -216,13 +216,6 @@ standard)."
 
   (bg-diff-context"#1a1a1a")
 
-;;; Paren match
-
-  (bg-paren-match"#2f7f9f")
-  (fg-paren-matchfg-main)
-  (bg-paren-expression   "#453040")
-  (underline-paren-match unspecified)
-
 ;;; Mappings
 
  General mappings
@@ -275,6 +268,13 @@ standard)."
   (type cyan-cooler)
   (variable cyan)
 
+ Paren match
+
+  (bg-paren-matchbg-cyan-subtle)
+  (fg-paren-matchfg-main)
+  (underline-paren-match unspecified)
+  (bg-paren-expression   bg-ye

[elpa] externals/modus-themes updated (a162cd09e7 -> 7c8d4766e1)

2025-04-07 Thread ELPA Syncer 
elpasync pushed a change to branch externals/modus-themes.

  from  a162cd09e7 Make the bg-search-replace yellow in the deuteranopia 
themes
   new  80b8de398f Revise all "paren" colours to be mappings
   new  42e161138b REMOVE bg-char mappings and use search faces for Avy and 
related
   new  7c8d4766e1 Update meow sample code to not use bg-char mappings that 
I removed in 42e1611


Summary of changes:
 doc/modus-themes.info| 104 +--
 doc/modus-themes.org |  12 ++--
 modus-operandi-deuteranopia-theme.el |  18 +++---
 modus-operandi-theme.el  |  18 +++---
 modus-operandi-tinted-theme.el   |  18 +++---
 modus-operandi-tritanopia-theme.el   |  18 +++---
 modus-themes.el  |  18 +++---
 modus-vivendi-deuteranopia-theme.el  |  18 +++---
 modus-vivendi-theme.el   |  18 +++---
 modus-vivendi-tinted-theme.el|  18 +++---
 modus-vivendi-tritanopia-theme.el|  18 +++---
 11 files changed, 123 insertions(+), 155 deletions(-)

[nongnu] elpa/helm de6775100e 3/4: Fix helm-dim-prompt-face

2025-04-07 Thread ELPA Syncer 
branch: elpa/helm
commit de6775100ebcbc6ba394dfcf5774f90dbf7eb3c6
Author: Thierry Volpiatto 
Commit: Thierry Volpiatto 

Fix helm-dim-prompt-face
---
 helm-core.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/helm-core.el b/helm-core.el
index eb954bd3c1..710ce789f9 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -1283,7 +1283,9 @@ Allow specifying the height of this line."
   :group 'helm-faces)
 
 (defface helm-dim-prompt
-  `((t :inherit shadow))
+  `class color) (min-colors 88) (background dark))
+ :foreground "DimGray")
+(t :inherit shadow))
   "Face used for shadowing prompt while updating."
   :group 'helm-faces)

[nongnu] elpa/helm fc5bb8169b 4/4: Fix helm-tooltip face for tty

2025-04-07 Thread ELPA Syncer 
branch: elpa/helm
commit fc5bb8169bf9de8ed9a0933d4a9e75fd9a08f958
Author: Thierry Volpiatto 
Commit: Thierry Volpiatto 

Fix helm-tooltip face for tty
---
 helm-utils.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/helm-utils.el b/helm-utils.el
index 94e7c8377d..f6496fbff5 100644
--- a/helm-utils.el
+++ b/helm-utils.el
@@ -1053,8 +1053,9 @@ Assume regexp is a pcre based regexp."
 (defvar helm--show-help-echo-timer nil)
 (defvar helm--maybe-show-help-echo-overlay nil)
 (defface helm-tooltip
-  '((t :background "Goldenrod"
-   :foreground "black"))
+  'type tty pc))
+ :background "yellow" :foreground "black")
+(t :background "Goldenrod" :foreground "black"))
   "Face used by `helm-tooltip-show'."
   :group 'helm-grep-faces)

[nongnu] elpa/helm af50563801 1/4: Remove bookmark-set from HFF bmks actions

2025-04-07 Thread ELPA Syncer 
branch: elpa/helm
commit af50563801c9970b83d15c5d7250209d746512d5
Author: Thierry Volpiatto 
Commit: Thierry Volpiatto 

Remove bookmark-set from HFF bmks actions
---
 helm-bookmark.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/helm-bookmark.el b/helm-bookmark.el
index bebba08670..10c90ba704 100644
--- a/helm-bookmark.el
+++ b/helm-bookmark.el
@@ -592,7 +592,8 @@ If `browse-url-browser-function' is set to something else 
than
   ;; We don't want those actions in helm-find-files bookmarks.
   unless (memq action '(helm-bookmark-jump-other-frame
 helm-bookmark-jump-other-window
-helm-bookmark-jump-other-tab))
+helm-bookmark-jump-other-tab
+bookmark-set))
   collect (cons name action))
  '(("Browse project" . helm-bookmark-browse-project)) 1))
   (setf (slot-value source 'keymap) helm-bookmark-find-files-map))

[nongnu] elpa/cider 4b175e6387 3/3: [docs] Update inspector docs

2025-04-07 Thread ELPA Syncer 
branch: elpa/cider
commit 4b175e63877b2976bcf2ddd7c92f114900de9df5
Author: Oleksandr Yakushev 
Commit: Oleksandr Yakushev 

[docs] Update inspector docs
---
 CHANGELOG.md| 15 ---
 doc/modules/ROOT/pages/debugging/inspector.adoc | 13 +++--
 2 files changed, 19 insertions(+), 9 deletions(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 886845a37c..e0c646c178 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,6 +2,12 @@
 
 ## master (unreleased)
 
+### New features
+
+- [#3802](https://github.com/clojure-emacs/cider/issues/3802): Inspector 
analytics.
+- [#3802](https://github.com/clojure-emacs/cider/issues/3802): Inspector table 
view-mode.
+- [orchard#320](https://github.com/clojure-emacs/orchard/pull/320): Info: 
recognize printed Java classes/methods and munged Clojure functions in 
stacktrace outputs.
+
 ### Changes
 
 - [#3782](https://github.com/clojure-emacs/cider/issues/3782): **(Breaking)** 
Drop official support for Emacs 26.
@@ -9,18 +15,21 @@
   - `cider-stacktrace-analyze-string` and `cider-stacktrace-analyze-at-point` 
functions.
   - Automatic stacktrace parsing in log viewer.
 - Bump the injected `cider-nrepl` to 
[0.54.0](https://github.com/clojure-emacs/cider-nrepl/blob/master/CHANGELOG.md#0540-2025-04-05).
-  - Info: recognize printed Java classes/methods and munged Clojure functions 
in stacktrace outputs.
+  - 
[compliment#122](https://github.com/alexander-yakushev/compliment/pull/122): 
Completion: sort candidates by priority.
   - Inspector: add dedicated view for Exceptions.
   - Stop vendoring Haystack dependency.
-  - Stop vendoring Puget dependency. You can still user `puget` 
pretty-printing for CIDER, but you need to depend on Puget explicitly. If Puget 
is not found on the classpath, CIDER will revert to `clojure.pprint/pprint` for 
pretty-printing.
+  - Stop vendoring Puget dependency. You can still use `puget` pretty-printer 
in CIDER, but you need to depend on Puget explicitly. If Puget is not found on 
the classpath, CIDER will revert to `clojure.pprint/pprint` for pretty-printing.
 - [#3777](https://github.com/clojure-emacs/cider/issues/3777): Inspector no 
longer displays parsed Javadoc for Java classes and members.
-- [#3784](https://github.com/clojure-emacs/cider/issues/3784): Inspector: make 
point less erratic when navigating between inspector screens.
 - [#3790](https://github.com/clojure-emacs/cider/issues/3790): Stacktrace: 
show messages and data for all exception causes by default.
 - [#3789](https://github.com/clojure-emacs/cider/issues/3789): Refactor and 
simplify exception handling.
 - [#3789](https://github.com/clojure-emacs/cider/issues/3796): Completion: 
disable client-side sorting (defer to backend-provided candidate order).
 - [#3797](https://github.com/clojure-emacs/cider/issues/3797): Completion: 
enable `cider-completion-style` by default (this enables richer completion 
suggestions where candidates don't have to strictly match the prefix).
 - [#3803](https://github.com/clojure-emacs/cider/pull/3803): Enable dynamic 
indentation for `clojure-ts-mode`.
 
+### Bugs fixed
+
+- [#3784](https://github.com/clojure-emacs/cider/issues/3784): Inspector: make 
point less erratic when navigating between inspector screens.
+
 ## 1.17.1 (2025-02-25)
 
 ### Changes
diff --git a/doc/modules/ROOT/pages/debugging/inspector.adoc 
b/doc/modules/ROOT/pages/debugging/inspector.adoc
index 2076d598d2..f6b1298863 100644
--- a/doc/modules/ROOT/pages/debugging/inspector.adoc
+++ b/doc/modules/ROOT/pages/debugging/inspector.adoc
@@ -36,10 +36,6 @@ You'll have access to additional keybindings in the 
inspector buffer
 | `cider-inspector-next-inspectable-object`
 | Navigate inspectable sub-objects
 
-| kbd:[f] and kbd:[b]
-| `forward-char`, `backward-char`
-| Navigate across characters on a line
-
 | kbd:[Return]
 | `cider-inspector-operate-on-point`
 | Inspect sub-objects
@@ -52,7 +48,7 @@ You'll have access to additional keybindings in the inspector 
buffer
 | `cider-inspector-refresh`
 | Refresh the inspector (e.g. if viewing an atom/ref/agent)
 
-| kbd:[SPC] or kbd:[Next] 
+| kbd:[SPC] or kbd:[Next]
 | `cider-inspector-next-page`
 | Jump to next page in paginated view
 
@@ -60,6 +56,10 @@ You'll have access to additional keybindings in the 
inspector buffer
 | `cider-inspector-prev-page`
 | Jump to previous page in paginated view
 
+| kbd:[y]
+| `cider-inspector-display-analytics`
+| Calculate and display analytics for the inspected object. Analytics is 
supported for lists of numbers, strings, tuples, maps; for large key-value maps.
+
 | kbd:[s]
 | `cider-inspector-set-page-size`
 | Set a new page size in paginated view
@@ -78,7 +78,8 @@ You'll have access to additional keybindings in the inspector 
buffer
 
 | kbd:[v]
 | `cider-inspector-toggle-view-mode`
-| Switch the rendering of the current value between `:normal` and `:object` 
view mode. In `:object` mode, any value is rendered as a plain Java object (by 
di