[elpa] externals-release/org 2247998758: ob-core: Fix :results list when result is a table
branch: externals-release/org commit 22479987587a97f09edd9bae25d5c952e9868854 Author: Ihor Radchenko Commit: Ihor Radchenko ob-core: Fix :results list when result is a table * lisp/ob-core.el (org-babel-insert-result): Do not treat table lines in RESULT verbatim. * testing/lisp/test-ob-shell.el (ob-shell/results-list): Add new test. Reported-by: Rudolf Adamkovič Link: https://orgmode.org/list/m2tu1v8gj8@me.com --- lisp/ob-core.el | 6 +- testing/lisp/test-ob-shell.el | 14 ++ 2 files changed, 19 insertions(+), 1 deletion(-) diff --git a/lisp/ob-core.el b/lisp/ob-core.el index f69538f78c..9d72cf870c 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -2464,7 +2464,11 @@ INFO may provide the values of these header arguments (in the (cons 'unordered (mapcar (lambda (e) - (list (if (stringp e) e (format "%S" e +(cond + ((stringp e) (list e)) + ((listp e) + (mapcar (lambda (x) (format "%S" x)) e)) + (t (list (format "%S" e) (if (listp result) result (split-string result "\n" t '(:splicep nil :istart "- " :iend "\n"))) diff --git a/testing/lisp/test-ob-shell.el b/testing/lisp/test-ob-shell.el index 7aa45cc8a2..b0d9beff46 100644 --- a/testing/lisp/test-ob-shell.el +++ b/testing/lisp/test-ob-shell.el @@ -170,6 +170,20 @@ ob-comint.el, which was not previously tested." "#+BEGIN_SRC sh :results table\necho 'I \"want\" it all'\n#+END_SRC" (org-babel-execute-src-block) +(ert-deftest ob-shell/results-list () + "Test :results list." + (org-test-with-temp-text + "#+BEGIN_SRC sh :results list\necho 1\necho 2\necho 3\n#+END_SRC" +(should + (equal '((1) (2) (3)) +(org-babel-execute-src-block))) +(search-forward "#+results") +(beginning-of-line 2) +(should + (equal + "- 1\n- 2\n- 3\n" + (buffer-substring-no-properties (point) (point-max)) + ;;; Standard output (ert-deftest ob-shell/standard-output-after-success ()
[elpa] externals/org 18fec7623c: ob-core: Fix :results list when result is a table
branch: externals/org commit 18fec7623cad7b73f7b741ad9b40f709c008c7db Author: Ihor Radchenko Commit: Ihor Radchenko ob-core: Fix :results list when result is a table * lisp/ob-core.el (org-babel-insert-result): Do not treat table lines in RESULT verbatim. * testing/lisp/test-ob-shell.el (ob-shell/results-list): Add new test. Reported-by: Rudolf Adamkovič Link: https://orgmode.org/list/m2tu1v8gj8@me.com --- lisp/ob-core.el | 6 +- testing/lisp/test-ob-shell.el | 14 ++ 2 files changed, 19 insertions(+), 1 deletion(-) diff --git a/lisp/ob-core.el b/lisp/ob-core.el index 2fa9d8978d..3c7717fd8f 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -2463,7 +2463,11 @@ INFO may provide the values of these header arguments (in the (cons 'unordered (mapcar (lambda (e) - (list (if (stringp e) e (format "%S" e +(cond + ((stringp e) (list e)) + ((listp e) + (mapcar (lambda (x) (format "%S" x)) e)) + (t (list (format "%S" e) (if (listp result) result (split-string result "\n" t '(:splicep nil :istart "- " :iend "\n"))) diff --git a/testing/lisp/test-ob-shell.el b/testing/lisp/test-ob-shell.el index 7aa45cc8a2..b0d9beff46 100644 --- a/testing/lisp/test-ob-shell.el +++ b/testing/lisp/test-ob-shell.el @@ -170,6 +170,20 @@ ob-comint.el, which was not previously tested." "#+BEGIN_SRC sh :results table\necho 'I \"want\" it all'\n#+END_SRC" (org-babel-execute-src-block) +(ert-deftest ob-shell/results-list () + "Test :results list." + (org-test-with-temp-text + "#+BEGIN_SRC sh :results list\necho 1\necho 2\necho 3\n#+END_SRC" +(should + (equal '((1) (2) (3)) +(org-babel-execute-src-block))) +(search-forward "#+results") +(beginning-of-line 2) +(should + (equal + "- 1\n- 2\n- 3\n" + (buffer-substring-no-properties (point) (point-max)) + ;;; Standard output (ert-deftest ob-shell/standard-output-after-success ()
[elpa] externals/org dd4e06ddc3: org-manual: Document third-party package compatibility
branch: externals/org commit dd4e06ddc3ac31fba6e0d65a709d423bb280c299 Author: Ihor Radchenko Commit: Ihor Radchenko org-manual: Document third-party package compatibility * doc/org-manual.org (Installation): Document that we only guarantee compatibility with the latest stable versions of third-party packages. Link: https://orgmode.org/list/86iljd3x90@gmail.com --- doc/org-manual.org | 4 1 file changed, 4 insertions(+) diff --git a/doc/org-manual.org b/doc/org-manual.org index 4fb017db8e..cf77615805 100644 --- a/doc/org-manual.org +++ b/doc/org-manual.org @@ -96,6 +96,10 @@ When installing Org on top of the pre-packaged version, please note that Org stable versions are meant to be fully compatible with the last three stable versions of Emacs but not with older Emacsen. +Some Org components also depend on third-party packages available +through package archives. Org is only guaranteed to be compatible +with the latest stable versions of these third-party packages. + *** Using Emacs packaging system :PROPERTIES: :UNNUMBERED: notoc
[elpa] externals/org updated (dd4e06ddc3 -> a58ab90395)
elpasync pushed a change to branch externals/org. from dd4e06ddc3 org-manual: Document third-party package compatibility new 0c467b6b89 lisp/ox-latex.el: Don't emit empty label=, caption= new 322b2fd226 lisp/ox-latex.el: Add `org-latex-listings-src-omit-language' new a58ab90395 lisp/ox-latex.el: Add export option for `org-latex-listings-src-omit-language' Summary of changes: etc/ORG-NEWS | 17 - lisp/ox-latex.el | 34 -- 2 files changed, 44 insertions(+), 7 deletions(-)
[elpa] externals/org a58ab90395 3/3: lisp/ox-latex.el: Add export option for `org-latex-listings-src-omit-language'
branch: externals/org
commit a58ab903955461d36bf0aece334ff4bf5f15e127
Author: Ihor Radchenko
Commit: Ihor Radchenko
lisp/ox-latex.el: Add export option for
`org-latex-listings-src-omit-language'
* lisp/ox-latex.el (latex):
(org-latex-src-block--listings): Use a proper export option, not just
a `defcustom'.
---
lisp/ox-latex.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index ca05b0508f..663e4141cb 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -156,6 +156,7 @@
(:latex-src-block-backend nil nil org-latex-src-block-backend)
(:latex-listings-langs nil nil org-latex-listings-langs)
(:latex-listings-options nil nil org-latex-listings-options)
+(:latex-listings-src-omit-language nil nil
org-latex-listings-src-omit-language)
(:latex-minted-langs nil nil org-latex-minted-langs)
(:latex-minted-options nil nil org-latex-minted-options)
(:latex-prefer-user-labels nil nil org-latex-prefer-user-labels)
@@ -3610,10 +3611,10 @@ and FLOAT are extracted from SRC-BLOCK and INFO in
`org-latex-src-block'."
((string= "multicolumn" float) '(("float" "*")))
((and float (not (assoc "float" lst-opt)))
`(("float" ,(plist-get info :latex-default-figure-position)
- (unless org-latex-listings-src-omit-language
+ (unless (plist-get info :latex-listings-src-omit-language)
`(("language" ,lst-lang)))
(when label
- `(("label" ,(org-latex--label src-block info
+ `(("label" ,(org-latex--label src-block info
(when caption-str
`(("caption" ,caption-str)))
(when caption-str
[elpa] externals/org 0c467b6b89 1/3: lisp/ox-latex.el: Don't emit empty label=, caption=
branch: externals/org
commit 0c467b6b89363a1a85a8382dc879f2984b340ea6
Author: Pedro A. Aranda Gutierrez
Commit: Ihor Radchenko
lisp/ox-latex.el: Don't emit empty label=, caption=
* lisp/ox-latex.el (org-latex-src-block--listings): Don't emit label=
when label is empty. Don't emit caption= and captionpos= when caption
is empty.
This is safe to do as long as we do not set "lstlisting" parameters
globally. See the discussion in
https://orgmode.org/list/87h6xyqqod.fsf@localhost.
---
lisp/ox-latex.el | 13 -
1 file changed, 8 insertions(+), 5 deletions(-)
diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index a2d60d5dbe..f03903605c 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -3594,11 +3594,14 @@ and FLOAT are extracted from SRC-BLOCK and INFO in
`org-latex-src-block'."
((and float (not (assoc "float" lst-opt)))
`(("float" ,(plist-get info :latex-default-figure-position)
`(("language" ,lst-lang))
- (if label
- `(("label" ,(org-latex--label src-block info)))
- '(("label" " ")))
- (if caption-str `(("caption" ,caption-str)) '(("caption" " ")))
- `(("captionpos" ,(if caption-above-p "t" "b")))
+ (when label
+ `(("label" ,(org-latex--label src-block info
+ (when caption-str
+ `(("caption" ,caption-str)))
+ (when caption-str
+ ;; caption-above-p means captionpos is t(op)
+ ;; else b(ottom)
+ `(("captionpos" ,(if caption-above-p "t" "b"
(cond ((assoc "numbers" lst-opt) nil)
((not num-start) '(("numbers" "none")))
(t `(("firstnumber" ,(number-to-string (1+ num-start)))
[elpa] externals/org 322b2fd226 2/3: lisp/ox-latex.el: Add `org-latex-listings-src-omit-language'
branch: externals/org
commit 322b2fd22607f346977399bf5ea95e97268831e7
Author: Pedro A. Aranda Gutierrez
Commit: Ihor Radchenko
lisp/ox-latex.el: Add `org-latex-listings-src-omit-language'
* lisp/ox-latex.el (org-latex-listings-src-omit-language): New
customization that controls whether language= should be included in
the parameters of the lstlisting environmet generated by a src block.
(org-latex-src-block--listings): Do not add language parameter when
`org-latex-listings-src-omit-language' is non-nil.
* etc/ORG-NEWS (New =org-latex-listings-src-omit-language= variable
for LaTeX export): Document the new defcustom.
---
etc/ORG-NEWS | 17 -
lisp/ox-latex.el | 20 +++-
2 files changed, 35 insertions(+), 2 deletions(-)
diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS
index 5d5e726e00..a4e54dc415 100644
--- a/etc/ORG-NEWS
+++ b/etc/ORG-NEWS
@@ -12,6 +12,21 @@ See the end of the file for license conditions.
Please send Org bug reports to mailto:emacs-orgm...@gnu.org.
* Version 9.7 (not released yet)
+** New options
+*** New ~org-latex-listings-src-omit-language~ customization for LaTeX export
+
+The ~org-latex-listings-src-omit-language~ customization variable
+allows you to omit the =language= parameter in the exported
+=lstlisting= environment. This is necessary when the =listings=
+backend delegates listing generation to another package like
+=fancyvrb= using the following setup in the document header:
+
+#+BEGIN_src org
+,#+LATEX_HEADER: \RequirePackage{fancyvrb}
+,#+LATEX_HEADER: \DefineVerbatimEnvironment{verbatim}{Verbatim}{...whatever...}
+,#+LATEX_HEADER:
\DefineVerbatimEnvironment{lstlisting}{Verbatim}{...whatever...}
+#+END_src
+
* Version 9.6
** Important announcements and breaking changes
@@ -432,6 +447,7 @@ following properties: ~:hook~, ~:prepare-finalize~,
~:before-finalize~, ~:after-finalize~. These nullary functions run
prior to their global counterparts for the selected template.
+
** New options
*** A new option for custom setting ~org-refile-use-outline-path~ to show
document title in refile targets
@@ -747,7 +763,6 @@ following snippet to allow multiple different ID formats in
Org files.
org-attach-id-uuid-folder-format
org-attach-id-ts-folder-format))
#+end_src
-
* Version 9.5
** Important announcements and breaking changes
diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index f03903605c..ca05b0508f 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -1021,6 +1021,23 @@ in this list - but it does not hurt if it is present."
(symbol :tag "Major mode ")
(string :tag "Listings language"
+(defcustom org-latex-listings-src-omit-language nil
+ "Discard src block language parameter in listings.
+
+Set this option to t to omit the \"language=\" in the parameters to
+\"lstlisting\" environments when exporting an src block.
+
+This is necessary, for example, when the \"fancyvrb\" package is used
+instead of \"listings\":
+
+#+LATEX_HEADER: \\RequirePackage{fancyvrb}
+#+LATEX_HEADER: \\DefineVerbatimEnvironment{verbatim}{Verbatim}{...}
+#+LATEX_HEADER: \\DefineVerbatimEnvironment{lstlisting}{Verbatim}{...}"
+ :group 'org-export-latex
+ :package-version '(Org . "9.7")
+ :type 'boolean
+ :safe #'booleanp)
+
(defcustom org-latex-listings-options nil
"Association list of options for the latex listings package.
@@ -3593,7 +3610,8 @@ and FLOAT are extracted from SRC-BLOCK and INFO in
`org-latex-src-block'."
((string= "multicolumn" float) '(("float" "*")))
((and float (not (assoc "float" lst-opt)))
`(("float" ,(plist-get info :latex-default-figure-position)
- `(("language" ,lst-lang))
+ (unless org-latex-listings-src-omit-language
+ `(("language" ,lst-lang)))
(when label
`(("label" ,(org-latex--label src-block info
(when caption-str
[elpa] externals/ef-themes 9bbb2fb45e 3/7: Include point of entry for shared overrides (extend b3e1a72)
branch: externals/ef-themes
commit 9bbb2fb45ee9c3ebcfc8458ca4a1850a123dcb6b
Author: Protesilaos Stavrou
Commit: Protesilaos Stavrou
Include point of entry for shared overrides (extend b3e1a72)
---
README.org | 10 +-
ef-themes.el | 13 -
2 files changed, 21 insertions(+), 2 deletions(-)
diff --git a/README.org b/README.org
index 4da2e4d01c..1f265dc8ff 100644
--- a/README.org
+++ b/README.org
@@ -423,7 +423,9 @@ Other examples:
:END:
#+cindex: Override color values and semantic color mappings
-[ Part of {{{development-version}}}. ]
+[ Part of {{{development-version}}}. For a video demo of the same
+idea that I implemented in the ~modus-themes~, check:
+https://protesilaos.com/codelog/2022-12-17-modus-themes-v4-demo/. ]
Each theme defines its own color palette as well as semantic color
mappings. The former is the set of color values such as what shade of
@@ -437,6 +439,12 @@ The definition is stored in the variable
=ef-NAME-palette=, where
~ef-summer~ theme. Overrides for those associations are specified in
the variable =ef-NAME-palette-overrides=.
+#+vindex: ef-themes-common-palette-overrides
+The variable ~ef-themes-common-palette-overrides~ is available for
+shared values. It is advised to only use this for mappings that do
+not specify a color value directly. This way, the text remains
+legible by getting the theme-specific color value it needs.
+
All associations take the form of =(KEY VALUE)= pairs. For example,
the ~ef-summer-palette~ contains =(blue-warmer "#5250ef")=. Semantic
color mappings are the same, though the =VALUE= is one of the named
diff --git a/ef-themes.el b/ef-themes.el
index b37ce941cc..59873ad1c2 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -1969,6 +1969,17 @@ Helper function for `ef-themes-preview-colors'."
Instantiate an Ef theme
+(defvar ef-themes-common-palette-overrides nil
+ "Set palette overrides for all the Modus themes.
+
+Mirror the elements of a theme's palette, overriding their value.
+The palette variables are named THEME-NAME-palette, while
+individual theme overrides are THEME-NAME-palette-overrides. The
+THEME-NAME is one of the symbols in `modus-themes-items'.
+
+Individual theme overrides take precedence over these common
+overrides.")
+
;;;###autoload
(defmacro ef-themes-theme (name palette &optional overrides)
"Bind NAME's color PALETTE around face specs and variables.
@@ -1983,7 +1994,7 @@ corresponding entries."
(let ((sym (gensym))
(colors (mapcar #'car (symbol-value palette
`(let* ((c '((class color) (min-colors 256)))
-(,sym (append ,overrides ,palette))
+(,sym (append ,overrides ef-themes-common-palette-overrides
,palette))
,@(mapcar (lambda (color)
(list color
`(let* ((value (car (alist-get ',color ,sym
[elpa] externals/ef-themes 4332a7433b 4/7: Expand doc string of each theme's palette
branch: externals/ef-themes commit 4332a7433ba2e29cf7a3303fe93296e312cc7e47 Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Expand doc string of each theme's palette --- ef-autumn-theme.el | 8 +++- ef-bio-theme.el| 8 +++- ef-cherie-theme.el | 8 +++- ef-cyprus-theme.el | 8 +++- ef-dark-theme.el | 8 +++- ef-day-theme.el| 8 +++- ef-deuteranopia-dark-theme.el | 8 +++- ef-deuteranopia-light-theme.el | 8 +++- ef-duo-dark-theme.el | 8 +++- ef-duo-light-theme.el | 8 +++- ef-frost-theme.el | 8 +++- ef-light-theme.el | 8 +++- ef-night-theme.el | 8 +++- ef-spring-theme.el | 8 +++- ef-summer-theme.el | 8 +++- ef-trio-dark-theme.el | 8 +++- ef-trio-light-theme.el | 8 +++- ef-tritanopia-dark-theme.el| 8 +++- ef-tritanopia-light-theme.el | 8 +++- ef-winter-theme.el | 8 +++- 20 files changed, 140 insertions(+), 20 deletions(-) diff --git a/ef-autumn-theme.el b/ef-autumn-theme.el index 7f237de523..1cb19cb4b8 100644 --- a/ef-autumn-theme.el +++ b/ef-autumn-theme.el @@ -200,7 +200,13 @@ (rainbow-6 red-cooler) (rainbow-7 green) (rainbow-8 yellow)) -"The `ef-autumn' palette.") +"The `ef-autumn' palette. +Color values have the form (COLOR-NAME HEX-VALUE) with the former +as a symbol and the latter as a string. + +Semantic color mappings have the form (MAPPING-NAME COLOR-NAME) +with both as symbols. The latter is a color that already exists +in the palette and is associated with a HEX-VALUE.") (defvar ef-autumn-palette-overrides nil "Overrides for `ef-autumn-palette'.") diff --git a/ef-bio-theme.el b/ef-bio-theme.el index f8b5b71de7..8201d5731a 100644 --- a/ef-bio-theme.el +++ b/ef-bio-theme.el @@ -200,7 +200,13 @@ (rainbow-6 blue) (rainbow-7 cyan) (rainbow-8 magenta)) -"The `ef-bio' palette.") +"The `ef-bio' palette. +Color values have the form (COLOR-NAME HEX-VALUE) with the former +as a symbol and the latter as a string. + +Semantic color mappings have the form (MAPPING-NAME COLOR-NAME) +with both as symbols. The latter is a color that already exists +in the palette and is associated with a HEX-VALUE.") (defvar ef-bio-palette-overrides nil "Overrides for `ef-bio-palette'.") diff --git a/ef-cherie-theme.el b/ef-cherie-theme.el index 6b21b6b5a0..415bb11b0a 100644 --- a/ef-cherie-theme.el +++ b/ef-cherie-theme.el @@ -200,7 +200,13 @@ (rainbow-6 red-cooler) (rainbow-7 cyan-warmer) (rainbow-8 magenta-cooler)) -"The `ef-cherie' palette.") +"The `ef-cherie' palette. +Color values have the form (COLOR-NAME HEX-VALUE) with the former +as a symbol and the latter as a string. + +Semantic color mappings have the form (MAPPING-NAME COLOR-NAME) +with both as symbols. The latter is a color that already exists +in the palette and is associated with a HEX-VALUE.") (defvar ef-cherie-palette-overrides nil "Overrides for `ef-cherie-palette'.") diff --git a/ef-cyprus-theme.el b/ef-cyprus-theme.el index e4065dcac7..2d31bf2e15 100644 --- a/ef-cyprus-theme.el +++ b/ef-cyprus-theme.el @@ -200,7 +200,13 @@ (rainbow-6 yellow-cooler) (rainbow-7 cyan-cooler) (rainbow-8 red)) -"The `ef-cyprus' palette.") +"The `ef-cyprus' palette. +Color values have the form (COLOR-NAME HEX-VALUE) with the former +as a symbol and the latter as a string. + +Semantic color mappings have the form (MAPPING-NAME COLOR-NAME) +with both as symbols. The latter is a color that already exists +in the palette and is associated with a HEX-VALUE.") (defvar ef-cyprus-palette-overrides nil "Overrides for `ef-cyprus-palette'.") diff --git a/ef-dark-theme.el b/ef-dark-theme.el index 126815f2f5..3d3892a16b 100644 --- a/ef-dark-theme.el +++ b/ef-dark-theme.el @@ -200,7 +200,13 @@ (rainbow-6 red-cooler) (rainbow-7 green-warmer) (rainbow-8 yellow)) -"The `ef-dark' palette.") +"The `ef-dark' palette. +Color values have the form (COLOR-NAME HEX-VALUE) with the former +as a symbol and the latter as a string. + +Semantic color mappings have the form (MAPPING-NAME COLOR-NAME) +with both as symbols. The latter is a color that already exists +in the palette and is associated with a HEX-VALUE.") (defvar ef-dark-palette-overrides nil "Overrides for `ef-dark-palette'.") diff --git a/ef-day-theme.el b/ef-day-theme.el index e46ae82a62..af1c66a1c7 100644 --- a/ef-day-theme.el +++ b/ef-day-theme.el @@ -200,7 +200,13 @@ (rainbow-6 magenta-cooler) (rainbow-7 red-cooler) (rainbow-8 green-cooler)) -"The `ef-day' palette.") +"The `ef-day' palette. +Color values have the form (COLOR-NAME HEX-VALUE) with the former +as a symbol and the latter as a string. + +Semantic color mapp
[elpa] externals/ef-themes 4b5c207553 2/7: Use tilde instead of equals for a symbol
branch: externals/ef-themes commit 4b5c20755309330c68b84a86e23849d8922d31af Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Use tilde instead of equals for a symbol --- README.org | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/README.org b/README.org index a84111b949..4da2e4d01c 100644 --- a/README.org +++ b/README.org @@ -440,7 +440,7 @@ the variable =ef-NAME-palette-overrides=. All associations take the form of =(KEY VALUE)= pairs. For example, the ~ef-summer-palette~ contains =(blue-warmer "#5250ef")=. Semantic color mappings are the same, though the =VALUE= is one of the named -colors of the theme. For instance, =ef-summer-palette= maps the +colors of the theme. For instance, ~ef-summer-palette~ maps the aforementioned =blue-warmer= to =variable= thus =(variable blue-warmer)=. The easiest way to learn about a theme's definition is to use the
[elpa] externals/ef-themes updated (f90b063e09 -> 8e7bcbcf23)
elpasync pushed a change to branch externals/ef-themes. from f90b063e09 Mention 'forge' as implicitly supported (inherits from Magit) new ebd3af27ed Clarify wording in the manual new 4b5c207553 Use tilde instead of equals for a symbol new 9bbb2fb45e Include point of entry for shared overrides (extend b3e1a72) new 4332a7433b Expand doc string of each theme's palette new f5f30e617e Expand doc string of each theme's palette overrides new a0687c073b Fix typo in doc string new 8e7bcbcf23 Fix reference to symbol Summary of changes: README.org | 18 +- ef-autumn-theme.el | 16 ++-- ef-bio-theme.el| 16 ++-- ef-cherie-theme.el | 16 ++-- ef-cyprus-theme.el | 16 ++-- ef-dark-theme.el | 16 ++-- ef-day-theme.el| 16 ++-- ef-deuteranopia-dark-theme.el | 16 ++-- ef-deuteranopia-light-theme.el | 16 ++-- ef-duo-dark-theme.el | 16 ++-- ef-duo-light-theme.el | 16 ++-- ef-frost-theme.el | 16 ++-- ef-light-theme.el | 16 ++-- ef-night-theme.el | 16 ++-- ef-spring-theme.el | 16 ++-- ef-summer-theme.el | 16 ++-- ef-themes.el | 13 - ef-trio-dark-theme.el | 16 ++-- ef-trio-light-theme.el | 16 ++-- ef-tritanopia-dark-theme.el| 16 ++-- ef-tritanopia-light-theme.el | 16 ++-- ef-winter-theme.el | 16 ++-- 22 files changed, 305 insertions(+), 46 deletions(-)
[elpa] externals-release/org 12e10eb0dd: * doc/org-guide.org: Fix typos
branch: externals-release/org
commit 12e10eb0ddf5a38ae6aa9d5bfe68f2ec03cda858
Author: Ihor Radchenko
Commit: Ihor Radchenko
* doc/org-guide.org: Fix typos
(Visibility Cycling): Fix macro.
(Multi-state Workflow): Fix emphasis.
(Timestamps):
(Clocking Work Time):
(The Agenda Dispatcher): Fix heading link.
Reported-by: Cauim de Souza Lima
Link:
https://orgmode.org/list/cahfpvghiztbq9u5czj1p1jgqvjhtgip9uvdi9ttcp535urz...@mail.gmail.com
---
doc/org-guide.org | 10 +-
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/doc/org-guide.org b/doc/org-guide.org
index e23b2efa78..f53555f659 100644
--- a/doc/org-guide.org
+++ b/doc/org-guide.org
@@ -141,7 +141,7 @@ See [[*Miscellaneous]] for a setup to realize this.
Outlines make it possible to hide parts of the text in the buffer.
Org uses just two commands, bound to {{{kbd(TAB)}}} and
-{{{kbd{S-TAB)}}} to change the visibility in the buffer.
+{{{kbd(S-TAB)}}} to change the visibility in the buffer.
#+attr_texinfo: :sep ,
- {{{kbd(TAB)}}} ::
@@ -667,7 +667,7 @@ of the option ~org-todo-state-tags-triggers~ for details.
:DESCRIPTION: More than just on/off.
:END:
-You can use TODO keywords to indicate @emph{sequential} working progress
+You can use TODO keywords to indicate /sequential/ working progress
states:
#+begin_src emacs-lisp
@@ -1093,7 +1093,7 @@ a range of times---in a special format, either
=<2003-09-16 Tue>= or
=<2003-09-16 Tue 09:39>= or =<2003-09-16 Tue 12:00-12:30>=.
A timestamp can appear anywhere in the headline or body of an Org tree
entry. Its presence causes entries to be shown on specific dates in
-the agenda (see [[*The Weekly/daily Agenda]]). We distinguish:
+the agenda (see [[*The Weekly/Daily Agenda]]). We distinguish:
- Plain timestamp; Event; Appointment ::
@@ -1294,7 +1294,7 @@ a project.
a {{{kbd(C-u)}}} prefix argument, select the target task from a list
of recently clocked tasks.
-The {{{kbd(l)}}} key may be used in the agenda (see [[*The Weekly/daily
+The {{{kbd(l)}}} key may be used in the agenda (see [[*The Weekly/Daily
Agenda]]) to show which tasks have been worked on or closed during
a day.
@@ -1527,7 +1527,7 @@ commands:
#+attr_texinfo: :sep ,
- {{{kbd(a)}}} ::
- Create the calendar-like agenda (see [[*The Weekly/daily Agenda]]).
+ Create the calendar-like agenda (see [[*The Weekly/Daily Agenda]]).
- {{{kbd(t)}}}, {{{kbd(T)}}} ::
[elpa] externals/ef-themes ebd3af27ed 1/7: Clarify wording in the manual
branch: externals/ef-themes commit ebd3af27edac01dffed512e32daf5f4823e07932 Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Clarify wording in the manual --- README.org | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/README.org b/README.org index 30d770984d..a84111b949 100644 --- a/README.org +++ b/README.org @@ -433,9 +433,9 @@ programming modes or =heading-1= for level 1 headings in Org and others. The definition is stored in the variable =ef-NAME-palette=, where -=NAME= is the specifier of the theme, such as ~ef-summer-palette~ for -the ~ef-summer~ theme. Overrides for those associations are specified -in the variable =ef-NAME-palette-overrides=. +=NAME= is the specifier of the theme, such as ~summer~ for the +~ef-summer~ theme. Overrides for those associations are specified in +the variable =ef-NAME-palette-overrides=. All associations take the form of =(KEY VALUE)= pairs. For example, the ~ef-summer-palette~ contains =(blue-warmer "#5250ef")=. Semantic
[elpa] externals/ef-themes f5f30e617e 5/7: Expand doc string of each theme's palette overrides
branch: externals/ef-themes commit f5f30e617e34f60ef79de17122c1212f3efc8f6d Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Expand doc string of each theme's palette overrides --- ef-autumn-theme.el | 8 +++- ef-bio-theme.el| 8 +++- ef-cherie-theme.el | 8 +++- ef-cyprus-theme.el | 8 +++- ef-dark-theme.el | 8 +++- ef-day-theme.el| 8 +++- ef-deuteranopia-dark-theme.el | 8 +++- ef-deuteranopia-light-theme.el | 8 +++- ef-duo-dark-theme.el | 8 +++- ef-duo-light-theme.el | 8 +++- ef-frost-theme.el | 8 +++- ef-light-theme.el | 8 +++- ef-night-theme.el | 8 +++- ef-spring-theme.el | 8 +++- ef-summer-theme.el | 8 +++- ef-trio-dark-theme.el | 8 +++- ef-trio-light-theme.el | 8 +++- ef-tritanopia-dark-theme.el| 8 +++- ef-tritanopia-light-theme.el | 8 +++- ef-winter-theme.el | 8 +++- 20 files changed, 140 insertions(+), 20 deletions(-) diff --git a/ef-autumn-theme.el b/ef-autumn-theme.el index 1cb19cb4b8..34556743c4 100644 --- a/ef-autumn-theme.el +++ b/ef-autumn-theme.el @@ -209,7 +209,13 @@ with both as symbols. The latter is a color that already exists in the palette and is associated with a HEX-VALUE.") (defvar ef-autumn-palette-overrides nil -"Overrides for `ef-autumn-palette'.") +"Overrides for `ef-autumn-palette'. + +Mirror the elements of the aforementioned palette, overriding +their value. + +For overrides that are shared across all of the Ef themes, +refer to `ef-themes-common-palette-overrides'.") (ef-themes-theme ef-autumn ef-autumn-palette ef-autumn-palette-overrides) diff --git a/ef-bio-theme.el b/ef-bio-theme.el index 8201d5731a..c3334cfdd8 100644 --- a/ef-bio-theme.el +++ b/ef-bio-theme.el @@ -209,7 +209,13 @@ with both as symbols. The latter is a color that already exists in the palette and is associated with a HEX-VALUE.") (defvar ef-bio-palette-overrides nil -"Overrides for `ef-bio-palette'.") +"Overrides for `ef-bio-palette'. + +Mirror the elements of the aforementioned palette, overriding +their value. + +For overrides that are shared across all of the Ef themes, +refer to `ef-themes-common-palette-overrides'.") (ef-themes-theme ef-bio ef-bio-palette ef-bio-palette-overrides) diff --git a/ef-cherie-theme.el b/ef-cherie-theme.el index 415bb11b0a..25d14e62af 100644 --- a/ef-cherie-theme.el +++ b/ef-cherie-theme.el @@ -209,7 +209,13 @@ with both as symbols. The latter is a color that already exists in the palette and is associated with a HEX-VALUE.") (defvar ef-cherie-palette-overrides nil -"Overrides for `ef-cherie-palette'.") +"Overrides for `ef-cherie-palette'. + +Mirror the elements of the aforementioned palette, overriding +their value. + +For overrides that are shared across all of the Ef themes, +refer to `ef-themes-common-palette-overrides'.") (ef-themes-theme ef-cherie ef-cherie-palette ef-cherie-palette-overrides) diff --git a/ef-cyprus-theme.el b/ef-cyprus-theme.el index 2d31bf2e15..907d79253a 100644 --- a/ef-cyprus-theme.el +++ b/ef-cyprus-theme.el @@ -209,7 +209,13 @@ with both as symbols. The latter is a color that already exists in the palette and is associated with a HEX-VALUE.") (defvar ef-cyprus-palette-overrides nil -"Overrides for `ef-cyprus-palette'.") +"Overrides for `ef-cyprus-palette'. + +Mirror the elements of the aforementioned palette, overriding +their value. + +For overrides that are shared across all of the Ef themes, +refer to `ef-themes-common-palette-overrides'.") (ef-themes-theme ef-cyprus ef-cyprus-palette ef-cyprus-palette-overrides) diff --git a/ef-dark-theme.el b/ef-dark-theme.el index 3d3892a16b..333e90a267 100644 --- a/ef-dark-theme.el +++ b/ef-dark-theme.el @@ -209,7 +209,13 @@ with both as symbols. The latter is a color that already exists in the palette and is associated with a HEX-VALUE.") (defvar ef-dark-palette-overrides nil -"Overrides for `ef-dark-palette'.") +"Overrides for `ef-dark-palette'. + +Mirror the elements of the aforementioned palette, overriding +their value. + +For overrides that are shared across all of the Ef themes, +refer to `ef-themes-common-palette-overrides'.") (ef-themes-theme ef-dark ef-dark-palette ef-dark-palette-overrides) diff --git a/ef-day-theme.el b/ef-day-theme.el index af1c66a1c7..dec6d97e8d 100644 --- a/ef-day-theme.el +++ b/ef-day-theme.el @@ -209,7 +209,13 @@ with both as symbols. The latter is a color that already exists in the palette and is associated with a HEX-VALUE.") (defvar ef-day-palette-overrides nil -"Overrides for `ef-day-palette'.") +"Overrides for `ef-day-palette'. + +Mirror the elements of the aforementioned palette, overriding +their value. + +For overrides that are s
[elpa] externals/ef-themes 8e7bcbcf23 7/7: Fix reference to symbol
branch: externals/ef-themes commit 8e7bcbcf23628140f01602f1b68cfde01cacd68b Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Fix reference to symbol --- ef-themes.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ef-themes.el b/ef-themes.el index 669470937b..0562f6d1a6 100644 --- a/ef-themes.el +++ b/ef-themes.el @@ -1975,7 +1975,7 @@ Helper function for `ef-themes-preview-colors'." Mirror the elements of a theme's palette, overriding their value. The palette variables are named THEME-NAME-palette, while individual theme overrides are THEME-NAME-palette-overrides. The -THEME-NAME is one of the symbols in `modus-themes-items'. +THEME-NAME is one of the symbols in `ef-themes-collection'. Individual theme overrides take precedence over these common overrides.")
[elpa] externals/ef-themes a0687c073b 6/7: Fix typo in doc string
branch: externals/ef-themes commit a0687c073bc00ebf920a4b8e8969edffd99e5dcc Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Fix typo in doc string --- ef-themes.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ef-themes.el b/ef-themes.el index 59873ad1c2..669470937b 100644 --- a/ef-themes.el +++ b/ef-themes.el @@ -1970,7 +1970,7 @@ Helper function for `ef-themes-preview-colors'." Instantiate an Ef theme (defvar ef-themes-common-palette-overrides nil - "Set palette overrides for all the Modus themes. + "Set palette overrides for all the Ef themes. Mirror the elements of a theme's palette, overriding their value. The palette variables are named THEME-NAME-palette, while
[elpa] externals/org updated (a58ab90395 -> 04d2cc59e5)
elpasync pushed a change to branch externals/org. from a58ab90395 lisp/ox-latex.el: Add export option for `org-latex-listings-src-omit-language' adds 2247998758 ob-core: Fix :results list when result is a table new 12e10eb0dd * doc/org-guide.org: Fix typos new 04d2cc59e5 Merge branch 'bugfix' Summary of changes: doc/org-guide.org | 10 +- 1 file changed, 5 insertions(+), 5 deletions(-)
[elpa] externals/org 04d2cc59e5: Merge branch 'bugfix'
branch: externals/org
commit 04d2cc59e52ebc1164309debffd360c66149d1e0
Merge: a58ab90395 12e10eb0dd
Author: Ihor Radchenko
Commit: Ihor Radchenko
Merge branch 'bugfix'
---
doc/org-guide.org | 10 +-
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/doc/org-guide.org b/doc/org-guide.org
index e23b2efa78..f53555f659 100644
--- a/doc/org-guide.org
+++ b/doc/org-guide.org
@@ -141,7 +141,7 @@ See [[*Miscellaneous]] for a setup to realize this.
Outlines make it possible to hide parts of the text in the buffer.
Org uses just two commands, bound to {{{kbd(TAB)}}} and
-{{{kbd{S-TAB)}}} to change the visibility in the buffer.
+{{{kbd(S-TAB)}}} to change the visibility in the buffer.
#+attr_texinfo: :sep ,
- {{{kbd(TAB)}}} ::
@@ -667,7 +667,7 @@ of the option ~org-todo-state-tags-triggers~ for details.
:DESCRIPTION: More than just on/off.
:END:
-You can use TODO keywords to indicate @emph{sequential} working progress
+You can use TODO keywords to indicate /sequential/ working progress
states:
#+begin_src emacs-lisp
@@ -1093,7 +1093,7 @@ a range of times---in a special format, either
=<2003-09-16 Tue>= or
=<2003-09-16 Tue 09:39>= or =<2003-09-16 Tue 12:00-12:30>=.
A timestamp can appear anywhere in the headline or body of an Org tree
entry. Its presence causes entries to be shown on specific dates in
-the agenda (see [[*The Weekly/daily Agenda]]). We distinguish:
+the agenda (see [[*The Weekly/Daily Agenda]]). We distinguish:
- Plain timestamp; Event; Appointment ::
@@ -1294,7 +1294,7 @@ a project.
a {{{kbd(C-u)}}} prefix argument, select the target task from a list
of recently clocked tasks.
-The {{{kbd(l)}}} key may be used in the agenda (see [[*The Weekly/daily
+The {{{kbd(l)}}} key may be used in the agenda (see [[*The Weekly/Daily
Agenda]]) to show which tasks have been worked on or closed during
a day.
@@ -1527,7 +1527,7 @@ commands:
#+attr_texinfo: :sep ,
- {{{kbd(a)}}} ::
- Create the calendar-like agenda (see [[*The Weekly/daily Agenda]]).
+ Create the calendar-like agenda (see [[*The Weekly/Daily Agenda]]).
- {{{kbd(t)}}}, {{{kbd(T)}}} ::
[elpa] externals/standard-themes 6e9e28b87e 2/4: Fix broken link in the manual
branch: externals/standard-themes commit 6e9e28b87ea301347b04fa89f89112423215503b Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Fix broken link in the manual --- README.org | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/README.org b/README.org index 23ac6433d0..1772b8e6fa 100644 --- a/README.org +++ b/README.org @@ -580,7 +580,7 @@ semantic mapping: The overrides can contain as many associations as the user needs. Changes to color values are reflected in the preview of the theme's -palette ([[#h:8dd67bf5-879e-46e5-b277-5bac141f53d1][Preview theme colors]]). They are shown at the top of the +palette ([[#h:1eebe221-0d0c-43e8-877a-202d2f15ef34][Preview theme colors]]). They are shown at the top of the buffer. In the above example, the first instance of =blue-warmer= is the override and the second is the original one.
[elpa] externals/standard-themes 839536724a 1/4: Implement system for palette overrides
branch: externals/standard-themes
commit 839536724a3daacee35983b6172948b7a9dbed69
Author: Protesilaos Stavrou
Commit: Protesilaos Stavrou
Implement system for palette overrides
---
README.org | 73 +
standard-dark-theme.el | 7 -
standard-light-theme.el | 7 -
standard-themes.el | 61 +++--
4 files changed, 131 insertions(+), 17 deletions(-)
diff --git a/README.org b/README.org
index 6cd1a29c3d..23ac6433d0 100644
--- a/README.org
+++ b/README.org
@@ -513,6 +513,79 @@ Other examples:
(setq standard-themes-region '(intense no-extend neutral))
#+end_src
+** Palette overrides
+:PROPERTIES:
+:CUSTOM_ID: h:34fe0582-960b-45dc-af5d-23c8f3e9d724
+:END:
+#+cindex: Override color values and semantic color mappings
+
+[ Part of {{{development-version}}}. ]
+
+The Standard themes define their own color palette as well as semantic
+color mappings. The former is the set of color values such as what
+shade of blue to use. The latter refers to associations between a
+color value and a syntactic construct, such as a =variable= for
+variables in programming modes or =heading-1= for level 1 headings in
+Org and others.
+
+The definition is stored in the variable =NAME-palette=, where =NAME=
+is the symbol of the theme, such as ~standard-light~. Overrides for
+those associations are specified in the variable =NAME-palette-overrides=.
+
+#+vindex: standard-themes-common-palette-overrides
+The variable ~standard-themes-common-palette-overrides~ is available
+for shared values. It is advised to only use this for mappings that
+do not specify a color value directly. This way, the text remains
+legible by getting the theme-specific color value it needs.
+
+All associations take the form of =(KEY VALUE)= pairs. For example,
+the ~standard-light-palette~ contains =(blue-warmer "#3a5fcd")=.
+Semantic color mappings are the same, though the =VALUE= is one of the
+named colors of the theme. For instance, ~standard-light-palette~
+maps the aforementioned like =(link blue-warmer)=.
+
+The easiest way to learn about a theme's definition is to use the
+command ~describe-variable~ (bound to =C-h v= by default) and then
+search for the =NAME-palette=. The resulting Help buffer will look
+like this:
+
+#+begin_example
+standard-light-palette is a variable defined in ‘standard-light-theme.el’.
+
+Its value is shown below.
+
+The ‘standard-light’ palette.
+
+ This variable may be risky if used as a file-local variable.
+
+Value:
+((bg-main "#ff")
+ (fg-main "#00")
+ (bg-dim "#ededed")
+
+[... Shortened for the purposes of this manual.]
+#+end_example
+
+The user can study this information to identify the overrides they
+wish to make. Then they can specify them and re-load the theme for
+changes to take effect. Sample of how to override a color value and a
+semantic mapping:
+
+#+begin_src emacs-lisp
+(setq standard-light-palette-overrides
+ '((blue-warmer "#5230ff") ; original value is #3a5fcd
+(variable blue-warmer))) ; original value is yellow-cooler
+#+end_src
+
+The overrides can contain as many associations as the user needs.
+
+Changes to color values are reflected in the preview of the theme's
+palette ([[#h:8dd67bf5-879e-46e5-b277-5bac141f53d1][Preview theme colors]]).
They are shown at the top of the
+buffer. In the above example, the first instance of =blue-warmer= is
+the override and the second is the original one.
+
+Contact me if you need further help with this.
+
* Loading a theme
:PROPERTIES:
:CUSTOM_ID: h:59c399d6-5dca-4686-b793-255be8bffc31
diff --git a/standard-dark-theme.el b/standard-dark-theme.el
index 1596dd4d8a..79d1a94b6c 100644
--- a/standard-dark-theme.el
+++ b/standard-dark-theme.el
@@ -214,7 +214,12 @@
(prose-verbatim magenta-warmer))
"The `standard-dark' palette.")
- (standard-themes-theme standard-dark standard-dark-palette)
+ (defvar standard-dark-palette-overrides nil
+"Overrides for `standard-dark-palette'.")
+
+ (standard-themes-theme standard-dark
+ standard-dark-palette
+ standard-dark-palette-overrides)
(provide-theme 'standard-dark))
diff --git a/standard-light-theme.el b/standard-light-theme.el
index fb00416092..8544c0be8a 100644
--- a/standard-light-theme.el
+++ b/standard-light-theme.el
@@ -214,7 +214,12 @@
(prose-verbatim magenta))
"The `standard-light' palette.")
- (standard-themes-theme standard-light standard-light-palette)
+ (defvar standard-light-palette-overrides nil
+"Overrides for `standard-light-palette'.")
+
+ (standard-themes-theme standard-light
+ standard-light-palette
+ standard-light-palette-overrides)
(provide-theme 'standard-light))
diff --git a/standard-themes.el b/standard-themes.el
index d310c03e02..1c84ce14a2 100644
--- a/standard-themes.el
+++ b/standard-themes.el
@@ -560
[elpa] externals/standard-themes updated (c21b591a71 -> 2a8d0d4545)
elpasync pushed a change to branch externals/standard-themes. from c21b591a71 Update the manual's Acknowledgements new 839536724a Implement system for palette overrides new 6e9e28b87e Fix broken link in the manual new a61b01d16e Add link to video demo for overrides new 2a8d0d4545 Fix references to symbols Summary of changes: README.org | 75 + standard-dark-theme.el | 7 - standard-light-theme.el | 7 - standard-themes.el | 61 ++-- 4 files changed, 133 insertions(+), 17 deletions(-)
[elpa] externals/standard-themes a61b01d16e 3/4: Add link to video demo for overrides
branch: externals/standard-themes
commit a61b01d16eba816a8489fb4e466f7f0062cf65d6
Author: Protesilaos Stavrou
Commit: Protesilaos Stavrou
Add link to video demo for overrides
---
README.org | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/README.org b/README.org
index 1772b8e6fa..1641db93ac 100644
--- a/README.org
+++ b/README.org
@@ -519,7 +519,9 @@ Other examples:
:END:
#+cindex: Override color values and semantic color mappings
-[ Part of {{{development-version}}}. ]
+[ Part of {{{development-version}}}. For a video demo of the same
+idea that I implemented in the ~modus-themes~, check:
+https://protesilaos.com/codelog/2022-12-17-modus-themes-v4-demo/. ]
The Standard themes define their own color palette as well as semantic
color mappings. The former is the set of color values such as what
[elpa] externals/standard-themes 2a8d0d4545 4/4: Fix references to symbols
branch: externals/standard-themes commit 2a8d0d4545e6be2f29b7f267d8f701905c29ee90 Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Fix references to symbols --- standard-themes.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/standard-themes.el b/standard-themes.el index 1c84ce14a2..2d3c432f2f 100644 --- a/standard-themes.el +++ b/standard-themes.el @@ -1984,12 +1984,12 @@ Helper function for `standard-themes-preview-colors'." ;;; Theme macros (defvar standard-themes-common-palette-overrides nil - "Set palette overrides for all the Modus themes. + "Set palette overrides for all the Standard themes. Mirror the elements of a theme's palette, overriding their value. The palette variables are named THEME-NAME-palette, while individual theme overrides are THEME-NAME-palette-overrides. The -THEME-NAME is one of the symbols in `modus-themes-items'. +THEME-NAME is one of the symbols in `standard-themes-items'. Individual theme overrides take precedence over these common overrides.")
[elpa] externals/rcirc-color 61fff284d1: Add support for listing faces in 'rcirc-colors'
branch: externals/rcirc-color commit 61fff284d1f95f6f52ed92e4939b26576b5bdae7 Author: Philip Kaludercic Commit: Philip Kaludercic Add support for listing faces in 'rcirc-colors' * rcirc-color.el (rcirc-colors): Modify the option type. (rcirc-color-is-deterministic): Update docstring. (rcirc-color-make-face): Add new function. (rcirc-color--facify): Use 'rcirc-color-make-face', which extracts and extends the previous functionality. The intention behind this change is to make it easier for themes to prepare a list of faces that suite the general appearance. --- rcirc-color.el | 42 +++--- 1 file changed, 27 insertions(+), 15 deletions(-) diff --git a/rcirc-color.el b/rcirc-color.el index 3c2248fa6e..d73e1fba6f 100644 --- a/rcirc-color.el +++ b/rcirc-color.el @@ -85,18 +85,21 @@ By default, all the non-grey colors that are very different from the default background are candidates. This uses `rcirc-color-distance' to compute distance between colors. -To check out the list, evaluate (list-colors-display rcirc-colors)." - :type '(repeat color)) +To check out the list, evaluate (list-colors-display rcirc-colors). + +This may also be defined as a list of faces, which themes can +customise." + :type '(choice (repeat :tag "List of colors" color) +(repeat :tag "List of faces" face))) (defvar rcirc-color-mapping (make-hash-table :test 'equal) "Hash-map mapping nicks to color names.") (defcustom rcirc-color-is-deterministic nil "Normally rcirc just assigns random colors to nicks. -These colors are based on the list in `rcirc-colors'. -If you set this variable to a non-nil value, an md5 hash is -computed based on the nickname and the first twelve bytes are -used to determine the color: #." +These colors are based on the list in `rcirc-colors'. If you set +this variable to a non-nil value, an md5 hash is computed based +on the nickname and it is used to index `rcirc-colors'." :type 'boolean) (defcustom rcirc-color-other-attributes nil @@ -104,21 +107,30 @@ used to determine the color: #." Example: (setq rcirc-color-other-attributes \\='(:weight bold))" :type 'plist) +(defun rcirc-color-make-face (nick) + "Return a face for NICK." + (let ((fg (nth (if rcirc-color-is-deterministic +(mod (string-to-number (md5 nick) 16) + (length rcirc-colors)) + (random (length rcirc-colors))) +rcirc-colors))) +(cond + ((stringp fg) + `(:foreground ,fg ,@rcirc-color-other-attributes)) + ((null rcirc-color-other-attributes) fg) + (`(:inherit ,fg ,@rcirc-color-other-attributes) (defun rcirc-color--facify (orig-fun string face &rest args) - "Add colors to other nicks based on `rcirc-colors'." + "Add colors to other nicks based on `rcirc-colors'. +This function is applied as advice over the ORIG-FUN +`rcirc-facify'. For detail on STRING and FACE, consult the +documentation for `rcirc-facify'. ARGS are any further arguments +that the function may be extended by in the future." (when (and (eq face 'rcirc-other-nick) (> (length string) 0)) (let ((cell (or (gethash string rcirc-color-mapping) (puthash (substring-no-properties string) - `(:foreground - ,(if rcirc-color-is-deterministic -(nth (mod (string-to-number (md5 string) 16) - (length rcirc-colors)) - rcirc-colors) - (elt rcirc-colors - (random (length rcirc-colors - ,@rcirc-color-other-attributes) +(rcirc-color-make-face string) rcirc-color-mapping (setq face (list cell (apply orig-fun string face args))
[nongnu] elpa/sweeprolog 3ec332cb23: Duplicate LaTeX label.
branch: elpa/sweeprolog
commit 3ec332cb23afbe7a97b5c39d8c6893485eed1b64
Author: Jan Wielemaker
Commit: Jan Wielemaker
Duplicate LaTeX label.
---
sweep.doc | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/sweep.doc b/sweep.doc
index a4c29c1756..c5ea0021d3 100644
--- a/sweep.doc
+++ b/sweep.doc
@@ -58,7 +58,7 @@ from the \texttt{sweep} Git repository:
\end{enumerate}
\section{Getting started}
-\label{sec:sweep-installation}
+\label{sec:sweep-getting-started}
After installing the \texttt{sweeprolog} Elisp library, load it into
Emacs:
[nongnu] elpa/rust-mode 1a370a4f2a 1/2: Automatically remove the redundant window after calling rustfmt. Fix the issue #475
branch: elpa/rust-mode commit 1a370a4f2a45f46505d8215176d1da43308c50bf Author: Michael Commit: Michael Automatically remove the redundant window after calling rustfmt. Fix the issue #475 --- rust-rustfmt.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rust-rustfmt.el b/rust-rustfmt.el index bb8864728c..9e53fe590c 100644 --- a/rust-rustfmt.el +++ b/rust-rustfmt.el @@ -67,7 +67,7 @@ (with-current-buffer buf (replace-buffer-contents rust-rustfmt-buffername)) (copy-to-buffer buf (point-min) (point-max - (kill-buffer)) + (kill-buffer-and-window)) ((= ret 3) (if (not (string= (buffer-string) (with-current-buffer buf (buffer-string
[nongnu] elpa/rust-mode 839bf7b1e1 2/2: Merge pull request #476 from imichael2e2/master
branch: elpa/rust-mode commit 839bf7b1e1e335c8ba8f04b247eb84076be0c50a Merge: c6f2e8a800 1a370a4f2a Author: brotzeit Commit: GitHub Merge pull request #476 from imichael2e2/master Fix the issue #475 --- rust-rustfmt.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rust-rustfmt.el b/rust-rustfmt.el index bb8864728c..9e53fe590c 100644 --- a/rust-rustfmt.el +++ b/rust-rustfmt.el @@ -67,7 +67,7 @@ (with-current-buffer buf (replace-buffer-contents rust-rustfmt-buffername)) (copy-to-buffer buf (point-min) (point-max - (kill-buffer)) + (kill-buffer-and-window)) ((= ret 3) (if (not (string= (buffer-string) (with-current-buffer buf (buffer-string
[elpa] externals/standard-themes ea10d73af8 1/2: Fix standard-themes--preview-colors-render
branch: externals/standard-themes commit ea10d73af88024287e91362bb7e6384f3b46e00d Author: Clemens Radermacher Commit: Protesilaos Stavrou Fix standard-themes--preview-colors-render --- standard-themes.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/standard-themes.el b/standard-themes.el index 2d3c432f2f..228bf06043 100644 --- a/standard-themes.el +++ b/standard-themes.el @@ -633,7 +633,7 @@ Run `standard-themes-post-load-hook' after loading the theme." Routine for `standard-themes-preview-colors'." (let ((palette (seq-remove (lambda (cell) (symbolp (cadr cell))) - (symbol-value (standard-themes--palette-value theme :overrides + (standard-themes--palette-value theme :overrides))) (current-buffer buffer) (current-theme theme)) (with-help-window buffer
[elpa] externals/standard-themes updated (2a8d0d4545 -> f73fdff38d)
elpasync pushed a change to branch externals/standard-themes. from 2a8d0d4545 Fix references to symbols new ea10d73af8 Fix standard-themes--preview-colors-render new f73fdff38d Acknowledge Clemens Radermacher for commit ea10d73 Summary of changes: README.org | 2 ++ standard-themes.el | 2 +- 2 files changed, 3 insertions(+), 1 deletion(-)
[elpa] externals/standard-themes f73fdff38d 2/2: Acknowledge Clemens Radermacher for commit ea10d73
branch: externals/standard-themes commit f73fdff38d22c0b536aa2aeea63d881e9a152cc6 Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Acknowledge Clemens Radermacher for commit ea10d73 --- README.org | 2 ++ 1 file changed, 2 insertions(+) diff --git a/README.org b/README.org index 1641db93ac..ff3e15c36c 100644 --- a/README.org +++ b/README.org @@ -1237,6 +1237,8 @@ matters. + Author/maintainer :: Protesilaos Stavrou. ++ Contributions to code :: Clemens Radermacher. + + Ideas and/or user feedback :: Fritz Grabo, Manuel Uberti. * GNU Free Documentation License
[nongnu] elpa/sweeprolog baed0db3b1 1/2: * (sweeprolog-menu): add entry for sweeprolog-infer-indent-style
branch: elpa/sweeprolog commit baed0db3b11578be2f220dcfac4bd40676eab054 Author: Eshel Yaron Commit: Eshel Yaron * (sweeprolog-menu): add entry for sweeprolog-infer-indent-style --- sweeprolog.el | 5 - 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/sweeprolog.el b/sweeprolog.el index f806209b48..e444867731 100644 --- a/sweeprolog.el +++ b/sweeprolog.el @@ -461,7 +461,10 @@ non-terminals)." sweeprolog-document-predicate-at-point (and (eq major-mode 'sweeprolog-mode) (sweeprolog-definition-at-point)) ] -[ "Update autoload directives" sweeprolog-update-dependencies t ] +[ "Update Autoload Directives" sweeprolog-update-dependencies + (eq major-mode 'sweeprolog-mode) ] +[ "Infer Indentation Style" sweeprolog-infer-indent-style + (eq major-mode 'sweeprolog-mode) ] "--" [ "Open top-level" sweeprolog-top-level t ] [ "Signal top-level"
[nongnu] elpa/sweeprolog updated (3ec332cb23 -> 7f9c04f36d)
elpasync pushed a change to branch elpa/sweeprolog. from 3ec332cb23 Duplicate LaTeX label. new baed0db3b1 * (sweeprolog-menu): add entry for sweeprolog-infer-indent-style new 7f9c04f36d FIXED: possible crash after calling sweeprolog-restart Summary of changes: sweeprolog.el | 7 ++- 1 file changed, 6 insertions(+), 1 deletion(-)
[nongnu] elpa/sweeprolog 7f9c04f36d 2/2: FIXED: possible crash after calling sweeprolog-restart
branch: elpa/sweeprolog commit 7f9c04f36dc9f6c0fe406526648d1f91712baa8e Author: Eshel Yaron Commit: Eshel Yaron FIXED: possible crash after calling sweeprolog-restart --- sweeprolog.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/sweeprolog.el b/sweeprolog.el index e444867731..0527235ccc 100644 --- a/sweeprolog.el +++ b/sweeprolog.el @@ -607,6 +607,8 @@ Otherwise set ARGS to nil." (user-error "Cannot restart sweep with running top-level processes"))) (message "Stoping sweep.") (sweeprolog-cleanup) + (setq sweeprolog--initialized nil +sweeprolog-prolog-server-port nil) (message "Starting sweep.") (apply #'sweeprolog-init args))
[nongnu] main d1d82e3c06 1/2: * Makefile (admin): Use https:// instead of git:// for the URI.
branch: main commit d1d82e3c069801f7d8fa8060e8a0975a1991e968 Author: Sean Whitton Commit: Sean Whitton * Makefile (admin): Use https:// instead of git:// for the URI. --- Makefile | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Makefile b/Makefile index 23a203cd93..94009397de 100644 --- a/Makefile +++ b/Makefile @@ -9,5 +9,5 @@ manifest.scm: admin admin: git remote add --no-tags -ft elpa-admin \ - gnu-elpa git://git.sv.gnu.org/emacs/elpa.git + gnu-elpa https://git.savannah.gnu.org/git/emacs/elpa.git git worktree add -b elpa-admin admin gnu-elpa/elpa-admin
[nongnu] main updated (7e1a099d7b -> 385623dca6)
spwhitton pushed a change to branch main. from 7e1a099d7b * elpa-packages (flx-ido): New package. new d1d82e3c06 * Makefile (admin): Use https:// instead of git:// for the URI. new 385623dca6 * elpa-packages (notmuch): New package. Summary of changes: Makefile | 2 +- elpa-packages | 19 +++ 2 files changed, 20 insertions(+), 1 deletion(-)
[nongnu] main 385623dca6 2/2: * elpa-packages (notmuch): New package.
branch: main
commit 385623dca63f5070bedde954bc4511497cfcaee0
Author: Sean Whitton
Commit: Sean Whitton
* elpa-packages (notmuch): New package.
---
elpa-packages | 19 +++
1 file changed, 19 insertions(+)
diff --git a/elpa-packages b/elpa-packages
index 8254411cb2..9dde563c0f 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -516,6 +516,25 @@
:ignored-files (".github" "tests" "Cask" "*.nix" "*.lock")
:news "CHANGELOG.md")
+ (notmuch :url "https://git.notmuchmail.org/git/notmuch";
+ :lisp-dir "emacs"
+ :ignored-files
+ ("emacs/make-deps.el" "emacs/Makefile*" "emacs/*.tmpl" "emacs/rstdoc.*"
+ "emacs/notmuch-emacs-mua*" "bindings" "compat" "completion" "contrib"
+ "debian" "devel" "doc" "lib" "packaging" "parse-time-string" "COPYING"
+ "performance-test" "test" "util" "vim" "*.c" "*.h" "configure"
+ "INSTALL" "Makefile*" "README.rst" "notmuch-git.py" "version.txt"
+ ".travis.yml" "sh.config" "sphinx.config" ".mailmap" "COPYING-GPL-3")
+ :make ("emacs/notmuch-pkg.el" "emacs/notmuch-version.el")
+ ;; FIXME: notmuch-pkg.el is not committed to Git.
+ ;; Upstream are amenable to making changes in this area, but they have a
+ ;; number of build targets that involve generated snapshot version numbers,
+ ;; and we would need to confirm that committing notmuch-pkg.el doesn't
+ ;; interfere too much with any of those.
+ ;; Alternatively, could we have elpa-admin run 'make emacs/notmuch-pkg.el'
+ ;; before looking for a version?
+ :version-map ((nil "0.37" "0.37")))
+
(oblivion-theme :url
"https://codeberg.org/ideasman42/emacs-theme-oblivion";)
(opam-switch-mode :url "https://github.com/ProofGeneral/opam-switch-mode";
[elpa] externals/hyperbole 796b38eecc: Use pattern substitution to derive the elc files (#291)
branch: externals/hyperbole commit 796b38eeccabb9b130820316167d3a622af0a184 Author: Mats Lidell Commit: GitHub Use pattern substitution to derive the elc files (#291) --- ChangeLog | 4 Makefile | 19 --- 2 files changed, 8 insertions(+), 15 deletions(-) diff --git a/ChangeLog b/ChangeLog index 52a1449def..d7a6b3c87a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2022-12-18 Mats Lidell + +* Makefile (ELC_COMPILE, ELC_KOTL): Use function to derive elc files. + 2022-12-03 Bob Weiner * hpath.el (hpath:expand-with-variable): Fix to expand from local dir first diff --git a/Makefile b/Makefile index a198872eae..d8fb898f6b 100644 --- a/Makefile +++ b/Makefile @@ -3,7 +3,7 @@ # Author: Bob Weiner # # Orig-Date:15-Jun-94 at 03:42:38 -# Last-Mod: 11-Oct-22 at 22:22:16 by Mats Lidell +# Last-Mod: 18-Dec-22 at 00:29:07 by Mats Lidell # # Copyright (C) 1994-2022 Free Software Foundation, Inc. # See the file HY-COPY for license information. @@ -191,20 +191,9 @@ EL_KOTL = kotl/kexport.el kotl/kfile.el kotl/kfill.el kotl/kimport.el kotl/klabe kotl/klink.el kotl/kmenu.el kotl/kotl-mode.el kotl/kotl-orgtbl.el \ kotl/kcell.el kotl/kproperty.el kotl/kview.el kotl/kvspec.el -ELC_COMPILE = hactypes.elc hibtypes.elc hib-debbugs.elc hib-doc-id.elc hib-kbd.elc \ -hib-social.elc hact.elc \ -hargs.elc hbdata.elc hbmap.elc hbut.elc hgnus.elc hhist.elc \ -hinit.elc hload-path.elc hmail.elc hmh.elc hmoccur.elc hmouse-info.elc \ -hmouse-drv.elc hmouse-key.elc hmouse-mod.elc hmouse-sh.elc hmouse-tag.elc \ -hpath.elc hrmail.elc hsettings.elc hsmail.elc hsys-org.elc hsys-www.elc hsys-youtube.elc htz.elc \ -hycontrol.elc hui-jmenu.elc hui-menu.elc hui-mini.elc hui-mouse.elc hui-select.elc \ -hui-treemacs.elc hui-window.elc hui.elc hvar.elc hversion.elc hvm.elc hypb.elc hyperbole.elc \ -hyrolo-demo.elc hyrolo-logic.elc hyrolo-menu.elc hyrolo.elc hywconfig.elc \ -set.elc hypb-ert.elc hui-dired-sidebar.elc hypb-maintenance.elc hui-register.elc - -ELC_KOTL = kotl/kexport.elc kotl/kfile.elc kotl/kfill.elc kotl/kimport.elc kotl/klabel.elc \ - kotl/klink.elc kotl/kmenu.elc kotl/kotl-mode.elc kotl/kotl-orgtbl.elc \ - kotl/kcell.elc kotl/kproperty.elc kotl/kview.elc kotl/kvspec.elc +ELC_COMPILE = $(EL_COMPILE:.el=.elc) + +ELC_KOTL = $(EL_KOTL:.el=.elc) HY-TALK = HY-TALK/.hypb HY-TALK/HYPB HY-TALK/HY-TALK.org
[nongnu] elpa/git-commit 010fec9cde: Link to Mastodon instead of Twitter
branch: elpa/git-commit commit 010fec9cdedb2cbe40fc92b0385823e9a21f9842 Author: Jonas Bernoulli Commit: Jonas Bernoulli Link to Mastodon instead of Twitter https://help.twitter.com/en/rules-and-policies/social-platforms-policy > Twitter is where the public conversation is happening, and where > people from all over the globe come to promote their businesses, > art, ideas, and more. We know that many of our users may be active > on other social media platforms; however, going forward, Twitter > will no longer allow free promotion of specific social media > platforms on Twitter. Fair enough. I no longer provide free promotion for Twitter either. --- README.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/README.md b/README.md index 761775e8f3..13e49eb1f1 100644 --- a/README.md +++ b/README.md @@ -5,7 +5,7 @@ https://magit.vc/manual";>manual | https://magit.vc/manual/magit/FAQ.html";>faq | https://github.com/magit/magit/wiki";>wiki | - https://twitter.com/magit_emacs";>news + https://mastodon.social/@tarsius";>mastodon
[nongnu] elpa/magit updated (99d9b3008a -> 010fec9cde)
elpasync pushed a change to branch elpa/magit. from 99d9b3008a magit-long-lived-branches: New variable adds 010fec9cde Link to Mastodon instead of Twitter No new revisions were added by this update. Summary of changes: README.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-)
[nongnu] elpa/magit-section updated (99d9b3008a -> 010fec9cde)
elpasync pushed a change to branch elpa/magit-section. from 99d9b3008a magit-long-lived-branches: New variable adds 010fec9cde Link to Mastodon instead of Twitter No new revisions were added by this update. Summary of changes: README.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-)
[elpa] externals/vertico-posframe updated (61a88aec07 -> 1401c911fc)
elpasync pushed a change to branch externals/vertico-posframe. from 61a88aec07 v0.5.5 new 5438a6949c Better support vertico-multiform. #24 new edc9a2cb0e v0.5.6 new 1401c911fc Fix typo Summary of changes: vertico-posframe.el | 39 +-- 1 file changed, 25 insertions(+), 14 deletions(-)
[elpa] externals/vertico-posframe edc9a2cb0e 2/3: v0.5.6
branch: externals/vertico-posframe commit edc9a2cb0ea05723fbbc7b039ab2ce7146626ae3 Author: Feng Shu Commit: Feng Shu v0.5.6 --- vertico-posframe.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index 9fecbc44e4..3a4ca69a67 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -5,7 +5,7 @@ ;; Author: Feng Shu ;; Maintainer: Feng Shu ;; URL: https://github.com/tumashu/vertico-posframe -;; Version: 0.5.5 +;; Version: 0.5.6 ;; Keywords: abbrev, convenience, matching, vertico ;; Package-Requires: ((emacs "26.0") (posframe "1.1.4") (vertico "0.13.0"))
[elpa] externals/vertico-posframe 5438a6949c 1/3: Better support vertico-multiform. #24
branch: externals/vertico-posframe commit 5438a6949cb5e40f5b2af9a11b427df7e66ca0fe Author: Feng Shu Commit: Feng Shu Better support vertico-multiform. #24 (setq vertico-multiform-commands '((consult-line posframe (vertico-posframe-poshandler . posframe-poshandler-frame-top-center)) (t buffer))) --- vertico-posframe.el | 37 - 1 file changed, 24 insertions(+), 13 deletions(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index 49a0ec28b4..9fecbc44e4 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -212,19 +212,30 @@ is called, window-point will be set to WINDOW-POINT." (let ((posframe ;; Some posframe poshandlers need infos of last-window. (with-selected-window (vertico-posframe-last-window) - (apply #'posframe-show - buffer - :font vertico-posframe-font - :poshandler vertico-posframe-poshandler - :background-color (face-attribute 'vertico-posframe :background nil t) - :foreground-color (face-attribute 'vertico-posframe :foreground nil t) - :border-width vertico-posframe-border-width - :border-color (vertico-posframe--get-border-color) - :override-parameters vertico-posframe-parameters - :refposhandler vertico-posframe-refposhandler - :hidehandler #'vertico-posframe-hidehandler - :lines-truncate vertico-posframe-truncate-lines - (funcall vertico-posframe-size-function) + ;; Variable settings in `vertico-multiform-commands' of + ;; will save to BUFFER as buffer-local variables, so we + ;; need to switch to BUFFER to get settings, for example: + ;; + ;; (setq vertico-multiform-commands + ;; '((consult-line + ;; posframe + ;; (vertico-posframe-poshandler . posframe-poshandler-frame-top-center)) + ;; (t buffer))) + ;; + (with-current-buffer buffer + (apply #'posframe-show +buffer +:font vertico-posframe-font +:poshandler vertico-posframe-poshandler +:background-color (face-attribute 'vertico-posframe :background nil t) +:foreground-color (face-attribute 'vertico-posframe :foreground nil t) +:border-width vertico-posframe-border-width +:border-color (vertico-posframe--get-border-color) +:override-parameters vertico-posframe-parameters +:refposhandler vertico-posframe-refposhandler +:hidehandler #'vertico-posframe-hidehandler +:lines-truncate vertico-posframe-truncate-lines +(funcall vertico-posframe-size-function)) ;; NOTE: `posframe-show' will force set window-point to 0, so we ;; need reset it again after `posframe-show'. (when (numberp window-point)
[elpa] externals/vertico-posframe 1401c911fc 3/3: Fix typo
branch: externals/vertico-posframe commit 1401c911fc86f40d13783e1b3ca5843d7e6041f0 Author: Feng Shu Commit: Feng Shu Fix typo --- vertico-posframe.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index 3a4ca69a67..e4e52f63d0 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -212,9 +212,9 @@ is called, window-point will be set to WINDOW-POINT." (let ((posframe ;; Some posframe poshandlers need infos of last-window. (with-selected-window (vertico-posframe-last-window) - ;; Variable settings in `vertico-multiform-commands' of - ;; will save to BUFFER as buffer-local variables, so we - ;; need to switch to BUFFER to get settings, for example: + ;; Variable settings in `vertico-multiform-commands' will + ;; save to BUFFER as buffer-local variables, so we need to + ;; switch to BUFFER to get settings, for example: ;; ;; (setq vertico-multiform-commands ;; '((consult-line
[elpa] externals/vertico-posframe 7913c2c5fa 1/2: Do not enable vertico-posframe when emacs do not support posframe.
branch: externals/vertico-posframe commit 7913c2c5fa0bc8969a7dd67b7f670bc97e65e7fe Author: Feng Shu Commit: Feng Shu Do not enable vertico-posframe when emacs do not support posframe. --- vertico-posframe.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index e4e52f63d0..9c71d13ddb 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -320,7 +320,8 @@ is called, window-point will be set to WINDOW-POINT." "Display Vertico in posframe instead of the minibuffer." :global t (cond - (vertico-posframe-mode + ((and vertico-posframe-mode + (posframe-workable-p)) (advice-add #'vertico--display-candidates :after #'vertico-posframe--display) (advice-add #'vertico--setup :after #'vertico-posframe--setup) (advice-add #'vertico--resize-window :override #'ignore))
[elpa] externals/vertico-posframe c40ec61fd5 2/2: v0.5.7
branch: externals/vertico-posframe commit c40ec61fd54dddb3a0e72a909099c20167804134 Author: Feng Shu Commit: Feng Shu v0.5.7 --- vertico-posframe.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index 9c71d13ddb..360ce0524d 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -5,7 +5,7 @@ ;; Author: Feng Shu ;; Maintainer: Feng Shu ;; URL: https://github.com/tumashu/vertico-posframe -;; Version: 0.5.6 +;; Version: 0.5.7 ;; Keywords: abbrev, convenience, matching, vertico ;; Package-Requires: ((emacs "26.0") (posframe "1.1.4") (vertico "0.13.0"))
[elpa] externals/vertico-posframe updated (1401c911fc -> c40ec61fd5)
elpasync pushed a change to branch externals/vertico-posframe. from 1401c911fc Fix typo new 7913c2c5fa Do not enable vertico-posframe when emacs do not support posframe. new c40ec61fd5 v0.5.7 Summary of changes: vertico-posframe.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-)
[elpa] externals/vertico-posframe f1b357efea 3/3: v0.5.8
branch: externals/vertico-posframe commit f1b357efeaec6625a6df98b3ae9b37d975e1ccf4 Author: Feng Shu Commit: Feng Shu v0.5.8 --- vertico-posframe.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index ab2cd626f4..165e068821 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -5,7 +5,7 @@ ;; Author: Feng Shu ;; Maintainer: Feng Shu ;; URL: https://github.com/tumashu/vertico-posframe -;; Version: 0.5.7 +;; Version: 0.5.8 ;; Keywords: abbrev, convenience, matching, vertico ;; Package-Requires: ((emacs "26.0") (posframe "1.1.4") (vertico "0.13.0"))
[elpa] externals/vertico-posframe updated (c40ec61fd5 -> f1b357efea)
elpasync pushed a change to branch externals/vertico-posframe. from c40ec61fd5 v0.5.7 new 0834bbbfd4 Do not switch to minibuffer to get buffer local value. new 2d1c388df4 Ignore files generated package-vc-install new f1b357efea v0.5.8 Summary of changes: .gitignore | 4 vertico-posframe.el | 63 ++--- 2 files changed, 35 insertions(+), 32 deletions(-) create mode 100644 .gitignore
[elpa] externals/vertico-posframe 2d1c388df4 2/3: Ignore files generated package-vc-install
branch: externals/vertico-posframe commit 2d1c388df46f688f81ca2eac30624bb54d8115c7 Author: Feng Shu Commit: Feng Shu Ignore files generated package-vc-install --- .gitignore | 4 1 file changed, 4 insertions(+) diff --git a/.gitignore b/.gitignore new file mode 100644 index 00..17e531d485 --- /dev/null +++ b/.gitignore @@ -0,0 +1,4 @@ +## Auto generated package-vc-install +/vertico-posframe-autoloads.el +/vertico-posframe-pkg.el +/vertico-posframe.elc
[elpa] externals/vertico-posframe 0834bbbfd4 1/3: Do not switch to minibuffer to get buffer local value.
branch: externals/vertico-posframe commit 0834bbbfd4def85677afd8a50dc2fe94d5756f47 Author: Feng Shu Commit: Feng Shu Do not switch to minibuffer to get buffer local value. --- vertico-posframe.el | 61 ++--- 1 file changed, 30 insertions(+), 31 deletions(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index 360ce0524d..ab2cd626f4 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -184,17 +184,17 @@ Optional argument FRAME ." "Hidehandler used by vertico-posframe." (not (minibufferp))) -(defun vertico-posframe-get-size () +(defun vertico-posframe-get-size (buffer) "The default functon used by `vertico-posframe-size-function'." (list - :height vertico-posframe-height - :width vertico-posframe-width - :min-height (or vertico-posframe-min-height + :height (buffer-local-value 'vertico-posframe-height buffer) + :width (buffer-local-value 'vertico-posframe-width buffer) + :min-height (or (buffer-local-value 'vertico-posframe-min-height buffer) (let ((height (+ vertico-count 1))) - (min height (or vertico-posframe-height height - :min-width (or vertico-posframe-min-width + (min height (or (buffer-local-value 'vertico-posframe-height buffer) height + :min-width (or (buffer-local-value 'vertico-posframe-min-width buffer) (let ((width (round (* (frame-width) 0.62 -(min width (or vertico-posframe-width width)) +(min width (or (buffer-local-value 'vertico-posframe-width buffer) width)) (defun vertico-posframe--display (_lines) "Display _LINES in posframe." @@ -212,30 +212,29 @@ is called, window-point will be set to WINDOW-POINT." (let ((posframe ;; Some posframe poshandlers need infos of last-window. (with-selected-window (vertico-posframe-last-window) - ;; Variable settings in `vertico-multiform-commands' will - ;; save to BUFFER as buffer-local variables, so we need to - ;; switch to BUFFER to get settings, for example: - ;; - ;; (setq vertico-multiform-commands - ;; '((consult-line - ;; posframe - ;; (vertico-posframe-poshandler . posframe-poshandler-frame-top-center)) - ;; (t buffer))) - ;; - (with-current-buffer buffer - (apply #'posframe-show -buffer -:font vertico-posframe-font -:poshandler vertico-posframe-poshandler -:background-color (face-attribute 'vertico-posframe :background nil t) -:foreground-color (face-attribute 'vertico-posframe :foreground nil t) -:border-width vertico-posframe-border-width -:border-color (vertico-posframe--get-border-color) -:override-parameters vertico-posframe-parameters -:refposhandler vertico-posframe-refposhandler -:hidehandler #'vertico-posframe-hidehandler -:lines-truncate vertico-posframe-truncate-lines -(funcall vertico-posframe-size-function)) + (apply #'posframe-show + buffer + :font (buffer-local-value 'vertico-posframe-font buffer) + ;; Variable settings in `vertico-multiform-commands' will + ;; save to BUFFER as buffer-local variables, so we need to + ;; get buffer local value from BUFFER, for example: + ;; + ;; (setq vertico-multiform-commands + ;; '((consult-line + ;; posframe + ;; (vertico-posframe-poshandler . posframe-poshandler-frame-top-center)) + ;; (t buffer))) + ;; + :poshandler (buffer-local-value 'vertico-posframe-poshandler buffer) + :background-color (face-attribute 'vertico-posframe :background nil t) + :foreground-color (face-attribute 'vertico-posframe :foreground nil t) + :border-width (buffer-local-value 'vertico-posframe-border-width buffer) + :border-color (vertico-posframe--get-border-color) + :override-parameters (buffer-local-value 'vertico-posframe-parameters buffer) + :refposhandler (buffer-local-value 'vertico-posframe-refposhandler buffer) + :hidehandler #'vertico-posframe-hidehandler + :lines-truncate (buffer-local-value 'vertico-posframe-truncate-lines buffer) + (funcall vertico-posframe-size-function buffer) ;; NOTE: `posframe-show' will force set window-point to 0, so we ;; need reset it again after `posframe-show'. (when (numberp wind
[elpa] externals/eev 636a3224bd: Added support for irc.libera.chat to find-here-links.
branch: externals/eev
commit 636a3224bdea40bfcb7a38f5e0f68677ab96f1e9
Author: Eduardo Ochs
Commit: Eduardo Ochs
Added support for irc.libera.chat to find-here-links.
---
ChangeLog | 5 +
VERSION | 4 ++--
eev-hlinks.el | 18 +-
3 files changed, 24 insertions(+), 3 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index 037a65f3ba..e8d17aad78 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2022-12-18 Eduardo Ochs
+
+ * eev-hlinks.el (ee-libera-bufferp, ee-find-libera-links)
+ (ee-fhl-main-program): added an `(:if (ee-libera-bufferp) ...)'.
+
2022-12-16 Eduardo Ochs
* eev-blinks.el (find-epackages): renamed to `find-epackages0'.
diff --git a/VERSION b/VERSION
index 98ee25a4f9..ce852891e1 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Fri Dec 16 04:57:38 GMT 2022
-Fri Dec 16 01:57:38 -03 2022
+Mon Dec 19 02:29:52 GMT 2022
+Sun Dec 18 23:29:52 -03 2022
diff --git a/eev-hlinks.el b/eev-hlinks.el
index fa1899a937..78cfcb638a 100644
--- a/eev-hlinks.el
+++ b/eev-hlinks.el
@@ -19,7 +19,7 @@
;;
;; Author: Eduardo Ochs
;; Maintainer: Eduardo Ochs
-;; Version:20221216
+;; Version: 20221218
;; Keywords: e-scripts
;;
;; Latest version: <http://angg.twu.net/eev-current/eev-hlinks.el>
@@ -302,6 +302,7 @@ which kind \"here\" the current buffer is."
(:if (ee-epackage-bufferp) (ee-find-epackage-links))
;;
;; Other cases:
+ (:if (ee-libera-bufferp) (ee-find-libera-links))
(:if (ee-file-bufferp)(ee-find-file-links))
(:if t'("" "Not implemented!" "See:"
(find-efunction 'ee-find-here-links)))
@@ -598,6 +599,21 @@ a single whitespace character, and the results are
`concat'-ed."
(defun ee-find-eww-links () `((find-eww ,(plist-get eww-data :url
(defun ee-find-w3m-links () `((find-w3m ,w3m-current-url)))
+;; Experimental, 2022dec18
+;; See: (find-eev "eev-rcirc.el" "find-libera")
+;;
+(defun ee-libera-bufferp ()
+ (and (boundp 'rcirc-server-buffer)
+ rcirc-server-buffer
+ (equal (with-rcirc-server-buffer rcirc-server)
+ "irc.libera.chat")))
+
+(defun ee-find-libera-links ()
+ `((find-libera ,rcirc-target)
+(find-libera-2a ,rcirc-target)
+(find-libera-3a ,rcirc-target)
+,(if buffer-file-name
+`(find-fline ,(ee-shorten-file-name buffer-file-name)
[elpa] externals/vertico-posframe 80b8721a8e: vertico-posframe-size-function use buffer local value.
branch: externals/vertico-posframe commit 80b8721a8edb7fbe3d599809ad95865e80de68fb Author: Feng Shu Commit: Feng Shu vertico-posframe-size-function use buffer local value. --- vertico-posframe.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index 165e068821..ee2dcd9030 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -234,7 +234,7 @@ is called, window-point will be set to WINDOW-POINT." :refposhandler (buffer-local-value 'vertico-posframe-refposhandler buffer) :hidehandler #'vertico-posframe-hidehandler :lines-truncate (buffer-local-value 'vertico-posframe-truncate-lines buffer) - (funcall vertico-posframe-size-function buffer) + (funcall (buffer-local-value 'vertico-posframe-size-function buffer) buffer) ;; NOTE: `posframe-show' will force set window-point to 0, so we ;; need reset it again after `posframe-show'. (when (numberp window-point)
[elpa] externals/ef-themes ac62af004e: Extend support for package-status-from-source face
branch: externals/ef-themes commit ac62af004ebfedf744401a69806d72d0294ca78b Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Extend support for package-status-from-source face --- ef-themes.el | 1 + 1 file changed, 1 insertion(+) diff --git a/ef-themes.el b/ef-themes.el index 0562f6d1a6..f1340ec715 100644 --- a/ef-themes.el +++ b/ef-themes.el @@ -1710,6 +1710,7 @@ Helper function for `ef-themes-preview-colors'." `(package-status-built-in ((,c :foreground ,builtin))) `(package-status-dependency ((,c :foreground ,warning))) `(package-status-disabled ((,c :inherit error :strike-through t))) +`(package-status-from-source ((,c :foreground ,type))) `(package-status-held ((,c :foreground ,warning))) `(package-status-incompat ((,c :inherit warning))) `(package-status-installed ((,c :foreground ,fg-alt)))
[elpa] externals/standard-themes e6890fb100: Extend support for package-status-from-source face
branch: externals/standard-themes commit e6890fb100cf55edc5756636e425c8de7dbe3756 Author: Protesilaos Stavrou Commit: Protesilaos Stavrou Extend support for package-status-from-source face --- standard-themes.el | 1 + 1 file changed, 1 insertion(+) diff --git a/standard-themes.el b/standard-themes.el index 228bf06043..ae3e312c1b 100644 --- a/standard-themes.el +++ b/standard-themes.el @@ -1740,6 +1740,7 @@ Helper function for `standard-themes-preview-colors'." `(package-status-built-in ((,c :foreground ,builtin))) `(package-status-dependency ((,c :foreground ,warning))) `(package-status-disabled ((,c :inherit error :strike-through t))) +`(package-status-from-source ((,c :foreground ,type))) `(package-status-held ((,c :foreground ,warning))) `(package-status-incompat ((,c :inherit warning))) `(package-status-installed ((,c :foreground ,fg-alt)))
[elpa] externals/vertico-posframe 33760e6ca5: v0.5.9
branch: externals/vertico-posframe commit 33760e6ca54c30d1eb56a84771d4ad9ccb3e2234 Author: Feng Shu Commit: Feng Shu v0.5.9 --- vertico-posframe.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/vertico-posframe.el b/vertico-posframe.el index ee2dcd9030..595794e953 100644 --- a/vertico-posframe.el +++ b/vertico-posframe.el @@ -5,7 +5,7 @@ ;; Author: Feng Shu ;; Maintainer: Feng Shu ;; URL: https://github.com/tumashu/vertico-posframe -;; Version: 0.5.8 +;; Version: 0.5.9 ;; Keywords: abbrev, convenience, matching, vertico ;; Package-Requires: ((emacs "26.0") (posframe "1.1.4") (vertico "0.13.0"))
[nongnu] elpa/eat 877a188021: ; * eat.el (eat-eshell-mode): Fix docstring typo
branch: elpa/eat
commit 877a188021086c11ab8973a126f846560167b7b0
Author: Akib Azmain Turja
Commit: Akib Azmain Turja
; * eat.el (eat-eshell-mode): Fix docstring typo
---
eat.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/eat.el b/eat.el
index f8601dbabb..e89ab2ea87 100644
--- a/eat.el
+++ b/eat.el
@@ -5806,7 +5806,7 @@ symbol `buffer', in which case the point of current
buffer is set."
;;;###autoload
(define-minor-mode eat-eshell-mode
- "Toggle Eat terminal emulation is Eshell."
+ "Toggle Eat terminal emulation in Eshell."
:global t
:lighter (eat--eshell-local-mode
(" Eat-Eshell"
[nongnu] elpa/rust-mode 4a3d13976a 1/2: rust-mode updated to the latest version for Eask test suites
branch: elpa/rust-mode commit 4a3d13976ae39b0c7df12ef0e2dc3eaf0579847e Author: Michael Commit: Michael rust-mode updated to the latest version for Eask test suites --- Eask | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Eask b/Eask index 4fa5043b28..de084a4e80 100644 --- a/Eask +++ b/Eask @@ -1,5 +1,5 @@ (package "rust-mode" - "1.0.4" + "1.0.5" "A major-mode for editing Rust source code") (website-url "https://github.com/rust-lang/rust-mode";)
[nongnu] elpa/rust-mode e2bb3b090e 2/2: Merge pull request #477 from imichael2e2/master
branch: elpa/rust-mode commit e2bb3b090eb247fdf711e2fb97cf78a2d29095eb Merge: 839bf7b1e1 4a3d13976a Author: brotzeit Commit: GitHub Merge pull request #477 from imichael2e2/master rust-mode updated to the latest version for Eask test suites --- Eask | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Eask b/Eask index 4fa5043b28..de084a4e80 100644 --- a/Eask +++ b/Eask @@ -1,5 +1,5 @@ (package "rust-mode" - "1.0.4" + "1.0.5" "A major-mode for editing Rust source code") (website-url "https://github.com/rust-lang/rust-mode";)
