[nongnu] elpa/cider f39e0b5201 1/2: Release CIDER 1.7
branch: elpa/cider commit f39e0b52014913f5acc1dc28ad94c68385c0834e Author: Bozhidar Batsov Commit: Bozhidar Batsov Release CIDER 1.7 --- CHANGELOG.md| 6 -- cider.el| 4 ++-- doc/antora.yml | 2 +- doc/modules/ROOT/pages/about/compatibility.adoc | 7 +++ 4 files changed, 14 insertions(+), 5 deletions(-) diff --git a/CHANGELOG.md b/CHANGELOG.md index 3fa4fdb3ed..f75b177d11 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -2,11 +2,13 @@ ## master (unreleased) +## 1.7.0 (2023-03-23) + ### New features - [#3314](https://github.com/clojure-emacs/cider/issues/3314): Detect `nrepl+unix` sockets (say via `lein nrepl :headless :socket nrepl.sock`). -- [#3262](https://github.com/clojure-emacs/cider/issues/3262): Add navigation functionality to `npfb` keys inside the data inspector's buffer. -- [#3310](https://github.com/clojure-emacs/cider/issues/3310): Add ability to use custom coordinates in jack-in-dependencies. +- [#3262](https://github.com/clojure-emacs/cider/issues/3262): Add navigation functionality to `n/p/f/b` keys inside the data inspector's buffer. +- [#3310](https://github.com/clojure-emacs/cider/issues/3310): Add ability to use custom coordinates in `cider-jack-in-dependencies`. - [cider-nrepl#766](https://github.com/clojure-emacs/cider-nrepl/issues/766): Complete local bindings for ClojureScript files. - [#3179](https://github.com/clojure-emacs/cider/issues/3179): Introduce `cider-jack-in-universal` to support jacking-in without a project from a set of pre-configured Clojure project tools. diff --git a/cider.el b/cider.el index b817a886f3..cea1ac548b 100644 --- a/cider.el +++ b/cider.el @@ -11,7 +11,7 @@ ;; Steve Purcell ;; Maintainer: Bozhidar Batsov ;; URL: http://www.github.com/clojure-emacs/cider -;; Version: 1.7.0-snapshot +;; Version: 1.7.0 ;; Package-Requires: ((emacs "26") (clojure-mode "5.16.0") (parseedn "1.0.6") (queue "0.2") (spinner "1.7") (seq "2.22") (sesman "0.3.2")) ;; Keywords: languages, clojure, cider @@ -93,7 +93,7 @@ (require 'sesman) (require 'package) -(defconst cider-version "1.7.0-snapshot" +(defconst cider-version "1.7.0" "The current version of CIDER.") (defconst cider-codename "Côte d'Azur" diff --git a/doc/antora.yml b/doc/antora.yml index fd9dacd593..8e6098d747 100644 --- a/doc/antora.yml +++ b/doc/antora.yml @@ -2,6 +2,6 @@ name: cider title: CIDER # We always provide version without patch here (e.g. 1.1), # as patch versions should not appear in the docs. -version: ~ +version: 1.7 nav: - modules/ROOT/nav.adoc diff --git a/doc/modules/ROOT/pages/about/compatibility.adoc b/doc/modules/ROOT/pages/about/compatibility.adoc index c3cc8e2d80..02d04b916b 100644 --- a/doc/modules/ROOT/pages/about/compatibility.adoc +++ b/doc/modules/ROOT/pages/about/compatibility.adoc @@ -141,6 +141,13 @@ Below you can find the official compatibility matrix for CIDER. | 8 | 1.8 +| 1.7 +| 26.1 +| 1.0 +| 0.30 +| 8 +| 1.8 + |=== TIP: You can also check the requirements of a particular CIDER version by inspecting
[nongnu] elpa/cider updated (10cc78675e -> a961ee3c4b)
elpasync pushed a change to branch elpa/cider. from 10cc78675e Pick a code name for the next release new f39e0b5201 Release CIDER 1.7 new a961ee3c4b Switch back the docs version Summary of changes: CHANGELOG.md| 6 -- cider.el| 4 ++-- doc/modules/ROOT/pages/about/compatibility.adoc | 7 +++ 3 files changed, 13 insertions(+), 4 deletions(-)
[nongnu] elpa/cider a961ee3c4b 2/2: Switch back the docs version
branch: elpa/cider commit a961ee3c4b64109f7a9f4cd52b842cc0290facb6 Author: Bozhidar Batsov Commit: Bozhidar Batsov Switch back the docs version --- doc/antora.yml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/doc/antora.yml b/doc/antora.yml index 8e6098d747..fd9dacd593 100644 --- a/doc/antora.yml +++ b/doc/antora.yml @@ -2,6 +2,6 @@ name: cider title: CIDER # We always provide version without patch here (e.g. 1.1), # as patch versions should not appear in the docs. -version: 1.7 +version: ~ nav: - modules/ROOT/nav.adoc
[elpa] externals/cape 3c1d66db6b: Add elixir-ts-mode to Aliases (#78)
branch: externals/cape commit 3c1d66db6baf4a8f3714add37ffdb35319518a86 Author: mohammedzeglam-pg <56762707+mohammedzeglam...@users.noreply.github.com> Commit: GitHub Add elixir-ts-mode to Aliases (#78) add support to [elixir-ts-mode](https://github.com/wkirschbaum/elixir-ts-mode.git) --- cape-keyword.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/cape-keyword.el b/cape-keyword.el index 84409bde7d..51eb0d5b78 100644 --- a/cape-keyword.el +++ b/cape-keyword.el @@ -379,7 +379,8 @@ (js-ts-mode javascript-mode) (python-ts-mode python-mode) (ruby-ts-mode ruby-mode) -(rust-ts-mode rust-mode)) +(rust-ts-mode rust-mode) +(elixir-ts-mode elixir-mode)) "Alist of major modes and keywords." :type 'alist :group 'cape)
[elpa] externals/transient 0ae0de4359: transient--invalid: Add special-case for anonymous inapt commands
branch: externals/transient commit 0ae0de43590b5b6984a83f9e044e7c426455ac6e Author: Jonas Bernoulli Commit: Jonas Bernoulli transient--invalid: Add special-case for anonymous inapt commands Closes #241. --- lisp/transient.el | 17 +++-- 1 file changed, 11 insertions(+), 6 deletions(-) diff --git a/lisp/transient.el b/lisp/transient.el index 840ab992d4..5c1b0a2ccf 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -2516,17 +2516,22 @@ prefix argument and pivot to `transient-update'." (defun transient--invalid (msg) (ding) - (message "%s: `%s' (Use `%s' to abort, `%s' for help) [%s]" + (message "%s: `%s' (Use `%s' to abort, `%s' for help)%s" msg (propertize (key-description (this-single-command-keys)) 'face 'font-lock-warning-face) (propertize "C-g" 'face 'transient-key) (propertize "?" 'face 'transient-key) - ;; `this-command' is `transient--undefined' or similar at this - ;; point. Show the command the user actually tried to invoke. - (propertize (symbol-name (transient--suffix-symbol - this-original-command)) - 'face 'font-lock-warning-face)) + ;; `this-command' is `transient-undefined' or `transient-inapt'. + ;; Show the command (`this-original-command') the user actually + ;; tried to invoke. For an anonymous inapt command that is a + ;; lambda expression, which cannot be mapped to a symbol, so + ;; forgo displaying the command. + (if-let ((cmd (ignore-errors + (symbol-name (transient--suffix-symbol + this-original-command) + (format " [%s]" (propertize cmd 'face 'font-lock-warning-face)) + "")) (unless (and transient--transient-map (memq transient--transient-map overriding-terminal-local-map)) (let ((transient--prefix (or transient--prefix 'sic)))
[elpa] externals/org 693df6fd90 1/2: lisp/org-clock.el: Add support for logind
branch: externals/org commit 693df6fd90daaa3c982450b5978d9c203d8b629f Author: Nathaniel Nicandro Commit: Ihor Radchenko lisp/org-clock.el: Add support for logind * lisp/org-timer.el (org-logind-dbus-session-path): New variable. (org-logind-user-idle-seconds): New function. (org-user-idle-seconds): Use them. * etc/ORG-NEWS (Add support for ~logind~ idle time in ~org-user-idle-seconds~): Document the new feature. --- etc/ORG-NEWS | 7 +++ lisp/org-clock.el | 30 ++ 2 files changed, 37 insertions(+) diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS index 4ca13af17b..4d45e65076 100644 --- a/etc/ORG-NEWS +++ b/etc/ORG-NEWS @@ -112,6 +112,13 @@ official [[https://clojure.org/guides/deps_and_cli][Clojure CLI tools]]. The command can be customized with ~ob-clojure-cli-command~. ** New features +*** Add support for ~logind~ idle time in ~org-user-idle-seconds~ + +When Emacs is built with =dbus= support and +the =org.freedesktop.login1= interface is available, fallback to +checking the =IdleSinceHint= property when +determining =org-user-idle-seconds= as the penultimate step. + *** ~org-metaup~ and ~org-metadown~ now act on headings in region When region is active and starts at a heading, ~org-metaup~ and diff --git a/lisp/org-clock.el b/lisp/org-clock.el index a300df8ff4..482b3c5a8f 100644 --- a/lisp/org-clock.el +++ b/lisp/org-clock.el @@ -51,6 +51,9 @@ (declare-function org-dynamic-block-define "org" (type func)) (declare-function w32-notification-notify "w32fns.c" (&rest params)) (declare-function w32-notification-close "w32fns.c" (&rest params)) +(declare-function dbus-list-activatable-names "dbus" (&optional bus)) +(declare-function dbus-call-method "dbus" (bus service path interface method &rest args)) +(declare-function dbus-get-property "dbus" (bus service path interface property)) (defvar org-frame-title-format-backup nil) (defvar org-state) @@ -1214,6 +1217,26 @@ If `only-dangling-p' is non-nil, only ask to resolve dangling "Return the current X11 idle time in seconds." (/ (string-to-number (shell-command-to-string org-clock-x11idle-program-name)) 1000)) +(defvar org-logind-dbus-session-path + (when (and (boundp 'dbus-runtime-version) + (require 'dbus nil t) + (member "org.freedesktop.login1" (dbus-list-activatable-names))) +(dbus-call-method + :system "org.freedesktop.login1" + "/org/freedesktop/login1" + "org.freedesktop.login1.Manager" + "GetSessionByPID" (emacs-pid))) + "D-Bus session path for the elogind interface.") + +(defun org-logind-user-idle-seconds () + "Return the number of idle seconds for the user according to logind." + (- (float-time) + (/ (dbus-get-property + :system "org.freedesktop.login1" + org-logind-dbus-session-path + "org.freedesktop.login1.Session" "IdleSinceHint") +1e6))) + (defun org-user-idle-seconds () "Return the number of seconds the user has been idle for. This routine returns a floating point number." @@ -1222,6 +1245,13 @@ This routine returns a floating point number." (org-mac-idle-seconds)) ((and (eq window-system 'x) org-x11idle-exists-p) (org-x11-idle-seconds)) + ((and + org-logind-dbus-session-path + (dbus-get-property + :system "org.freedesktop.login1" + org-logind-dbus-session-path + "org.freedesktop.login1.Session" "IdleHint")) +(org-logind-user-idle-seconds)) (t (org-emacs-idle-seconds
[elpa] externals/org 04087be6b3 2/2: lisp/org.el: Make predicates non-interactive
branch: externals/org commit 04087be6b3e78c4fc473a727d69694eb79d41001 Author: Aaron L. Zeng Commit: Ihor Radchenko lisp/org.el: Make predicates non-interactive * lisp/org.el (org-at-date-range-p): (org--math-p): (org-first-sibling-p): Remove interactive spec. Predicates like `org-first-sibling-p' are no use when called interactively, and should not appear in the M-x prompt. TINYCHANGE --- lisp/org.el | 3 --- 1 file changed, 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 23cb6012d8..20e6ea6d91 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -9876,7 +9876,6 @@ inactive time ranges. When this function returns a non-nil value, match data is set according to `org-tr-regexp-both' or `org-tr-regexp', depending on INACTIVE-OK." - (interactive) (save-excursion (catch 'exit (let ((pos (point))) @@ -15475,7 +15474,6 @@ If Org mode thinks that point is actually inside an embedded LaTeX environment, return t when the environment is math or let `texmathp' do its job otherwise. `\\[org-cdlatex-mode-map]'" - (interactive) (cond ((not (derived-mode-p 'org-mode)) (apply orig-fun args)) ((eq this-command 'cdlatex-math-symbol) @@ -20525,7 +20523,6 @@ point before the first headline or at point-min." (defun org-first-sibling-p () "Is this heading the first child of its parents?" - (interactive) (let ((re org-outline-regexp-bol) level l) (unless (org-at-heading-p t)
[elpa] externals/org updated (f7aa8c19f5 -> 04087be6b3)
elpasync pushed a change to branch externals/org. from f7aa8c19f5 ob-shell.el: Add async evaluation new 693df6fd90 lisp/org-clock.el: Add support for logind new 04087be6b3 lisp/org.el: Make predicates non-interactive Summary of changes: etc/ORG-NEWS | 7 +++ lisp/org-clock.el | 30 ++ lisp/org.el | 3 --- 3 files changed, 37 insertions(+), 3 deletions(-)
[elpa] externals/org 880782660a 1/2: ob-clojure.el: Reword docstring for ob-clojure-eval-with-cider
branch: externals/org commit 880782660a92ea0b01b99d233a9f950ea2dd9fee Author: Daniel Kraus Commit: Daniel Kraus ob-clojure.el: Reword docstring for ob-clojure-eval-with-cider * lisp/ob-clojure.el (ob-clojure-eval-with-cider): Mention in the docstring that the Babel params argument is not used anymore. --- lisp/ob-clojure.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/ob-clojure.el b/lisp/ob-clojure.el index 2b17516ecb..ec14004ac7 100644 --- a/lisp/ob-clojure.el +++ b/lisp/ob-clojure.el @@ -266,8 +266,9 @@ or set the `:backend' header argument" (reverse ob-clojure-inf-clojure-tmp-output) (defun ob-clojure-eval-with-cider (expanded _params &optional cljs-p) - "Evaluate EXPANDED code block with PARAMS using cider. -When CLJS-P is non-nil, use a cljs connection instead of clj." + "Evaluate EXPANDED code block using cider. +When CLJS-P is non-nil, use a cljs connection instead of clj. +The PARAMS from Babel are not used in this function." (org-require-package 'cider "Cider") (let ((connection (cider-current-connection (if cljs-p "cljs" "clj" (unless connection (sesman-start-session 'CIDER))
[elpa] externals/org 03d15dd724 2/2: org-logind-dbus-session-path: Fix CI tests failure
branch: externals/org commit 03d15dd7242536c6ee9368f6a96ec69f4a3d09f6 Author: Ihor Radchenko Commit: Ihor Radchenko org-logind-dbus-session-path: Fix CI tests failure * lisp/org-clock.el (org-logind-dbus-session-path): Do not try to use dbus when `dbus-call-method' errs. `dbus-call-method' may throw Debugger entered--Lisp error: (dbus-error "org.freedesktop.login1.NoSessionForPID" "PID 7361 does not belong to any known session") Do not try to use dbus method in such scenario. Link: https://builds.sr.ht/~bzg/job/961763 --- lisp/org-clock.el | 11 ++- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/lisp/org-clock.el b/lisp/org-clock.el index 482b3c5a8f..053050adb1 100644 --- a/lisp/org-clock.el +++ b/lisp/org-clock.el @@ -1221,11 +1221,12 @@ If `only-dangling-p' is non-nil, only ask to resolve dangling (when (and (boundp 'dbus-runtime-version) (require 'dbus nil t) (member "org.freedesktop.login1" (dbus-list-activatable-names))) -(dbus-call-method - :system "org.freedesktop.login1" - "/org/freedesktop/login1" - "org.freedesktop.login1.Manager" - "GetSessionByPID" (emacs-pid))) +(ignore-errors + (dbus-call-method + :system "org.freedesktop.login1" + "/org/freedesktop/login1" + "org.freedesktop.login1.Manager" + "GetSessionByPID" (emacs-pid "D-Bus session path for the elogind interface.") (defun org-logind-user-idle-seconds ()
[elpa] externals/org updated (04087be6b3 -> 03d15dd724)
elpasync pushed a change to branch externals/org. from 04087be6b3 lisp/org.el: Make predicates non-interactive new 880782660a ob-clojure.el: Reword docstring for ob-clojure-eval-with-cider new 03d15dd724 org-logind-dbus-session-path: Fix CI tests failure Summary of changes: lisp/ob-clojure.el | 5 +++-- lisp/org-clock.el | 11 ++- 2 files changed, 9 insertions(+), 7 deletions(-)
[nongnu] elpa/elpher updated (01494219e6 -> 2f66d418cf)
elpasync pushed a change to branch elpa/elpher. from 01494219e6 Opened issue regarding client certificate scope. new 786bf0699b Sensibly handle C-g when requesting gemini input. new 2f66d418cf Patch release. Summary of changes: RELEASE | 8 +++- config.mk | 2 +- elpher-pkg.el | 2 +- elpher.el | 21 - 4 files changed, 21 insertions(+), 12 deletions(-)
[nongnu] elpa/elpher 786bf0699b 1/2: Sensibly handle C-g when requesting gemini input.
branch: elpa/elpher commit 786bf0699b970d302e932d0d1004d7db182574d1 Author: plugd Commit: plugd Sensibly handle C-g when requesting gemini input. --- elpher.el | 17 ++--- 1 file changed, 10 insertions(+), 7 deletions(-) diff --git a/elpher.el b/elpher.el index 53ca1e4470..966e6595b7 100644 --- a/elpher.el +++ b/elpher.el @@ -1,6 +1,6 @@ ;;; elpher.el --- A friendly gopher and gemini client -*- lexical-binding: t -*- -;; Copyright (C) 2019-2022 Tim Vaughan +;; Copyright (C) 2019-2023 Tim Vaughan ;; Copyright (C) 2020-2022 Elpher contributors (See info manual for full list) ;; Author: Tim Vaughan @@ -1352,14 +1352,17 @@ that the response was malformed." (elpher-with-clean-buffer (insert "Gemini server is requesting input.")) (let* ((query-string - (if (eq (elt response-code 1) ?1) - (read-passwd (concat response-meta ": ")) - (read-string (concat response-meta ": " + (with-local-quit + (if (eq (elt response-code 1) ?1) + (read-passwd (concat response-meta ": ")) + (read-string (concat response-meta ": ") (query-address (seq-copy (elpher-page-address elpher-current-page))) (old-fname (url-filename query-address))) - (setf (url-filename query-address) - (concat old-fname "?" (url-build-query-string `((,query-string) - (elpher-get-gemini-response query-address renderer))) + (if (not query-string) + (elpher-visit-previous-page) + (setf (url-filename query-address) + (concat old-fname "?" (url-build-query-string `((,query-string) + (elpher-get-gemini-response query-address renderer (?2 ; Normal response (funcall renderer response-body response-meta)) (?3 ; Redirect
[nongnu] elpa/elpher 2f66d418cf 2/2: Patch release.
branch: elpa/elpher
commit 2f66d418cf4ed176b12c24eaadb5240b49da0448
Author: plugd
Commit: plugd
Patch release.
---
RELEASE | 8 +++-
config.mk | 2 +-
elpher-pkg.el | 2 +-
elpher.el | 4 ++--
4 files changed, 11 insertions(+), 5 deletions(-)
diff --git a/RELEASE b/RELEASE
index ade220dc7d..1a08de8688 100644
--- a/RELEASE
+++ b/RELEASE
@@ -7,9 +7,15 @@ When preparing a new release, set the version number:
2. in elpher.el: metadata at the top
3. in elpher.el: definition of elpher-version
4. in elpher-pkg.el: second argument to 'define-package'
+
+For anything besides a patch release, a note describing
+the changes should be added to the documentation. In
+the instance that the documentation itself is significantly
+changed, also update the documentation version:
+
5. in elpher.texi: 'settitle' declaration at the top
-Make sure the documentation is up to date and builds:
+After any documentation updates, make sure it builds:
make elpher.info elpher.html elpher.pdf
diff --git a/config.mk b/config.mk
index e406f6be4a..801cb557fb 100644
--- a/config.mk
+++ b/config.mk
@@ -1,5 +1,5 @@
PKG = elpher
-VERSION = 3.4.2
+VERSION = 3.4.3
INSTALLINFO = install-info
MAKEINFO= makeinfo
diff --git a/elpher-pkg.el b/elpher-pkg.el
index d7becef4aa..bb8d23f81a 100644
--- a/elpher-pkg.el
+++ b/elpher-pkg.el
@@ -1,4 +1,4 @@
-(define-package "elpher" "3.4.2" "A friendly gopher and gemini client"
+(define-package "elpher" "3.4.3" "A friendly gopher and gemini client"
'((emacs "27.1"))
:keywords ("convenience")
:authors (("Tim Vaughan" . "pl...@thelambdalab.xyz"))
diff --git a/elpher.el b/elpher.el
index 966e6595b7..bacb0472f2 100644
--- a/elpher.el
+++ b/elpher.el
@@ -5,7 +5,7 @@
;; Author: Tim Vaughan
;; Created: 11 April 2019
-;; Version: 3.4.2
+;; Version: 3.4.3
;; Keywords: comm gopher
;; Homepage: https://thelambdalab.xyz/elpher
;; Package-Requires: ((emacs "27.1"))
@@ -71,7 +71,7 @@
;;; Global constants
;;
-(defconst elpher-version "3.4.2"
+(defconst elpher-version "3.4.3"
"Current version of elpher.")
(defconst elpher-margin-width 6
[nongnu] elpa/gnuplot f99effa21f: Tokenize names with non-latin characters (#81)
branch: elpa/gnuplot
commit f99effa21f85a4c0963fec6a38e9112a8157d27e
Author: Andrea Greselin
Commit: GitHub
Tokenize names with non-latin characters (#81)
---
gnuplot-context.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/gnuplot-context.el b/gnuplot-context.el
index 859368faa5..dfa20195d3 100644
--- a/gnuplot-context.el
+++ b/gnuplot-context.el
@@ -296,7 +296,7 @@ name; otherwise continues tokenizing up to the token at
point. FIXME."
(token
(cond
((gnuplot-tokenize-by-regexps
- ("[A-Za-z_][A-Za-z0-9_]*" name)
+ ("[[:alpha:]_][[:alpha:]0-9_]*" name)
("[0-9]+\\(\\.[0-9]*\\)?\\([eE][+-]?[0-9]+\\)?\\|\\.[0-9]+\\([eE][+-]?[0-9]+\\)?"
number)
(gnuplot-operator-regexp operator)
(";" separator)))
[nongnu] elpa/git-commit 9f0f23fa25: manual: Fix key binding for magit-toggle-margin
branch: elpa/git-commit
commit 9f0f23fa25b4d60532147b48b79947d8365ced1f
Author: Christian Tietze
Commit: Jonas Bernoulli
manual: Fix key binding for magit-toggle-margin
---
docs/magit.org | 2 +-
docs/magit.texi | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/docs/magit.org b/docs/magit.org
index e8eef615ed..27d5051c80 100644
--- a/docs/magit.org
+++ b/docs/magit.org
@@ -2707,7 +2707,7 @@ the status buffer.
future sessions. Other existing buffers of the same type are not
affected because their local values have already been initialized.
-- Key: L t (magit-toggle-margin) ::
+- Key: L L (magit-toggle-margin) ::
Show or hide the margin.
diff --git a/docs/magit.texi b/docs/magit.texi
index 50338b8718..0f134e69aa 100644
--- a/docs/magit.texi
+++ b/docs/magit.texi
@@ -3370,8 +3370,8 @@ the same type as that of the current buffer, and saves
the value for
future sessions. Other existing buffers of the same type are not
affected because their local values have already been initialized.
-@item @kbd{L t} (@code{magit-toggle-margin})
-@kindex L t
+@item @kbd{L L} (@code{magit-toggle-margin})
+@kindex L L
@findex magit-toggle-margin
Show or hide the margin.
@end table
[nongnu] elpa/magit updated (a760dd1078 -> 9f0f23fa25)
elpasync pushed a change to branch elpa/magit. from a760dd1078 Only insert stderr into log and diff buffers on failure adds 9f0f23fa25 manual: Fix key binding for magit-toggle-margin No new revisions were added by this update. Summary of changes: docs/magit.org | 2 +- docs/magit.texi | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-)
[nongnu] elpa/magit-section updated (a760dd1078 -> 9f0f23fa25)
elpasync pushed a change to branch elpa/magit-section. from a760dd1078 Only insert stderr into log and diff buffers on failure adds 9f0f23fa25 manual: Fix key binding for magit-toggle-margin No new revisions were added by this update. Summary of changes: docs/magit.org | 2 +- docs/magit.texi | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-)
[elpa] externals/org 6c9104f59c: etc/ORG-NEWS: Announce :async header in ob-shell.el
branch: externals/org
commit 6c9104f59ca8085abe477a81857548461bf88f23
Author: Matthew Trzcinski
Commit: Matthew Trzcinski
etc/ORG-NEWS: Announce :async header in ob-shell.el
---
etc/ORG-NEWS | 44 +---
1 file changed, 25 insertions(+), 19 deletions(-)
diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS
index 4d45e65076..ac233a9867 100644
--- a/etc/ORG-NEWS
+++ b/etc/ORG-NEWS
@@ -138,6 +138,12 @@ selection.
TODO state, priority, tags, statistics cookies, and COMMENT keywords
are allowed in the tree structure.
+*** Asynchronous code evaluatation in ~ob-shell~
+
+Running shell blocks with the ~:session~ header freezes Emacs until
+execution completes. The new ~:async~ header allows users to continue
+editing with Emacs while a ~:session~ block executes.
+
** Miscellaneous
*** Remove undocumented ~:target~ header parameter in ~ob-clojure~
@@ -866,8 +872,8 @@ following snippet to allow multiple different ID formats in
Org files.
;; `org-attach-id-uuid-folder-format'.
(lambda (id)
(and (or (org-uuidgen-p id)
- (string-match-p "[0-9a-z]\\{12\\}" id))
- (org-attach-id-uuid-folder-format id)))
+ (string-match-p "[0-9a-z]\\{12\\}" id))
+ (org-attach-id-uuid-folder-format id)))
;; When ID looks like a timestamp-based ID. Group by year-month
;; folders.
(lambda (id)
@@ -1480,7 +1486,7 @@ Go through the buffer and ask for the replacement."
(goto-char (match-beginning 0))
(looking-at-p org-link-bracket-re))
(y-or-n-p "Fix link (remove TODO keyword)? "))
- (replace-match "[[*")
+ (replace-match "[[*")
(visible-mode -1))
#+end_src
@@ -2172,12 +2178,12 @@ removed.
"Change properties for Org-Attach."
(interactive)
(org-with-point-at 1
- (while (outline-next-heading)
- (let ((DIR (org--property-local-values "ATTACH_DIR" nil)))
- (when DIR
- (org-set-property "DIR" (car DIR))
- (org-delete-property "ATTACH_DIR"
- (org-delete-property-globally "ATTACH_DIR_INHERIT")))
+(while (outline-next-heading)
+ (let ((DIR (org--property-local-values "ATTACH_DIR" nil)))
+(when DIR
+ (org-set-property "DIR" (car DIR))
+ (org-delete-property "ATTACH_DIR"
+(org-delete-property-globally "ATTACH_DIR_INHERIT")))
#+end_src
For those who hate breaking changes, even though the changes are made
@@ -2702,14 +2708,14 @@ conditional on another entry. E.g. given this
configuration:
(defun custom/org-collect-confirmed (property)
"Return `PROPERTY' for `CONFIRMED' entries"
(let ((prop (org-entry-get nil property))
- (confirmed (org-entry-get nil "CONFIRMED")))
+ (confirmed (org-entry-get nil "CONFIRMED")))
(if (and prop (string= "[X]" confirmed))
- prop
- "0")))
+ prop
+"0")))
(setq org-columns-summary-types
- '(("X+" org-columns--summary-sum
- custom/org-collect-confirmed)))
+'(("X+" org-columns--summary-sum
+ custom/org-collect-confirmed)))
#+END_SRC
You can have a file =bananas.org= containing:
@@ -2944,11 +2950,11 @@ to the following
#+BEGIN_SRC elisp
(lambda (entry style project)
(cond ((not (directory-name-p entry))
-(format "[[file:%s][%s]]"
-(file-name-sans-extension entry)
-(org-publish-find-title entry project)))
- ((eq style 'tree) (file-name-nondirectory (directory-file-name entry)))
- (t entry)))
+ (format "[[file:%s][%s]]"
+ (file-name-sans-extension entry)
+ (org-publish-find-title entry project)))
+((eq style 'tree) (file-name-nondirectory (directory-file-name entry)))
+(t entry)))
#+END_SRC
*** Change signature for ~:sitemap-function~
[elpa] elpa-admin 2f33809406 1/2: * elpa-admin (elpaa--make-one-tarball): Preload copyright file
branch: elpa-admin commit 2f338094064f1a492c411e441554426a9663b9a3 Author: Stefan Monnier Commit: Stefan Monnier * elpa-admin (elpaa--make-one-tarball): Preload copyright file --- elpa-admin.el | 4 1 file changed, 4 insertions(+) diff --git a/elpa-admin.el b/elpa-admin.el index 95dcd8e0e6..3cd24d56ec 100644 --- a/elpa-admin.el +++ b/elpa-admin.el @@ -746,6 +746,10 @@ auxiliary files unless TARBALL-ONLY is non-nil ." (progn (elpaa--message "Tarball %s already built!" tarball) nil) +(when (file-readable-p elpaa--copyright-file) + ;; Eagerly load this file, so that any spurious "Followed link to" is + ;; emitted here rather than being included in the build failure report. + (find-file-noselect elpaa--copyright-file)) (let ((msg-start (with-current-buffer "*Messages*" (point-marker))) (res nil)) (message " Building tarball %s..." tarball)
[elpa] elpa-admin f414649d56 2/2: Merge remote-tracking branch 'refs/remotes/origin/elpa-admin' into elpa-admin
branch: elpa-admin commit f414649d56871664c154cdaac766b8464def1324 Merge: 2f33809406 4414fbecce Author: Stefan Monnier Commit: Stefan Monnier Merge remote-tracking branch 'refs/remotes/origin/elpa-admin' into elpa-admin --- elpa-admin.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/elpa-admin.el b/elpa-admin.el index 3cd24d56ec..7ee385d0a5 100644 --- a/elpa-admin.el +++ b/elpa-admin.el @@ -2637,7 +2637,8 @@ relative to elpa root." release-branch (elpaa--urtb pkg-spec "release") (if (not url) -(unless (elpaa--spec-member pkg-spec :url) +(unless (or (elpaa--spec-member pkg-spec :url) +(elpaa--spec-member pkg-spec :core)) (message "No upstream URL in %s for %s" elpaa--specs-file pkg)) (message "Fetching updates for %s..." pkg) (with-temp-buffer
[elpa] externals/embark 0c06b0058f 1/3: Make `embark-export` abide to `display-buffer-alist`
branch: externals/embark
commit 0c06b0058f9a8fafef46c86754661e0032562038
Author: Murilo Pereira
Commit: Murilo Pereira
Make `embark-export` abide to `display-buffer-alist`
This change makes it so that `buffer` is named before it is
`pop-to-buffer`'d to, so that the rules specified `display-buffer-alist`
can be matched by the Embark export buffer name patterns.
E.g., the following addition makes Embark export buffers show in a
side window.
```elisp
(add-to-list 'display-buffer-alist '("\\*Embark Export: .*"
(display-buffer-in-side-window)
```
---
embark.el | 16
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/embark.el b/embark.el
index 2f08fd7863..e049e02dc5 100644
--- a/embark.el
+++ b/embark.el
@@ -3118,17 +3118,17 @@ buffer."
(alist-get t embark-exporters-alist
(if (eq exporter 'embark-collect)
(embark-collect)
-(let ((after embark-after-export-hook)
- (cmd embark--command)
- (name (embark--descriptive-buffer-name 'export))
- (rerun (embark--rerun-function #'embark-export))
- (buffer (save-excursion
-(funcall exporter candidates)
-(current-buffer
+(let* ((after embark-after-export-hook)
+ (cmd embark--command)
+ (name (embark--descriptive-buffer-name 'export))
+ (rerun (embark--rerun-function #'embark-export))
+ (buffer (save-excursion
+ (funcall exporter candidates)
+ (rename-buffer name t)
+ (current-buffer
(embark--quit-and-run
(lambda ()
(pop-to-buffer buffer)
- (rename-buffer name t)
(setq embark--rerun-function rerun)
(use-local-map
(make-composed-keymap
[elpa] externals/embark 59f9a19a5f 3/3: Merge pull request #615 from mpereira/master
branch: externals/embark commit 59f9a19a5f3081216bf5f0ba546ab170c2ff419f Merge: 2a89517044 0c06b0058f Author: Omar Antolín Camarena Commit: GitHub Merge pull request #615 from mpereira/master Make `embark-export` abide to `display-buffer-alist` --- embark.el | 16 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/embark.el b/embark.el index 7eaf736b5c..c08fd9a4de 100644 --- a/embark.el +++ b/embark.el @@ -3120,17 +3120,17 @@ buffer." (alist-get t embark-exporters-alist (if (eq exporter 'embark-collect) (embark-collect) -(let ((after embark-after-export-hook) - (cmd embark--command) - (name (embark--descriptive-buffer-name 'export)) - (rerun (embark--rerun-function #'embark-export)) - (buffer (save-excursion -(funcall exporter candidates) -(current-buffer +(let* ((after embark-after-export-hook) + (cmd embark--command) + (name (embark--descriptive-buffer-name 'export)) + (rerun (embark--rerun-function #'embark-export)) + (buffer (save-excursion + (funcall exporter candidates) + (rename-buffer name t) + (current-buffer (embark--quit-and-run (lambda () (pop-to-buffer buffer) - (rename-buffer name t) (setq embark--rerun-function rerun) (use-local-map (make-composed-keymap
[elpa] externals/embark-consult updated (3ffb27a833 -> 59f9a19a5f)
elpasync pushed a change to branch externals/embark-consult. from 3ffb27a833 Clip org targets to narrowed portion of buffer adds 2a89517044 Set default-directory for non-interactive actions (fix #616) adds 0c06b0058f Make `embark-export` abide to `display-buffer-alist` adds 59f9a19a5f Merge pull request #615 from mpereira/master No new revisions were added by this update. Summary of changes: embark.el | 20 +++- 1 file changed, 11 insertions(+), 9 deletions(-)
[elpa] externals/embark updated (3ffb27a833 -> 59f9a19a5f)
elpasync pushed a change to branch externals/embark. from 3ffb27a833 Clip org targets to narrowed portion of buffer new 2a89517044 Set default-directory for non-interactive actions (fix #616) new 0c06b0058f Make `embark-export` abide to `display-buffer-alist` new 59f9a19a5f Merge pull request #615 from mpereira/master Summary of changes: embark.el | 20 +++- 1 file changed, 11 insertions(+), 9 deletions(-)
[elpa] externals/embark 2a89517044 2/3: Set default-directory for non-interactive actions (fix #616)
branch: externals/embark commit 2a89517044693381a1eeb058e3e7a41fc5ab5900 Author: Omar Antolín Commit: Omar Antolín Set default-directory for non-interactive actions (fix #616) --- embark.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/embark.el b/embark.el index 2f08fd7863..7eaf736b5c 100644 --- a/embark.el +++ b/embark.el @@ -1958,6 +1958,7 @@ minibuffer before executing the action." (when dedicate (set-window-dedicated-p dedicate nil))) (unless (eq final-window action-window) (select-window final-window + ;; TODO uniformize the command and non-interactive cases? (let ((argument (if multi (or (plist-get target :candidates) ; embark-act-all @@ -1968,7 +1969,8 @@ minibuffer before executing the action." (embark--run-action-hooks embark-pre-action-hooks action target quit) (unwind-protect -(let ((current-prefix-arg prefix)) +(let ((current-prefix-arg prefix) + (default-directory directory)) (funcall action argument)) (embark--run-action-hooks embark-post-action-hooks action target quit
