[elpa] externals/org updated (1a9d0850b6 -> a12d15df98)

[ELPA Syncer]

elpasync pushed a change to branch externals/org.

  from  1a9d0850b6 org-persist: Do not re-download url files on write
   new  4c90e0b613 org-table: Require org-fold-core
   new  8880cca3d6 ob-core: Revert space misalignment from recent commit
   new  a12d15df98 org-display-inline-remove-overlay: Do better job 
clearing images from cache


Summary of changes:
 lisp/ob-core.el   | 4 ++--
 lisp/org-table.el | 1 +
 lisp/org.el   | 4 
 3 files changed, 7 insertions(+), 2 deletions(-)

[elpa] externals/org 4c90e0b613 1/3: org-table: Require org-fold-core

[ELPA Syncer]

branch: externals/org
commit 4c90e0b613d48e248a5e6c235aea3e1229b444a9
Author: Kyle Meyer 
Commit: Ihor Radchenko 

org-table: Require org-fold-core

* lisp/org-table.el: Explicitly load org-fold-core.

'make single' warns that org-fold-core-ignore-modifications in
org-table.el (introduced a few commits back) is not known to be
defined, and the Emacs repo would show the same warning.
---
 lisp/org-table.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lisp/org-table.el b/lisp/org-table.el
index 7d02d896f5..fa9a0319be 100644
--- a/lisp/org-table.el
+++ b/lisp/org-table.el
@@ -41,6 +41,7 @@
 (require 'org-macs)
 (require 'org-compat)
 (require 'org-keys)
+(require 'org-fold-core)
 
 (declare-function calc-eval "calc" (str &optional separator &rest args))
 (declare-function face-remap-remove-relative "face-remap" (cookie))

[elpa] externals/org 8880cca3d6 2/3: ob-core: Revert space misalignment from recent commit

[ELPA Syncer]

branch: externals/org
commit 8880cca3d6448167c01be31e7fb290160c8c6736
Author: Kyle Meyer 
Commit: Ihor Radchenko 

ob-core: Revert space misalignment from recent commit

cc5427b7e (org-babel-result-to-file: Fix results file inside
attachment dir, 2022-12-07) carried along an unrelated white space
change upstream of the main change.
---
 lisp/ob-core.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/ob-core.el b/lisp/ob-core.el
index 62b0d36124..2fa9d8978d 100644
--- a/lisp/ob-core.el
+++ b/lisp/ob-core.el
@@ -2691,8 +2691,8 @@ specified as an an \"attachment:\" style link."
(same-directory?
(and base-file-name
 (not (string= (expand-file-name default-directory)
-(expand-file-name
- base-directory)
+  (expand-file-name
+   base-directory)
(request-attachment (eq type 'attachment))
(attach-dir (let* ((default-directory base-directory)
   (dir (org-attach-dir nil t)))

[elpa] externals/org a12d15df98 3/3: org-display-inline-remove-overlay: Do better job clearing images from cache

[ELPA Syncer]

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

org-display-inline-remove-overlay: Do better job clearing images from cache

* lisp/org.el (org-display-inline-remove-overlay): Force remove
overlay images from Emacs image cache when un-displaying inline image
overlays.  This change should: (1) slightly improve Emacs memory usage
when the number of inline images is large; (2) Clear images from cache
every time Emacs removes the overlay for any
reason.  (`org-display-inline-remove-overlay' is used in
overlay 'modification-hooks.)
---
 lisp/org.el | 4 
 1 file changed, 4 insertions(+)

diff --git a/lisp/org.el b/lisp/org.el
index 35adcc434b..ec56458df9 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -16364,6 +16364,10 @@ buffer boundaries with possible narrowing."
   "Remove inline-display overlay if a corresponding region is modified."
   (when (and ov after)
 (delete ov org-inline-image-overlays)
+;; Clear image from cache to avoid image not updating upon
+;; changing on disk.  See Emacs bug#59902.
+(when (overlay-get ov 'org-image-overlay)
+  (image-flush (overlay-get ov 'display)))
 (delete-overlay ov)))
 
 (defun org-remove-inline-images (&optional beg end)

[elpa] externals-release/org 41a8666c09: org-display-inline-remove-overlay: Do better job clearing images from cache

[ELPA Syncer]

branch: externals-release/org
commit 41a8666c09c702cb851b79a6f5eb3b3f0ba3e52b
Author: Ihor Radchenko 
Commit: Ihor Radchenko 

org-display-inline-remove-overlay: Do better job clearing images from cache

* lisp/org.el (org-display-inline-remove-overlay): Force remove
overlay images from Emacs image cache when un-displaying inline image
overlays.  This change should: (1) slightly improve Emacs memory usage
when the number of inline images is large; (2) Clear images from cache
every time Emacs removes the overlay for any
reason.  (`org-display-inline-remove-overlay' is used in
overlay 'modification-hooks.)
---
 lisp/org.el | 4 
 1 file changed, 4 insertions(+)

diff --git a/lisp/org.el b/lisp/org.el
index 19f94c5e23..3018e4d6fe 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -16399,6 +16399,10 @@ buffer boundaries with possible narrowing."
   "Remove inline-display overlay if a corresponding region is modified."
   (when (and ov after)
 (delete ov org-inline-image-overlays)
+;; Clear image from cache to avoid image not updating upon
+;; changing on disk.  See Emacs bug#59902.
+(when (overlay-get ov 'org-image-overlay)
+  (image-flush (overlay-get ov 'display)))
 (delete-overlay ov)))
 
 (defun org-remove-inline-images (&optional beg end)

[nongnu] elpa/eat updated (ab52caff52 -> 65dbbfcad3)

[ELPA Syncer]

elpasync pushed a change to branch elpa/eat.

  from  ab52caff52 ; Release version 0.2.1
   new  7891cae44b Synchronize scrolling and point properly
   new  aa0607e1cb Use Eshell "emacs" mode map when process is live
   new  917464cf56 * eat.el (eat-eshell-emacs-mode-map): Disable undo
   new  65dbbfcad3 * integration/bash: Check TERM before enabling


Summary of changes:
 eat.el   | 19 +++
 integration/bash |  4 +++-
 2 files changed, 18 insertions(+), 5 deletions(-)

[nongnu] elpa/eat 7891cae44b 1/4: Synchronize scrolling and point properly

[ELPA Syncer]

branch: elpa/eat
commit 7891cae44bc2fa25775d83e697d139c2a5eb8e8b
Author: Akib Azmain Turja 
Commit: Akib Azmain Turja 

Synchronize scrolling and point properly

* eat.el (eat--synchronize-scroll)
(eat--eshell-synchronize-scroll): Call 'set-window-point' in
addition to 'goto-char'.
---
 eat.el | 8 ++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/eat.el b/eat.el
index 197e507021..5fa15476e0 100644
--- a/eat.el
+++ b/eat.el
@@ -4756,7 +4756,9 @@ MODE should one of:
   "Synchronize scrolling and point between terminal and window."
   (when-let* ((window (get-buffer-window (current-buffer
 (set-window-start
- window (eat-term-display-beginning eat--terminal)))
+ window (eat-term-display-beginning eat--terminal))
+(set-window-point
+ window (eat-term-display-cursor eat--terminal)))
   (goto-char (eat-term-display-cursor eat--terminal)))
 
 (defun eat--setup-glyphless-chars ()
@@ -5539,7 +5541,9 @@ sane 2>%s ; if [ $1 = .. ]; then shift; fi; exec \"$@\""
(if (<= start-line 0)
(eat-term-display-beginning eat--terminal)
  (vertical-motion (- start-line))
- (point)))
+ (point))
+(set-window-point
+ window (eat-term-display-cursor eat--terminal)))
   (goto-char (eat-term-display-cursor eat--terminal)))
 
 (defun eat--eshell-update-cwd ()

[nongnu] elpa/eat aa0607e1cb 2/4: Use Eshell "emacs" mode map when process is live

[ELPA Syncer]

branch: elpa/eat
commit aa0607e1cb44b9f237ba2e5872333ed4dbb07f3e
Author: Akib Azmain Turja 
Commit: Akib Azmain Turja 

Use Eshell "emacs" mode map when process is live

* eat.el (eat-eshell-emacs-mode-map): Update docstring.
* eat.el (eat--eshell-process-running-mode): New
non-interactive minor mode.
* eat.el (eat--eshell-setup-proc-and-term): Enable
'eat--eshell-process-running-mode'.
* eat.el (eat--eshell-cleanup): Disable
'eat--eshell-process-running-mode'.
* eat.le (eat--eshell-local-mode): Don't use
'eat-eshell-emacs-mode-map' as the mode keymap.
---
 eat.el | 10 --
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/eat.el b/eat.el
index 5fa15476e0..bf7750f6fb 100644
--- a/eat.el
+++ b/eat.el
@@ -5234,7 +5234,7 @@ PROGRAM can be a shell command."
 (define-key map [remap eshell-toggle-direct-send] ; C-c M-d
 #'eat-eshell-char-mode)
 map)
-  "Keymap for Eat Eshell when no process is running.")
+  "Keymap for Eat Eshell \"emacs\" mode.")
 
 (defvar eat-eshell-semi-char-mode-map
   (let ((map (eat-term-make-keymap
@@ -5260,6 +5260,11 @@ PROGRAM can be a shell command."
 map)
   "Keymap for Eat Eshell char mode.")
 
+(define-minor-mode eat--eshell-process-running-mode
+  "Minor mode for \"emacs\" mode keymap when process is running."
+  :interactive nil
+  :keymap eat-eshell-emacs-mode-map)
+
 (define-minor-mode eat--eshell-semi-char-mode
   "Minor mode for semi-char mode keymap."
   :interactive nil
@@ -5381,6 +5386,7 @@ PROGRAM can be a shell command."
 (eat-term-redisplay eat--terminal)
 (setq-local eshell-output-filter-functions
 '(eat--eshell-output-filter))
+(eat--eshell-process-running-mode +1)
 (eat-eshell-semi-char-mode)))
 
 (defun eat--eshell-cleanup ()
@@ -5403,6 +5409,7 @@ PROGRAM can be a shell command."
   (kill-local-variable 'eshell-output-filter-functions)
   (eat--eshell-semi-char-mode -1)
   (eat--eshell-char-mode -1)
+  (eat--eshell-process-running-mode -1)
   (setq buffer-read-only nil
 
 (declare-function eshell-output-filter "esh-mode" (process string))
@@ -5553,7 +5560,6 @@ sane 2>%s ; if [ $1 = .. ]; then shift; fi; exec \"$@\""
 (define-minor-mode eat--eshell-local-mode
   "Toggle Eat terminal emulation is Eshell."
   :interactive nil
-  :keymap eat-eshell-emacs-mode-map
   (let ((locals '(cursor-type
   glyphless-char-display
   track-mouse

[nongnu] elpa/eat 65dbbfcad3 4/4: * integration/bash: Check TERM before enabling

[ELPA Syncer]

branch: elpa/eat
commit 65dbbfcad352f674095740c2026b57b6981d90eb
Author: Akib Azmain Turja 
Commit: Akib Azmain Turja 

* integration/bash: Check TERM before enabling
---
 integration/bash | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/integration/bash b/integration/bash
index 03ca465436..56a4129cbd 100644
--- a/integration/bash
+++ b/integration/bash
@@ -105,7 +105,9 @@ __eat_enable_integration ()
 }
 
 # Enable.
-test -z "$__eat_integration_enabled" && __eat_enable_integration
+test -z "$__eat_integration_enabled" && \
+  test "${TERM:0:4}" = "eat-" && \
+  __eat_enable_integration
 
 # Local Variables:
 # mode: sh

[nongnu] elpa/eat 917464cf56 3/4: * eat.el (eat-eshell-emacs-mode-map): Disable undo

[ELPA Syncer]

branch: elpa/eat
commit 917464cf561dc430fdcf503499ee19b255927a7e
Author: Akib Azmain Turja 
Commit: Akib Azmain Turja 

* eat.el (eat-eshell-emacs-mode-map): Disable undo
---
 eat.el | 1 +
 1 file changed, 1 insertion(+)

diff --git a/eat.el b/eat.el
index bf7750f6fb..941e3d7d50 100644
--- a/eat.el
+++ b/eat.el
@@ -5233,6 +5233,7 @@ PROGRAM can be a shell command."
 (define-key map [?\C-c ?\C-j] #'eat-eshell-semi-char-mode)
 (define-key map [remap eshell-toggle-direct-send] ; C-c M-d
 #'eat-eshell-char-mode)
+(define-key map [remap undo] #'undefined) ; Disable `undo'.
 map)
   "Keymap for Eat Eshell \"emacs\" mode.")
 

[elpa] externals/consult 962f19837d 1/2: Highlight all matches of each regexp in consult-grep (#699)

[ELPA Syncer]

branch: externals/consult
commit 962f19837dbbc98df8b6ffe4c9a4a62edc700e75
Author: Augusto Stoffel 
Commit: GitHub 

Highlight all matches of each regexp in consult-grep (#699)
---
 consult.el | 22 --
 1 file changed, 12 insertions(+), 10 deletions(-)

diff --git a/consult.el b/consult.el
index c79f947c28..98fd381b73 100644
--- a/consult.el
+++ b/consult.el
@@ -655,16 +655,18 @@ If no capturing groups are used highlight the whole 
match. Case is ignored
 if IGNORE-CASE is non-nil."
   (let ((case-fold-search ignore-case))
 (dolist (re regexps)
-  (when (string-match re str)
-;; Unfortunately there is no way to avoid the allocation of the match
-;; data, since the number of capturing groups is unknown.
-(let ((m (match-data)))
-  (setq m (or (cddr m) m))
-  (while m
-(when (car m)
-  (add-face-text-property (car m) (cadr m)
-  'consult-highlight-match nil str))
-(setq m (cddr m
+  (let ((i 0))
+(while (string-match re str i)
+  ;; Unfortunately there is no way to avoid the allocation of the match
+  ;; data, since the number of capturing groups is unknown.
+  (let ((m (match-data)))
+(setq i (cadr m))
+(setq m (or (cddr m) m))
+(while m
+  (when (car m)
+(add-face-text-property (car m) (cadr m)
+'consult-highlight-match nil str))
+  (setq m (cddr m)
 
 (defconst consult--convert-regexp-table
   (append

[elpa] externals/consult b404039f56 2/2: Minor cleanup

[ELPA Syncer]

branch: externals/consult
commit b404039f567ce296823425b641b2348482a1750e
Author: Daniel Mendler 
Commit: Daniel Mendler 

Minor cleanup
---
 consult.el | 27 +--
 1 file changed, 13 insertions(+), 14 deletions(-)

diff --git a/consult.el b/consult.el
index 98fd381b73..1fe3a45779 100644
--- a/consult.el
+++ b/consult.el
@@ -653,20 +653,19 @@ Return cons of point position and a list of match 
begin/end pairs."
 If a regular expression contains capturing groups, only these are highlighted.
 If no capturing groups are used highlight the whole match. Case is ignored
 if IGNORE-CASE is non-nil."
-  (let ((case-fold-search ignore-case))
-(dolist (re regexps)
-  (let ((i 0))
-(while (string-match re str i)
-  ;; Unfortunately there is no way to avoid the allocation of the match
-  ;; data, since the number of capturing groups is unknown.
-  (let ((m (match-data)))
-(setq i (cadr m))
-(setq m (or (cddr m) m))
-(while m
-  (when (car m)
-(add-face-text-property (car m) (cadr m)
-'consult-highlight-match nil str))
-  (setq m (cddr m)
+  (dolist (re regexps)
+(let ((i 0))
+  (while (let ((case-fold-search ignore-case))
+   (string-match re str i))
+;; Unfortunately there is no way to avoid the allocation of the match
+;; data, since the number of capturing groups is unknown.
+(let ((m (match-data)))
+  (setq i (cadr m) m (or (cddr m) m))
+  (while m
+(when (car m)
+  (add-face-text-property (car m) (cadr m)
+  'consult-highlight-match nil str))
+(setq m (cddr m
 
 (defconst consult--convert-regexp-table
   (append

[elpa] externals/consult updated (6161f60ecd -> b404039f56)

[ELPA Syncer]

elpasync pushed a change to branch externals/consult.

  from  6161f60ecd Drop Selectrum support
   new  962f19837d Highlight all matches of each regexp in consult-grep 
(#699)
   new  b404039f56 Minor cleanup


Summary of changes:
 consult.el | 9 +
 1 file changed, 5 insertions(+), 4 deletions(-)

[nongnu] elpa/eat 731ead9bfb: ; * .gitignore: New file

[ELPA Syncer]

branch: elpa/eat
commit 731ead9bfbf5ea101fdaaa059b5a1ebfd41fd02b
Author: Akib Azmain Turja 
Commit: Akib Azmain Turja 

; * .gitignore: New file
---
 .gitignore | 6 ++
 1 file changed, 6 insertions(+)

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 00..01feb68f9c
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,6 @@
+eat.elc
+eat-tests.elc
+term/eat.elc
+# Generated by 'package-vc-install'.
+eat-pkg.el
+eat-autoloads.el

[elpa] externals/ef-themes 4c9b68869d: Remove bold from magit-diff-hunk-heading

[ELPA Syncer]

branch: externals/ef-themes
commit 4c9b68869d1baacb10afc47bdd31368a5377d1fa
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

Remove bold from magit-diff-hunk-heading

Inactive diff hunk headings do not need to be bold, as they are
already easy to tell apart from their context.  The added bold is
useful for the currently selected diff hunk, as it draws attention to
it.
---
 ef-themes.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-themes.el b/ef-themes.el
index 9da8a3b8c6..b37ce941cc 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -1355,7 +1355,7 @@ Helper function for `ef-themes-preview-colors'."
 `(magit-diff-file-heading ((,c :inherit bold :foreground ,accent-0)))
 `(magit-diff-file-heading-highlight ((,c :inherit magit-diff-file-heading 
:background ,bg-alt)))
 `(magit-diff-file-heading-selection ((,c :inherit bold :background 
,bg-hover-alt :foreground ,fg-intense)))
-`(magit-diff-hunk-heading ((,c :inherit bold :background ,bg-alt)))
+`(magit-diff-hunk-heading ((,c :background ,bg-alt)))
 `(magit-diff-hunk-heading-highlight ((,c :inherit bold :background 
,bg-active :foreground ,fg-intense)))
 `(magit-diff-hunk-heading-selection ((,c :inherit bold :background 
,bg-hover-alt :foreground ,fg-intense)))
 `(magit-diff-hunk-region ((,c :inherit bold)))

[nongnu] elpa/eat fffca2c06e: Check whether 'yank-transform-functions' is bound

[ELPA Syncer]

branch: elpa/eat
commit fffca2c06ea5c51fcc6e90e05e67b30a8f5ec6dd
Author: Akib Azmain Turja 
Commit: Akib Azmain Turja 

Check whether 'yank-transform-functions' is bound

* eat.el (eat-yank, eat-yank-from-kill-ring): Check whether
'yank-transform-functions' is bound before using it's value.
The variable is not available in Emacs 28.
---
 eat.el | 22 --
 1 file changed, 12 insertions(+), 10 deletions(-)

diff --git a/eat.el b/eat.el
index 941e3d7d50..deecfce428 100644
--- a/eat.el
+++ b/eat.el
@@ -4581,11 +4581,12 @@ ARG is passed to `yank', which see."
   (when eat--terminal
 (funcall eat--synchronize-scroll-function)
 (eat-send-string-as-yank
- eat--terminal (let ((yank-hook yank-transform-functions))
- (with-temp-buffer
-   (setq-local yank-transform-functions yank-hook)
-   (yank arg)
-   (buffer-string))
+ eat--terminal
+ (let ((yank-hook (bound-and-true-p yank-transform-functions)))
+   (with-temp-buffer
+ (setq-local yank-transform-functions yank-hook)
+ (yank arg)
+ (buffer-string))
 
 (defun eat-yank-from-kill-ring (string &optional arg)
   "Same as `yank-from-kill-ring', but for Eat.
@@ -4596,11 +4597,12 @@ STRING and ARG are passed to `yank-pop', which see."
   (when eat--terminal
 (funcall eat--synchronize-scroll-function)
 (eat-send-string-as-yank
- eat--terminal (let ((yank-hook yank-transform-functions))
- (with-temp-buffer
-   (setq-local yank-transform-functions yank-hook)
-   (yank-from-kill-ring string arg)
-   (buffer-string))
+ eat--terminal
+ (let ((yank-hook (bound-and-true-p yank-transform-functions)))
+   (with-temp-buffer
+ (setq-local yank-transform-functions yank-hook)
+ (yank-from-kill-ring string arg)
+ (buffer-string))
 
 ;; When changing these keymaps, be sure to update the manual, README
 ;; and commentary.

[elpa] externals/standard-themes f0d1f81be4: standard-dark-theme: refine bg-hl-line

[ELPA Syncer]

branch: externals/standard-themes
commit f0d1f81be433af76830ae87b6c44595b187639ef
Author: Protesilaos Stavrou 
Commit: Protesilaos Stavrou 

standard-dark-theme: refine bg-hl-line

This makes it easier to read the underlying text of the currently
highlighted line in hl-line-mode.

Thanks to Manuel Uberti for the feedback on the mailing list:

.
---
 README.org | 13 +
 standard-dark-theme.el |  2 +-
 2 files changed, 14 insertions(+), 1 deletion(-)

diff --git a/README.org b/README.org
index 43c455e148..f6319be9a5 100644
--- a/README.org
+++ b/README.org
@@ -1151,6 +1151,19 @@ unwillingness to be good Emacs citizens:
 
 The above list is non-exhaustive though you get the idea.
 
+* Acknowledgements
+:PROPERTIES:
+:CUSTOM_ID: h:20e79476-6975-4643-838f-a77dfa92627a
+:END:
+#+cindex: Contributors
+
+This project is meant to be a collective effort.  Every bit of help
+matters.
+
++ Author/maintainer :: Protesilaos Stavrou.
+
++ Ideas and/or user feedback :: Manuel Uberti.
+
 * GNU Free Documentation License
 :PROPERTIES:
 :CUSTOM_ID: h:255fa624-6e3c-4118-9618-17cc25a801bd
diff --git a/standard-dark-theme.el b/standard-dark-theme.el
index 47960eb59b..1596dd4d8a 100644
--- a/standard-dark-theme.el
+++ b/standard-dark-theme.el
@@ -130,7 +130,7 @@
   (bg-completion "#254b5f")
   (bg-hover  "#457b2f")
   (bg-hover-alt  "#00688b")
-  (bg-hl-line"#556b2f")
+  (bg-hl-line"#334815")
   (bg-region "#cd")
   (bg-paren  "#4f94cd")
   (bg-err"#3f0d09") ; check with err

[nongnu] elpa/eat 6756e72d88: ; Release version 0.2.2

[ELPA Syncer]

branch: elpa/eat
commit 6756e72d88327a25ab993d69a3e4573bdbb162ff
Author: Akib Azmain Turja 
Commit: Akib Azmain Turja 

; Release version 0.2.2

* eat.el:
* eat.texi:
Bump version.
* ChangeLog: Update.
---
 ChangeLog | 36 
 eat.el|  2 +-
 eat.texi  |  4 ++--
 3 files changed, 39 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 6be5d574fc..c42cf4768f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,39 @@
+2022-12-11  Akib Azmain Turja  
+
+   Check whether 'yank-transform-functions' is bound
+
+   * eat.el (eat-yank, eat-yank-from-kill-ring): Check whether
+   'yank-transform-functions' is bound before using it's value.
+   The variable is not available in Emacs 28.
+
+2022-12-11  Akib Azmain Turja  
+
+   * integration/bash: Check TERM before enabling
+
+   * eat.el (eat-eshell-emacs-mode-map): Disable undo
+
+2022-12-11  Akib Azmain Turja  
+
+   Use Eshell "emacs" mode map when process is live
+
+   * eat.el (eat-eshell-emacs-mode-map): Update docstring.
+   * eat.el (eat--eshell-process-running-mode): New
+   non-interactive minor mode.
+   * eat.el (eat--eshell-setup-proc-and-term): Enable
+   'eat--eshell-process-running-mode'.
+   * eat.el (eat--eshell-cleanup): Disable
+   'eat--eshell-process-running-mode'.
+   * eat.le (eat--eshell-local-mode): Don't use
+   'eat-eshell-emacs-mode-map' as the mode keymap.
+
+2022-12-11  Akib Azmain Turja  
+
+   Synchronize scrolling and point properly
+
+   * eat.el (eat--synchronize-scroll)
+   (eat--eshell-synchronize-scroll): Call 'set-window-point' in
+   addition to 'goto-char'.
+
 2022-12-11  Akib Azmain Turja  
 
Fix invoking commands with eshell/sudo from Tramp
diff --git a/eat.el b/eat.el
index deecfce428..de48353f39 100644
--- a/eat.el
+++ b/eat.el
@@ -4,7 +4,7 @@
 
 ;; Author: Akib Azmain Turja 
 ;; Created: 2022-08-15
-;; Version: 0.2.1
+;; Version: 0.2.2
 ;; Package-Requires: ((emacs "28.1"))
 ;; Keywords: terminals processes
 ;; Homepage: https://codeberg.org/akib/emacs-eat
diff --git a/eat.texi b/eat.texi
index 4b335de99a..19423a6901 100644
--- a/eat.texi
+++ b/eat.texi
@@ -3,8 +3,8 @@
 @comment %**start of header
 @setfilename eat.info
 @set UPDATED 10 December 2022
-@set EDITION 0.2.1
-@set VERSION 0.2.1
+@set EDITION 0.2.2
+@set VERSION 0.2.2
 @documentencoding UTF-8
 @codequotebacktick on
 @codequoteundirected on

[elpa] externals/vertico 89987d9df5: vertico-buffer: Avoid using 'buffer-local-value' as a gv (#274)

[ELPA Syncer]

branch: externals/vertico
commit 89987d9df5dab8ee4335461b2cffb668e006c124
Author: Philip 
Commit: GitHub 

vertico-buffer: Avoid using 'buffer-local-value' as a gv (#274)
---
 extensions/vertico-buffer.el | 14 +++---
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/extensions/vertico-buffer.el b/extensions/vertico-buffer.el
index fe5dd6103e..428b0f4b62 100644
--- a/extensions/vertico-buffer.el
+++ b/extensions/vertico-buffer.el
@@ -93,13 +93,13 @@
   (let* ((action vertico-buffer-display-action) tmp win
  (_ (unwind-protect
 (progn
-  (setf tmp (generate-new-buffer "*vertico-buffer*")
-;; Set a fake major mode such that 
`display-buffer-reuse-mode-window'
-;; does not take over!
-(buffer-local-value 'major-mode tmp) 
'vertico-buffer-mode
-;; Temporarily select the original window such
-;; that `display-buffer-same-window' works.
-win (with-minibuffer-selected-window (display-buffer 
tmp action)))
+  (with-current-buffer (setq tmp (generate-new-buffer 
"*vertico-buffer*"))
+;; Set a fake major mode such that 
`display-buffer-reuse-mode-window'
+;; does not take over!
+(setq major-mode 'vertico-buffer-mode))
+  ;; Temporarily select the original window such
+  ;; that `display-buffer-same-window' works.
+  (setq win (with-minibuffer-selected-window (display-buffer 
tmp action)))
   (set-window-buffer win (current-buffer)))
   (kill-buffer tmp)))
  (sym (make-symbol "vertico-buffer--destroy"))

[elpa] externals/peg 8fb32a2012: * peg.el: Use OClosures when available

[Stefan Monnier via]

branch: externals/peg
commit 8fb32a2012d55fcc8b4d2ba0c170efce5c263906
Author: Stefan Monnier 
Commit: Stefan Monnier 

* peg.el: Use OClosures when available

(News:): New section.
(peg--when-fboundp): New macro.
(peg-function): New OClosure type.
(cl-print-object) : New method.
(peg--lambda): New macro.
(peg, define-peg-rule): Use it.
---
 peg.el | 78 +++---
 1 file changed, 66 insertions(+), 12 deletions(-)

diff --git a/peg.el b/peg.el
index ff765bd58b..d7247bf1b6 100644
--- a/peg.el
+++ b/peg.el
@@ -1,6 +1,6 @@
 ;;; peg.el --- Parsing Expression Grammars in Emacs Lisp  -*- 
lexical-binding:t -*-
 
-;; Copyright (C) 2008-2019  Free Software Foundation, Inc.
+;; Copyright (C) 2008-2022  Free Software Foundation, Inc.
 ;;
 ;; Author: Helmut Eller 
 ;; Maintainer: Stefan Monnier 
@@ -214,6 +214,15 @@
 ;; - Fix the exponential blowup in `peg-translate-exp'.
 ;; - Add a proper debug-spec for PEXs.
 
+;;; News:
+
+;; Since 1.0.1:
+;; - Use OClosures to represent PEG rules when available, and let cl-print
+;;   display their source code.
+
+;; Version 1.0:
+;; - New official entry points `peg` and `peg-run`.
+
 ;;; Code:
 
 (eval-when-compile (require 'cl-lib))
@@ -231,8 +240,35 @@ EXPS is a list of rules/expressions that failed.")
 
  Main entry points
 
+(defmacro peg--when-fboundp (f &rest body)
+  (declare (indent 1) (debug (sexp body)))
+  (when (fboundp f)
+(macroexp-progn body)))
+
+(peg--when-fboundp oclosure-define
+  (oclosure-define peg-function
+"Parsing function built from PEG rule."
+pexs)
+
+  (cl-defmethod cl-print-object ((peg peg-function) stream)
+(princ "#f" stream)))
+
 ;; Sometimes (with-peg-rules ... (peg-run (peg ...))) is too
 ;; longwinded for the task at hand, so `peg-parse' comes in handy.
+(defmacro peg--lambda (pexs args &rest body)
+  (declare (indent 2)
+   (debug (&define form lambda-list def-body)))
+  (if (fboundp 'oclosure-lambda)
+  `(oclosure-lambda (peg-function (pexs ,pexs)) ,args . ,body)
+`(lambda ,args . ,body)))
+
 (defmacro peg-parse (&rest pexs)
   "Match PEXS at point.
 PEXS is a sequence of PEG expressions, implicitly combined with `and'.
@@ -250,7 +286,7 @@ PEXS can also be a list of PEG rules, in which case the 
first rule is used."
   "Return a PEG-matcher that matches PEXS."
   (pcase (peg-normalize `(and . ,pexs))
 (`(call ,name) `#',(peg--rule-id name)) ;Optimize this case by η-reduction!
-(exp `(lambda () ,(peg-translate-exp exp)
+(exp `(peg--lambda ',pexs () ,(peg-translate-exp exp)
 
 ;; There are several "infos we want to return" when parsing a given PEX:
 ;; 1- We want to return the success/failure of the parse.
@@ -297,16 +333,29 @@ sequencing `and' operator of PEG grammars."
 (let ((id (peg--rule-id name))
   (exp (peg-normalize `(and . ,pexs
   `(progn
- (,(if inline 'defsubst 'defun) ,id ,args
-  ,(if inline
-   ;; Short-circuit to peg--translate in order to skip the extra
-   ;; failure-recording of peg-translate-exp.  It also skips the
-   ;; cycle detection of peg--translate-rule-body, which is not the
-   ;; main purpose but we can live with it.
-   (apply #'peg--translate exp)
- (peg--translate-rule-body name exp)))
+ (defalias ',id
+   (peg--lambda ',pexs ,args
+ ,(if inline
+  ;; Short-circuit to peg--translate in order to skip
+  ;; the extra failure-recording of `peg-translate-exp'.
+  ;; It also skips the cycle detection of
+  ;; `peg--translate-rule-body', which is not the main
+  ;; purpose but we can live with it.
+  (apply #'peg--translate exp)
+(peg--translate-rule-body name exp
  (eval-and-compile
-   (put ',id 'peg--rule-definition ',exp))
+   ;; FIXME: We shouldn't need this any more since the info is now
+   ;; stored in the function, but sadly we need to find a name's EXP
+   ;; during compilation (i.e. before the `defalias' is executed)
+   ;; as part of cycle-detection!
+   (put ',id 'peg--rule-definition ',exp)
+   ,@(when inline
+   ;; FIXME: Copied from `defsubst'.
+   `(;; Never native-compile defsubsts as we need the byte
+ ;; definition in `byte-compile-unfold-bcf' to perform the
+ ;; inlining (Bug#42664, Bug#43280, Bug#44209).
+ ,(byte-run--set-speed id nil -1)
+ (put ',id 'byte-optimizer #'byte-compile-inline-expand
 
 (defmacro with-peg-rules (rules &rest body)
   "Make PEG rules RULES available within the scope of BODY.
@@ -322,6 +371,7 @@ of PEG expressions, implicitly combined with `and'."
 (macroexpand-all
  `(cl-labels
   ,(mapcar (lambda (rule

[elpa] externals/peg f5c07b1c2f: * peg-tests.el (peg-ex-lisp): Fix indent

[Stefan Monnier via]

branch: externals/peg
commit f5c07b1c2f65f325003a65b12573a0bbacd0fceb
Author: Stefan Monnier 
Commit: Stefan Monnier 

* peg-tests.el (peg-ex-lisp): Fix indent
---
 peg-tests.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/peg-tests.el b/peg-tests.el
index cedccd7eaa..96faf2a3d4 100644
--- a/peg-tests.el
+++ b/peg-tests.el
@@ -1,6 +1,6 @@
 ;;; peg-tests.el --- Tests of PEG parsers-*- lexical-binding: t; 
-*-
 
-;; Copyright (C) 2008-2019  Free Software Foundation, Inc.
+;; Copyright (C) 2008-2022  Free Software Foundation, Inc.
 
 ;; This program is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
@@ -313,8 +313,8 @@ resp. succeded instead of signaling an error."
   `(s -- (intern s)))
(symchar [a-z A-Z 0-9 "-;!#%&'*+,./:;<=>?@[]^_`{|}~"])
(list "("   `(-- (cons nil nil)) `(hd -- hd hd)
-(* sexp`(tl e -- (setcdr tl (list e)))
-   ) _ ")" `(hd _tl -- (cdr hd)))
+(* sexp`(tl e -- (setcdr tl (list e
+_ ")"  `(hd _tl -- (cdr hd)))
(digit [0-9])
(terminating (or (set " \n\t();\"'") (eob)
 

[elpa] externals/peg updated (f5c07b1c2f -> 26703e8695)

[Stefan Monnier via]

monnier pushed a change to branch externals/peg.

  from  f5c07b1c2f * peg-tests.el (peg-ex-lisp): Fix indent
   new  f48b9066ef * peg.el (peg--translate) : New PEX form
   new  26703e8695 * peg.el: Add named rulesets


Summary of changes:
 peg.el | 68 +++---
 1 file changed, 57 insertions(+), 11 deletions(-)

[elpa] externals/peg f48b9066ef 1/2: * peg.el (peg--translate) : New PEX form

[Stefan Monnier via]

branch: externals/peg
commit f48b9066ef02871cc15be0f6743abe46f45ba079
Author: Stefan Monnier 
Commit: Stefan Monnier 

* peg.el (peg--translate) : New PEX form
---
 peg.el | 11 ---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/peg.el b/peg.el
index d7247bf1b6..0d0cab8ca1 100644
--- a/peg.el
+++ b/peg.el
@@ -68,6 +68,7 @@
 ;; Character classes   [ascii cntrl]
 ;; Boolean-guard   (guard EXP)
 ;; Syntax-Class(syntax-class NAME)
+;; Local definitions   (with RULES PEX...)
 ;; and
 ;; Empty-string(null)  ε
 ;; Beginning-of-Buffer (bob)
@@ -219,6 +220,7 @@
 ;; Since 1.0.1:
 ;; - Use OClosures to represent PEG rules when available, and let cl-print
 ;;   display their source code.
+;; - New PEX form (with RULES PEX...).
 
 ;; Version 1.0:
 ;; - New official entry points `peg` and `peg-run`.
@@ -260,8 +262,6 @@ EXPS is a list of rules/expressions that failed.")
 (prin1 (peg-function--pexs peg) stream)
 (princ ">" stream)))
 
-;; Sometimes (with-peg-rules ... (peg-run (peg ...))) is too
-;; longwinded for the task at hand, so `peg-parse' comes in handy.
 (defmacro peg--lambda (pexs args &rest body)
   (declare (indent 2)
(debug (&define form lambda-list def-body)))
@@ -269,6 +269,8 @@ EXPS is a list of rules/expressions that failed.")
   `(oclosure-lambda (peg-function (pexs ,pexs)) ,args . ,body)
 `(lambda ,args . ,body)))
 
+;; Sometimes (with-peg-rules ... (peg-run (peg ...))) is too
+;; longwinded for the task at hand, so `peg-parse' comes in handy.
 (defmacro peg-parse (&rest pexs)
   "Match PEXS at point.
 PEXS is a sequence of PEG expressions, implicitly combined with `and'.
@@ -394,7 +396,7 @@ of PEG expressions, implicitly combined with `and'."
   ;; With `peg-function' objects, we can recover the PEG from which it was
   ;; defined, but this info is not yet available at compile-time.  :-(
   ;;(let ((id (peg--rule-id name)))
-  ;;  (peg-function--peg (symbol-function id)))
+  ;;  (peg-function--pexs (symbol-function id)))
   (get (peg--rule-id name) 'peg--rule-definition)))
 
 (defun peg--rule-id (name)
@@ -632,6 +634,9 @@ of PEG expressions, implicitly combined with `and'."
 (,@(peg--choicepoint-restore cp)
  ,(peg-translate-exp e2)
 
+(cl-defmethod peg--translate ((_ (eql with)) rules &rest exps)
+  `(with-peg-rules ,rules ,(peg--translate `(and . ,exps
+
 (cl-defmethod peg--translate ((_ (eql guard)) exp) exp)
 
 (defvar peg-syntax-classes

[elpa] externals/peg 26703e8695 2/2: * peg.el: Add named rulesets

[Stefan Monnier via]

branch: externals/peg
commit 26703e869548d233effabc98a537707a3a8ce8e9
Author: Stefan Monnier 
Commit: Stefan Monnier 

* peg.el: Add named rulesets

(define-peg-ruleset): New macro.
(with-peg-rules): Allow reference to a ruleset.
---
 peg.el | 57 +
 1 file changed, 49 insertions(+), 8 deletions(-)

diff --git a/peg.el b/peg.el
index 0d0cab8ca1..0eedca89f3 100644
--- a/peg.el
+++ b/peg.el
@@ -86,6 +86,26 @@
 ;; buffer text.  Rules can be recursive or mutually referential,
 ;; though care must be taken not to create infinite loops.
 ;;
+ Named rulesets:
+;;
+;; You can define a set of rules for later use with:
+;;
+;; (define-peg-ruleset myrules
+;;   (sign  () (or "+" "-" ""))
+;;   (digit () [0-9])
+;;   (nat   () digit (* digit))
+;;   (int   () sign digit (* digit))
+;;   (float () int "." nat))
+;;
+;; and later refer to it:
+;;
+;; (with-peg-rules
+;; (myrules
+;;  (complex float "+i" float))
+;;   ... (peg-parse nat "," nat "," complex) ...)
+;;
+ Parsing actions:
+;;
 ;; PEXs also support parsing actions, i.e. Lisp snippets which are
 ;; executed when a pex matches.  This can be used to construct syntax
 ;; trees or for similar tasks.  The most basic form of action is
@@ -144,7 +164,7 @@
 ;; pushes values to the stack without consuming any, and the latter
 ;; pops values from the stack and discards them.
 ;;
-;; Derived Operators:
+ Derived Operators:
 ;;
 ;; The following operators are implemented as combinations of
 ;; primitive expressions:
@@ -195,7 +215,7 @@
 ;;
 ;; See ";;; Examples" in `peg-tests.el' for other examples.
 ;;
-;; References:
+ References:
 ;;
 ;; [Ford] Bryan Ford. Parsing Expression Grammars: a Recognition-Based
 ;; Syntactic Foundation. In POPL'04: Proceedings of the 31st ACM
@@ -221,6 +241,7 @@
 ;; - Use OClosures to represent PEG rules when available, and let cl-print
 ;;   display their source code.
 ;; - New PEX form (with RULES PEX...).
+;; - Named rulesets.
 
 ;; Version 1.0:
 ;; - New official entry points `peg` and `peg-run`.
@@ -359,16 +380,36 @@ sequencing `and' operator of PEG grammars."
  ,(byte-run--set-speed id nil -1)
  (put ',id 'byte-optimizer #'byte-compile-inline-expand
 
+(defmacro define-peg-ruleset (name &rest rules)
+  "Define a set of PEG rules for later use, e.g., in `with-peg-rules'."
+  (declare (indent 1))
+  (let ((defs ())
+(aliases ()))
+(dolist (rule rules)
+  (let* ((rname (car rule))
+ (full-rname (format "%s %s" name rname)))
+(push `(define-peg-rule ,full-rname . ,(cdr rule)) defs)
+(push `(,(peg--rule-id rname) #',(peg--rule-id full-rname)) aliases)))
+`(cl-flet ,aliases
+   ,@defs
+   (eval-and-compile (put ',name 'peg--rules ',aliases)
+
 (defmacro with-peg-rules (rules &rest body)
   "Make PEG rules RULES available within the scope of BODY.
 RULES is a list of rules of the form (NAME . PEXS), where PEXS is a sequence
-of PEG expressions, implicitly combined with `and'."
+of PEG expressions, implicitly combined with `and'.
+RULES can also contain symbols in which case these must name
+rulesets defined previously with `define-peg-ruleset'."
   (declare (indent 1) (debug (sexp form))) ;FIXME: `sexp' is not good enough!
-  (let ((rules
- ;; First, macroexpand the rules.
- (mapcar (lambda (rule)
-   (cons (car rule) (peg-normalize `(and . ,(cdr rule)
- rules))
+  (let* ((rulesets nil)
+ (rules
+  ;; First, macroexpand the rules.
+  (delq nil
+(mapcar (lambda (rule)
+  (if (symbolp rule)
+  (progn (push rule rulesets) nil)
+(cons (car rule) (peg-normalize `(and . ,(cdr 
rule))
+rules)))
 (ctx (assq :peg-rules macroexpand-all-environment)))
 (macroexpand-all
  `(cl-labels

[elpa] externals/peg 912e9baf50: * peg.el: Add support for arguments and indirect calls

[Stefan Monnier via]

branch: externals/peg
commit 912e9baf50da2ac83fc987336158af2ae0cbda4c
Author: Stefan Monnier 
Commit: Stefan Monnier 

* peg.el: Add support for arguments and indirect calls

(peg-leaf-types): Add `funcall`.
(peg--macroexpand): Rely on the unknown-function machinery to detect
unknown peg rules.
(peg--translate) : Allow passing parameters to PEG rules.
(peg--translate) : New rule.
---
 peg.el | 35 ---
 1 file changed, 28 insertions(+), 7 deletions(-)

diff --git a/peg.el b/peg.el
index 0eedca89f3..367aef468c 100644
--- a/peg.el
+++ b/peg.el
@@ -69,6 +69,7 @@
 ;; Boolean-guard   (guard EXP)
 ;; Syntax-Class(syntax-class NAME)
 ;; Local definitions   (with RULES PEX...)
+;; Indirect call(funcall EXP ARGS...)
 ;; and
 ;; Empty-string(null)  ε
 ;; Beginning-of-Buffer (bob)
@@ -215,6 +216,23 @@
 ;;
 ;; See ";;; Examples" in `peg-tests.el' for other examples.
 ;;
+ Rule argument and indirect calls:
+;;
+;; Rules can take arguments and those arguments can themselves be PEGs.
+;; For example:
+;;
+;; (define-peg-rule 2-or-more (peg)
+;;   (funcall peg)
+;;   (funcall peg)
+;;   (* (funcall peg)))
+;;
+;; ... (peg-parse
+;;  ...
+;;  (2-or-more (peg foo))
+;;  ...
+;;  (2-or-more (peg bar))
+;;  ...)
+;;
  References:
 ;;
 ;; [Ford] Bryan Ford. Parsing Expression Grammars: a Recognition-Based
@@ -242,6 +260,9 @@
 ;;   display their source code.
 ;; - New PEX form (with RULES PEX...).
 ;; - Named rulesets.
+;; - You can pass arguments to rules.
+;; - New `funcall' rule to call rules indirectly (e.g. a peg you received
+;;   as argument).
 
 ;; Version 1.0:
 ;; - New official entry points `peg` and `peg-run`.
@@ -478,14 +499,12 @@ rulesets defined previously with `define-peg-ruleset'."
   (apply #'peg--macroexpand exp))
 
 (defconst peg-leaf-types '(any call action char range str set
-   guard syntax-class =))
+  guard syntax-class = funcall))
 
 (cl-defgeneric peg--macroexpand (head &rest args)
   (cond
((memq head peg-leaf-types) (cons head args))
-   ((null args) `(call ,head))
-   (t
-(error "Invalid parsing expression: %S" (cons head args)
+   (t `(call ,head ,@args
 
 (cl-defmethod peg--macroexpand ((_ (eql or)) &rest args)
   (cond ((null args) '(guard nil))
@@ -767,9 +786,11 @@ rulesets defined previously with `define-peg-ruleset'."
  (goto-char (match-end 0))
  t))
 
-(cl-defmethod peg--translate ((_ (eql call)) name)
-  ;; (peg--lookup-rule name) ;; Signal error if not found!
-  `(,(peg--rule-id name)))
+(cl-defmethod peg--translate ((_ (eql call)) name &rest args)
+  `(,(peg--rule-id name) ,@args))
+
+(cl-defmethod peg--translate ((_ (eql funcall)) exp &rest args)
+  `(funcall ,exp ,@args))
 
 (cl-defmethod peg--translate ((_ (eql action)) form)
   `(progn

[elpa] externals/org 92ac00051a: org-persist: Fix omitted argument

[ELPA Syncer]

branch: externals/org
commit 92ac00051a26f3f5c28914ad9757a05ebc0ff54d
Author: TEC 
Commit: TEC 

org-persist: Fix omitted argument

* lisp/org-persist.el (org-persist-associated-files:file): Add the
"container" argument used but omitted from the function declaration of
`org-persist-associated-files:file' in 534633d508d3.
---
 lisp/org-persist.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-persist.el b/lisp/org-persist.el
index f215310a27..aff99f8136 100644
--- a/lisp/org-persist.el
+++ b/lisp/org-persist.el
@@ -936,7 +936,7 @@ Do nothing in an indirect buffer."
 (defalias 'org-persist-associated-files:index #'ignore)
 (defalias 'org-persist-associated-files:version #'ignore)
 
-(defun org-persist-associated-files:file (_ collection)
+(defun org-persist-associated-files:file (container collection)
   "List file CONTAINER associated files of COLLECTION in 
`org-persist-directory'."
   (let ((file (org-persist-read container (plist-get collection :associated
 (when (file-exists-p file)

[elpa] externals/corfu updated (4b459d2c13 -> 739a61b8c2)

[ELPA Syncer]

elpasync pushed a change to branch externals/corfu.

  from  4b459d2c13 Update changelog
   new  fbf880b3ba Fix region mode predicate
   new  739a61b8c2 Fix last commit


Summary of changes:
 corfu.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

[elpa] externals/corfu fbf880b3ba 1/2: Fix region mode predicate

[ELPA Syncer]

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

Fix region mode predicate
---
 corfu.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/corfu.el b/corfu.el
index 375a65e9db..9eb9d0560b 100644
--- a/corfu.el
+++ b/corfu.el
@@ -1134,7 +1134,9 @@ See `completion-in-region' for the arguments BEG, END, 
TABLE, PRED."
  (run-hook-wrapped 'completion-at-point-functions 
#'corfu--capf-wrapper))
   (`(,fun ,beg ,end ,table . ,plist)
(let ((completion-in-region-mode-predicate
-  (lambda () (eq beg (car-safe (funcall fun)
+  (lambda ()
+(when-let (newbeg (car-safe (funcall fun)))
+  (= newstart beg
  (completion-extra-properties plist))
  (setq completion-in-region--data
(list (if (markerp beg) beg (copy-marker beg))

[elpa] externals/corfu 739a61b8c2 2/2: Fix last commit

[ELPA Syncer]

branch: externals/corfu
commit 739a61b8c2e3d62651115734e731850ad46f7d93
Author: Daniel Mendler 
Commit: Daniel Mendler 

Fix last commit
---
 corfu.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/corfu.el b/corfu.el
index 9eb9d0560b..3a7b82c03a 100644
--- a/corfu.el
+++ b/corfu.el
@@ -1136,7 +1136,7 @@ See `completion-in-region' for the arguments BEG, END, 
TABLE, PRED."
(let ((completion-in-region-mode-predicate
   (lambda ()
 (when-let (newbeg (car-safe (funcall fun)))
-  (= newstart beg
+  (= newbeg beg
  (completion-extra-properties plist))
  (setq completion-in-region--data
(list (if (markerp beg) beg (copy-marker beg))

[nongnu] elpa/cider 5f16f16154: Don't scale down time for overlay tests on MacOS

[ELPA Syncer]

branch: elpa/cider
commit 5f16f161544e52eaa122d0846fc8ffe05e0d7198
Author: Benson Chu 
Commit: Bozhidar Batsov 

Don't scale down time for overlay tests on MacOS

Overlay tests involve testing the timer functionality of overlays, and
require the use of sleep. The tests scale all time-related arguments
by a certain factor to avoid overly inflating test-running
times.

The scaling factor was initially set at 1 order of magnitude slower
than the consistently succeeding value on my machine, but the value is
apparently still too fast for the MacOS test runner, so I have added
MacOS to the list of platforms unsafe to do this optimization for.
---
 test/cider-overlay-tests.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/cider-overlay-tests.el b/test/cider-overlay-tests.el
index fc59ea73a5..3f1ea94fc9 100644
--- a/test/cider-overlay-tests.el
+++ b/test/cider-overlay-tests.el
@@ -67,7 +67,7 @@ being set that way"
 (defun cider-overlay--safe-to-speed-up-tests ()
   (and (<= 28 emacs-major-version)
(not (member system-type
-'(ms-dos windows-nt cygwin)
+'(ms-dos windows-nt cygwin darwin)
 
 (describe "cider--make-result-overlay"
   :var (overlay-count this-command)

[elpa] externals/org updated (92ac00051a -> e42beabb48)

[ELPA Syncer]

elpasync pushed a change to branch externals/org.

  from  92ac00051a org-persist: Fix omitted argument
  adds  269dce9fe7 org-table: Require org-fold-core
  adds  954a95ec5f ob-core: Revert space misalignment from recent commit
  adds  41a8666c09 org-display-inline-remove-overlay: Do better job 
clearing images from cache
   new  e42beabb48 Merge branch 'bugfix'


Summary of changes:

[elpa] externals/org e42beabb48: Merge branch 'bugfix'

[ELPA Syncer]

branch: externals/org
commit e42beabb484fcd5907875b120bfa2b6237973d44
Merge: 92ac00051a 41a8666c09
Author: Kyle Meyer 
Commit: Kyle Meyer 

Merge branch 'bugfix'

[nongnu] elpa/cider 228d2fe62e: [GHA] Harden test.yml permissions (#3284)

[ELPA Syncer]

branch: elpa/cider
commit 228d2fe62e78cc268af7ea2418ef855e87ba90d6
Author: Alex 
Commit: GitHub 

[GHA] Harden test.yml permissions (#3284)
---
 .github/workflows/test.yml | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/.github/workflows/test.yml b/.github/workflows/test.yml
index efc548ab52..91fd0cd6bc 100644
--- a/.github/workflows/test.yml
+++ b/.github/workflows/test.yml
@@ -2,6 +2,9 @@ name: CI
 
 on: [push, pull_request]
 
+permissions:
+  contents: read #  to fetch code (actions/checkout)
+
 jobs:
   integration:
 # Run integration tests for all OSs and EMACS_VERSIONs.

[nongnu] elpa/xah-fly-keys e5ac096b15: xah-reformat-to-sentence-lines now handles question mark and exclaimation mark

[ELPA Syncer]

branch: elpa/xah-fly-keys
commit e5ac096b1585c2c28e8d4ce543aec6ae840cac14
Author: Xah Lee 
Commit: Xah Lee 

xah-reformat-to-sentence-lines now handles question mark and exclaimation 
mark
---
 xah-fly-keys.el | 8 
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/xah-fly-keys.el b/xah-fly-keys.el
index 7dd88cd2c0..b7435f0c7a 100644
--- a/xah-fly-keys.el
+++ b/xah-fly-keys.el
@@ -4,7 +4,7 @@
 
 ;; Author: Xah Lee ( http://xahlee.info/ )
 ;; Maintainer: Xah Lee 
-;; Version: 22.3.20221208105541
+;; Version: 22.3.20221211131110
 ;; Created: 10 Sep 2013
 ;; Package-Requires: ((emacs "24.1"))
 ;; Keywords: convenience, emulations, vim, ergoemacs
@@ -1236,7 +1236,7 @@ Move cursor to the beginning of next text block.
 After this command is called, press `xah-repeat-key' to repeat it.
 
 URL `http://xahlee.info/emacs/emacs/elisp_reformat_to_sentence_lines.html'
-Version: 2020-12-02 2022-03-22"
+Version: 2020-12-02 2022-03-22 2022-12-11"
   (interactive)
   (let ($p1 $p2)
 (let (($bds (xah-get-bounds-of-block-or-region))) (setq $p1 (car $bds) $p2 
(cdr $bds)))
@@ -1251,11 +1251,11 @@ Version: 2020-12-02 2022-03-22"
   (goto-char (point-min))
   (while (re-search-forward "  +" nil t) (replace-match " "))
   (goto-char (point-min))
-  (while (re-search-forward "\\. +\\([(0-9A-Za-z]+\\)" nil t) 
(replace-match ".\n\\1"))
+  (while (re-search-forward "\\([.?!]\\) +\\([(0-9A-Za-z]+\\)" nil t) 
(replace-match "\\1\n\\2"))
   (goto-char (point-max))
   (while (eq (char-before) 32) (delete-char -1
   (re-search-forward "\n+" nil 1)
-(set-transient-map (let (($kmap (make-sparse-keymap))) (define-key $kmap (or 
xah-repeat-key (kbd "DEL")) this-command) $kmap))
+  (set-transient-map (let (($kmap (make-sparse-keymap))) (define-key $kmap (or 
xah-repeat-key (kbd "DEL")) this-command) $kmap))
   (set-transient-map (let (($kmap (make-sparse-keymap))) (define-key $kmap 
(kbd "DEL") this-command) $kmap)))
 
 (defun xah-space-to-newline ()

[nongnu] elpa/diff-ansi 40da62486e: Cleanup: format

[ELPA Syncer]

branch: elpa/diff-ansi
commit 40da62486e5da91a2cb148c7b9812df29d38ccd8
Author: Campbell Barton 
Commit: Campbell Barton 

Cleanup: format
---
 diff-ansi.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/diff-ansi.el b/diff-ansi.el
index 8c3e4c718a..ba9d6786f2 100644
--- a/diff-ansi.el
+++ b/diff-ansi.el
@@ -591,8 +591,7 @@ Optional keywords in KEYWORDS.
 
 (defun diff-ansi--ansi-color-apply-on-region-with-bg-str (black-color)
   "Create string that can be passed to a sub-process using BLACK-COLOR."
-  (format
-"(progn %s %s %s %s %s)"
+  (format "(progn %s %s %s %s %s)"
 "(require 'ansi-color)"
 (format "(defconst diff-ansi--ansi-color-bg (list :background \"%s\" 
:extend t))" black-color)
 diff-ansi--code-block-for-multiprocess-defs

[nongnu] elpa/diff-ansi 73a8ba750b: Cleanup: format

[ELPA Syncer]

branch: elpa/diff-ansi
commit 73a8ba750bb0f2147d6c471e6bc9bdfea400360a
Author: Campbell Barton 
Commit: Campbell Barton 

Cleanup: format
---
 diff-ansi.el | 9 -
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/diff-ansi.el b/diff-ansi.el
index ba9d6786f2..f38f77568b 100644
--- a/diff-ansi.el
+++ b/diff-ansi.el
@@ -736,8 +736,7 @@ Store the result in TARGET-BUF when non-nil."
 (setq end (point))
 
 ;; Postpone activation until the timer can take it's self as an 
argument.
-(diff-ansi--with-advice #'timer-activate
-  :override (lambda (&rest _) nil)
+(diff-ansi--with-advice #'timer-activate :override (lambda (&rest _) 
nil)
   (setq diff-ansi--ansi-color-timer (run-at-time 0.0 0.001 nil))
   (timer-set-function
 diff-ansi--ansi-color-timer
@@ -765,7 +764,8 @@ Store the result in TARGET-BUF when non-nil."
 (with-current-buffer (or target-buf (current-buffer))
   (let ((inhibit-read-only t))
 (diff-ansi--with-temp-directory temp-dir
-  :prefix "diff-ansi"
+  :prefix
+  "diff-ansi"
   (with-temp-buffer
 ;; Use the temp buffer.
 (diff-ansi--call-process-pipe-chain
@@ -813,8 +813,7 @@ Store the result in TARGET-BUF when non-nil."
 
 This calls OLD-FN with ARGS."
   (let ((point-begin (point)))
-(diff-ansi--with-advice #'magit-wash-sequence
-  :override (lambda (&rest _) nil)
+(diff-ansi--with-advice #'magit-wash-sequence :override (lambda (&rest _) 
nil)
 
   (apply old-fn args)
 

[nongnu] main fd537db35e: * elpa-packages (lorem-ipsum): New package.

[Stefan Kangas]

branch: main
commit fd537db35efd3ba5f0b5cc31125f98780bde547b
Author: Stefan Kangas 
Commit: Stefan Kangas 

* elpa-packages (lorem-ipsum): New package.
---
 elpa-packages | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/elpa-packages b/elpa-packages
index 7fba97f5c1..4a1ccf2930 100644
--- a/elpa-packages
+++ b/elpa-packages
@@ -350,6 +350,9 @@
  (kotlin-mode  :url 
"https://github.com/Emacs-Kotlin-Mode-Maintainers/kotlin-mode";
   :ignored-files ("doc" "test" "Cask" "Makefile"))
 
+ (lorem-ipsum   :url "https://github.com/jschaf/emacs-lorem-ipsum";
+  :readme "README.md")
+
  (lua-mode :url "https://github.com/immerrr/lua-mode/";
   :ignored-files ("COPYING" "test" "travis" "init-tryout.el"))
 

[nongnu] elpa/lorem-ipsum 4c7a9df33e 29/30: Fix some minor stylistic issues

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 4c7a9df33e80a82999df59a8b47ace51d762e579
Author: Stefan Kangas 
Commit: Joe Schafer 

Fix some minor stylistic issues
---
 lorem-ipsum.el | 32 
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 255b8b8bbe..362d0ed82b 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -166,14 +166,15 @@
   "Insert lorem ipsum paragraphs into buffer.
 If NUM is non-nil, insert NUM paragraphs."
   (interactive "p")
-  (if (not num)(setq num 1))
-  (if (> num 0)
-  (progn
-   (insert (concat
-(mapconcat 'identity
-   (nth (random (length lorem-ipsum-text))
-lorem-ipsum-text) 
lorem-ipsum-sentence-separator) lorem-ipsum-paragraph-separator))
-   (lorem-ipsum-insert-paragraphs (- num 1)
+  (if (not num) (setq num 1))
+  (when (> num 0)
+(insert (concat
+(mapconcat #'identity
+   (nth (random (length lorem-ipsum-text))
+lorem-ipsum-text)
+lorem-ipsum-sentence-separator)
+ lorem-ipsum-paragraph-separator))
+(lorem-ipsum-insert-paragraphs (- num 1
 
 ;;;###autoload
 (defalias 'Lorem-ipsum-insert-paragraphs 'lorem-ipsum-insert-paragraphs)
@@ -183,13 +184,12 @@ If NUM is non-nil, insert NUM paragraphs."
   "Insert lorem ipsum sentences into buffer.
 If NUM is non-nil, insert NUM sentences."
   (interactive "p")
-  (if (not num)(setq num 1))
-  (if (> num 0)
-  (progn
-   (let ((para
-  (nth (random (length lorem-ipsum-text)) lorem-ipsum-text)))
- (insert (concat (nth (random (length para)) para) 
lorem-ipsum-sentence-separator)))
-   (lorem-ipsum-insert-sentences (- num 1)
+  (if (not num) (setq num 1))
+  (when (> num 0)
+(let ((para
+(nth (random (length lorem-ipsum-text)) lorem-ipsum-text)))
+   (insert (concat (nth (random (length para)) para) 
lorem-ipsum-sentence-separator)))
+  (lorem-ipsum-insert-sentences (- num 1
 
 ;;;###autoload
 (defalias 'Lorem-ipsum-insert-sentences 'lorem-ipsum-insert-sentences)
@@ -199,7 +199,7 @@ If NUM is non-nil, insert NUM sentences."
   "Insert lorem ipsum list items into buffer.
 If NUM is non-nil, insert NUM list items."
   (interactive "p")
-  (if (not num)(setq num 1))
+  (if (not num) (setq num 1))
   (when (> num 0)
 (insert lorem-ipsum-list-beginning)
 (dotimes (_ num)

[nongnu] elpa/lorem-ipsum 7b0ff165d7 15/30: remove errant newline

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 7b0ff165d76ec0b2ae52ac0dbd72890743a82a92
Author: Joe Schafer 
Commit: Joe Schafer 

remove errant newline
---
 lorem-ipsum.el | 1 -
 1 file changed, 1 deletion(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 2c1a68122a..df0ebe6e56 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -56,7 +56,6 @@
 
 ;;; Code:
 
-
 (defconst lorem-ipsum-version "0.2")
 
 (defgroup Lorem-ipsum nil

[nongnu] elpa/lorem-ipsum a1d1a63b6d 13/30: add commentary

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit a1d1a63b6d7f5087f83b8fba4f9f9baecc4df4b8
Author: Joe Schafer 
Commit: Joe Schafer 

add commentary
---
 lorem-ipsum.el | 20 +++-
 1 file changed, 19 insertions(+), 1 deletion(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 9d8a5a8055..750d1e103b 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -35,6 +35,23 @@
 
 ;;; Commentary:
 
+;; Add this file to your `load-path'.  Use the default keybindings by
+;; adding the following to your .emacs file:
+;;
+;; (Lorem-ipsum-use-default-bindings)
+;;
+;; This will setup the folling keybindings:
+;;
+;; C-c l p: Lorem-ipsum-insert-paragraphs
+;; C-c l s: Lorem-ipsum-insert-sentences
+;; C-c l l: Lorem-ipsum-insert-list
+;;
+;; If you want a different keybinding, say you want the prefix C-c C-l, use a 
variation of the
+;; following:
+;;
+;; (global-set-key (kbd "C-c C-l s") 'Lorem-ipsum-insert-sentences)
+;; (global-set-key (kbd "C-c C-l p") 'Lorem-ipsum-insert-paragraphs)
+;; (global-set-key (kbd "C-c C-l l") 'Lorem-ipsum-insert-list)
 
 
 ;;; Code:
@@ -53,7 +70,8 @@
   (interactive)
   (global-set-key (kbd "C-c l s") 'Lorem-ipsum-insert-sentences)
   (global-set-key (kbd "C-c l p") 'Lorem-ipsum-insert-paragraphs)
-  (global-set-key (kbd "C-c l l") 'Lorem-ipsum-insert-list))
+  (global-set-key (kbd "C-c l l") 'Lorem-ipsum-insert-list)
+  )
 
 (defconst Lorem-ipsum-text
   '(("Lorem ipsum dolor sit amet, consectetuer adipiscing elit."

[nongnu] elpa/lorem-ipsum 7416d71dfd 11/30: add group and default keybindings

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 7416d71dfd6ccc49ccc5e04a58c4ca32140a644c
Author: Joe Schafer 
Commit: Joe Schafer 

add group and default keybindings
---
 lorem-ipsum.el | 12 
 1 file changed, 12 insertions(+)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 66164a84cc..358cb49831 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -42,6 +42,18 @@
 
 (defconst lorem-ipsum-version "0.2")
 
+(defgroup Lorem-ipsum nil
+  "Insert filler text."
+  :group 'tools
+  :group 'convenience)
+
+;;;###autoload
+(defun Lorem-ipsum-use-default-bindings ()
+  "Use the default keybindings of C-c l [spl]."
+(global-set-key (kbd "C-c l s") 'Lorem-ipsum-insert-sentences)
+(global-set-key (kbd "C-c l p") 'Lorem-ipsum-insert-paragraphs)
+(global-set-key (kbd "C-c l l") 'Lorem-ipsum-insert-list))
+
 (defconst Lorem-ipsum-text
   '(("Lorem ipsum dolor sit amet, consectetuer adipiscing elit."
  "Donec hendrerit tempor tellus."

[nongnu] elpa/lorem-ipsum 7268e111f9 25/30: Insert list beginning

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 7268e111f9d5b65d613247030ab5b5538d4f5280
Author: Johan Andersson 
Commit: Johan Andersson 

Insert list beginning
---
 lorem-ipsum.el | 14 +++---
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 50eeb3a73a..d8a347a30c 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -197,13 +197,13 @@ If NUM is non-nil, insert NUM sentences."
 If NUM is non-nil, insert NUM list items."
   (interactive "p")
   (if (not num)(setq num 1))
-  (if (> num 0)
-  (progn
-   (let ((para (nth (random (length lorem-ipsum-text)) lorem-ipsum-text)))
- (insert (concat lorem-ipsum-list-bullet
- (nth (random (length para)) para)
- lorem-ipsum-list-item-end)))
-   (lorem-ipsum-insert-list (- num 1)))
+  (when (> num 0)
+(insert lorem-ipsum-list-beginning)
+(dotimes (i num)
+  (let ((para (nth (random (length lorem-ipsum-text)) lorem-ipsum-text)))
+(insert (concat lorem-ipsum-list-bullet
+(nth (random (length para)) para)
+lorem-ipsum-list-item-end
 (insert lorem-ipsum-list-end)))
 
 ;;;###autoload

[nongnu] elpa/lorem-ipsum bdbe8a1fb1 07/30: fix comments and add docstrings

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit bdbe8a1fb11210a077a6454e0b8eddb16d87d096
Author: Joe Schafer 
Commit: Joe Schafer 

fix comments and add docstrings
---
 lorem-ipsum.el | 64 ++
 1 file changed, 42 insertions(+), 22 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 45872525e1..323d33b5c4 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -1,32 +1,46 @@
 ;;; lorem-ipsum.el --- Insert dummy pseudo Latin text.
-;; Author & Maintainer: Jean-Philippe Theberge (jphi...@sourceforge.net)
-;; Special Thanks: The emacswiki users, the #em...@freenode.net citizens
-;; and Marcus Tullius Cicero
-;;
-;; version :
-(defconst lorem-ipsum-version "0.2")
 
-;;;
-;;; Copyright (c) 2003 Jean-Philippe Theberge
+;; Copyright (c) 2003 Jean-Philippe Theberge
 ;;
-;; This file is not (yet?) part of GNU Emacs.
+;; Author: Jean-Philippe Theberge (jphi...@sourceforge.net)
+;; Maintainer: Joe Schafer (j...@jschaf.com)
 ;;
-;; This file is free software; you can redistribute it and/or modify
-;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 2, or (at your option)
+;; Special Thanks: The emacswiki users, the #em...@freenode.net citizens
+;; and Marcus Tullius Cicero
+;; keywords: tools, language
+
+;; This file is not part of GNU Emacs.
+
+;; Contains code from GNU Emacs ,
+;; released under the GNU General Public License version 3 or later.
+
+;; lorem-ipsum.el is free software; you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
 ;; any later version.
-;;
-;; GNU Emacs is distributed in the hope that it will be useful,
+
+;; lorem-ipsum.el is distributed in the hope that it will be useful,
 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-;; GNU General Public License for more details.
-;;
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+
 ;; You should have received a copy of the GNU General Public License
-;; along with GNU Emacs; see the file COPYING.  If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
-;;
-;;;
+;; along with lorem-ipsum.el.  If not, see .
+
+;;; History:
+
+;; Version 0.1 released by Jean-Philippe Theberge in 2003.  After
+;; attempting to contact Jean-Philippe, Joe Schafer took over as
+;; maintainer and published to Github.
+
+;;; Commentary:
+
+
+
+;;; Code:
+
+
+(defconst lorem-ipsum-version "0.2")
 
 (defconst Lorem-ipsum-text
   '(("Lorem ipsum dolor sit amet, consectetuer adipiscing elit."
@@ -112,6 +126,8 @@
  Lorem-ipsum-list-end "\n")))
 
 (defun Lorem-ipsum-insert-paragraphs (&optional num)
+  "Insert Lorem ipsum paragraphs into buffer.
+If NUM is non-nil, insert NUM paragraphs."
   (interactive "p")
   (if (not num)(setq num 1))
   (if (> num 0)
@@ -123,6 +139,8 @@
(Lorem-ipsum-insert-paragraphs (- num 1)
 
 (defun Lorem-ipsum-insert-sentences (&optional num)
+  "Insert Lorem ipsum sentences into buffer.
+If NUM is non-nil, insert NUM sentences."
   (interactive "p")
   (if (not num)(setq num 1))
   (if (> num 0)
@@ -133,6 +151,8 @@
(Lorem-ipsum-insert-sentences (- num 1)
 
 (defun Lorem-ipsum-insert-list (&optional num)
+  "Insert Lorem ipsum list items into buffer.
+If NUM is non-nil, insert NUM list items."
   (interactive "p")
   (if (not num)(setq num 1))
   (if (> num 0)

[nongnu] elpa/lorem-ipsum cc7f00cfa5 09/30: add convenience keyword

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit cc7f00cfa593193bbe06061a279f4dd337d812ef
Author: Joe Schafer 
Commit: Joe Schafer 

add convenience keyword
---
 lorem-ipsum.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 61cc451165..32e7ff29e7 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -7,7 +7,7 @@
 ;;
 ;; Special Thanks: The emacswiki users, the #em...@freenode.net citizens
 ;; and Marcus Tullius Cicero
-;; keywords: tools, language
+;; keywords: tools, language, convenience
 
 ;; This file is not part of GNU Emacs.
 

[nongnu] elpa/lorem-ipsum bfcb7cd50a 04/30: add README.md

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit bfcb7cd50afeaec074624c261fd6f736a550ec16
Author: Joe Schafer 
Commit: Joe Schafer 

add README.md
---
 README.md | 8 
 1 file changed, 8 insertions(+)

diff --git a/README.md b/README.md
index e69de29bb2..0222820755 100644
--- a/README.md
+++ b/README.md
@@ -0,0 +1,8 @@
+# Lorem Ipsum for Emacs #
+
+Add filler lorem ipsum text to Emacs
+
+## Installation
+
+
+## Setup

[nongnu] elpa/lorem-ipsum eaef702938 02/30: replace " " with lorem-ipsum-paragraph-separator

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit eaef7029382b25b205a91e7e80fe402cae2468fa
Author: Joe Schafer 
Commit: Joe Schafer 

replace " " with lorem-ipsum-paragraph-separator
---
 lorem-ipsum.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index bc627b7b7c..052dd5c28c 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -120,8 +120,7 @@
(insert (concat
 (mapconcat 'identity
(nth (if (interactive-p) 0 (random (length 
Lorem-ipsum-text)))
-Lorem-ipsum-text) " ")
-Lorem-ipsum-paragraph-separator))
+Lorem-ipsum-text) 
Lorem-ipsum-sentence-separator) Lorem-ipsum-paragraph-separator))
(Lorem-ipsum-insert-paragraphs (- num 1)
 
 (defun Lorem-ipsum-insert-sentences (&optional num)

[nongnu] elpa/lorem-ipsum 2242006bd0 10/30: fix provide symbol to Lorem-ipsum

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 2242006bd0b0ad8b2776227369b1beb8d316cabe
Author: Joe Schafer 
Commit: Joe Schafer 

fix provide symbol to Lorem-ipsum
---
 lorem-ipsum.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 32e7ff29e7..66164a84cc 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -168,6 +168,6 @@ If NUM is non-nil, insert NUM list items."
 (insert Lorem-ipsum-list-end)))
 
 
-(provide 'lorem-ipsum)
+(provide 'Lorem-ipsum)
 
 ;;; lorem-ipsum.el ends here

[nongnu] branch elpa/lorem-ipsum created (now 63e5e5f21c)

[ELPA Syncer]

elpasync pushed a change to branch elpa/lorem-ipsum.

at  63e5e5f21c Bump version to 0.3

This branch includes the following new commits:

   new  60045e7d1d initial commit
   new  eaef702938 replace " " with lorem-ipsum-paragraph-separator
   new  c317c2f1b7 remove obsolete function interactive-p
   new  bfcb7cd50a add README.md
   new  65b486c051 bump version to 0.2
   new  a2a45dd401 Merge pull request #1 from jschaf/tweaks
   new  bdbe8a1fb1 fix comments and add docstrings
   new  5d35808d77 add autoload cookies to entry functions
   new  cc7f00cfa5 add convenience keyword
   new  2242006bd0 fix provide symbol to Lorem-ipsum
   new  7416d71dfd add group and default keybindings
   new  e265ac064a add interactive to lorem-ipsum-use-default-bindings
   new  a1d1a63b6d add commentary
   new  a19b5372ff fix lonely paren
   new  7b0ff165d7 remove errant newline
   new  3d0152632d add detail to README.md
   new  c287072c46 fix table formatting
   new  5c5058 put key sequences in code blocks
   new  9ee134c149 expand on manual installation
   new  5857686989 change Lorem to lorem
   new  db7e5433e1 add package version and additional commentary
   new  893a275057 move special thanks below package metadata
   new  57682a5d6b Add MELPA installation instructions
   new  4b39f6fed4 Merge pull request #2 from peterwvj/patch-1
   new  7268e111f9 Insert list beginning
   new  da75c155da Merge pull request #5 from nja/master
   new  590301d2c3 Fix some minor packaging issues and warnings
   new  861e29b034 Use lexical-binding
   new  4c7a9df33e Fix some minor stylistic issues
   new  63e5e5f21c Bump version to 0.3

[nongnu] elpa/lorem-ipsum 60045e7d1d 01/30: initial commit

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 60045e7d1dc6e339a480f2eda798c994e7cfeb63
Author: Joe Schafer 
Commit: Joe Schafer 

initial commit
---
 .gitignore |   1 +
 README.md  |   0
 lorem-ipsum.el | 153 +
 3 files changed, 154 insertions(+)

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 00..c531d9867f
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1 @@
+*.elc
diff --git a/README.md b/README.md
new file mode 100644
index 00..e69de29bb2
diff --git a/lorem-ipsum.el b/lorem-ipsum.el
new file mode 100644
index 00..bc627b7b7c
--- /dev/null
+++ b/lorem-ipsum.el
@@ -0,0 +1,153 @@
+;;; lorem-ipsum.el --- Insert dummy pseudo Latin text.
+;; Author & Maintainer: Jean-Philippe Theberge (jphi...@sourceforge.net)
+;; Special Thanks: The emacswiki users, the #em...@freenode.net citizens
+;; and Marcus Tullius Cicero
+;;
+;; version :
+(defconst lorem-ipsum-version "0.1")
+;; last update: 16/09/2003
+
+;;;
+;;; Copyright (c) 2003 Jean-Philippe Theberge
+;;
+;; This file is not (yet?) part of GNU Emacs.
+;;
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 2, or (at your option)
+;; any later version.
+;;
+;; GNU Emacs is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs; see the file COPYING.  If not, write to the
+;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+;; Boston, MA 02111-1307, USA.
+;;
+;;;
+
+(defconst Lorem-ipsum-text
+  '(("Lorem ipsum dolor sit amet, consectetuer adipiscing elit."
+ "Donec hendrerit tempor tellus."
+ "Donec pretium posuere tellus."
+ "Proin quam nisl, tincidunt et, mattis eget, convallis nec, purus."
+ "Cum sociis natoque penatibus et magnis dis parturient montes, nascetur 
ridiculus mus."
+ "Nulla posuere."
+ "Donec vitae dolor."
+ "Nullam tristique diam non turpis."
+ "Cras placerat accumsan nulla."
+ "Nullam rutrum."
+ "Nam vestibulum accumsan nisl.")
+
+("Pellentesque dapibus suscipit ligula."
+ "Donec posuere augue in quam."
+ "Etiam vel tortor sodales tellus ultricies commodo."
+ "Suspendisse potenti."
+ "Aenean in sem ac leo mollis blandit."
+ "Donec neque quam, dignissim in, mollis nec, sagittis eu, wisi."
+ "Phasellus lacus."
+ "Etiam laoreet quam sed arcu."
+ "Phasellus at dui in ligula mollis ultricies."
+ "Integer placerat tristique nisl."
+ "Praesent augue."
+ "Fusce commodo."
+ "Vestibulum convallis, lorem a tempus semper, dui dui euismod elit, vitae 
placerat urna tortor vitae lacus."
+ "Nullam libero mauris, consequat quis, varius et, dictum id, arcu."
+ "Mauris mollis tincidunt felis."
+ "Aliquam feugiat tellus ut neque."
+ "Nulla facilisis, risus a rhoncus fermentum, tellus tellus lacinia purus, 
et dictum nunc justo sit amet elit.")
+
+("Aliquam erat volutpat."
+ "Nunc eleifend leo vitae magna."
+ "In id erat non orci commodo lobortis."
+ "Proin neque massa, cursus ut, gravida ut, lobortis eget, lacus."
+ "Sed diam."
+ "Praesent fermentum tempor tellus."
+ "Nullam tempus."
+ "Mauris ac felis vel velit tristique imperdiet."
+ "Donec at pede."
+ "Etiam vel neque nec dui dignissim bibendum."
+ "Vivamus id enim."
+ "Phasellus neque orci, porta a, aliquet quis, semper a, massa."
+ "Phasellus purus."
+ "Pellentesque tristique imperdiet tortor."
+ "Nam euismod tellus id erat.")
+
+("Nullam eu ante vel est convallis dignissim."
+ "Fusce suscipit, wisi nec facilisis facilisis, est dui fermentum leo, 
quis tempor ligula erat quis odio."
+ "Nunc porta vulputate tellus."
+ "Nunc rutrum turpis sed pede."
+ "Sed bibendum."
+ "Aliquam posuere."
+ "Nunc aliquet, augue nec adipiscing interdum, lacus tellus malesuada 
massa, quis varius mi purus non odio."
+ "Pellentesque condimentum, magna ut suscipit hendrerit, ipsum augue 
ornare nulla, non luctus diam neque sit amet urna."
+ "Curabitur vulputate vestibulum lorem."
+ "Fusce sagittis, libero non molestie mollis, magna orci ultrices dolor, 
at vulputate neque nulla lacinia eros."
+ "Sed id ligula quis est convallis tempor."
+ "Curabitur lacinia pulvinar nibh."
+ "Nam a sapien.")))
+
+(defvar Lorem-ipsum-paragraph-separator "\n\n")
+(defvar Lorem-ipsum-sentence-separator "  ")
+(defvar Lorem-ipsum-list-beginning "")
+(defvar Lorem-ipsum

[nongnu] elpa/lorem-ipsum 5c5058ffff 18/30: put key sequences in code blocks

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 5c50581fb1d3294656251f21513eb0ea82ea
Author: Joe Schafer 
Commit: Joe Schafer 

put key sequences in code blocks
---
 README.md | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/README.md b/README.md
index 40fe9eab43..b58044bf14 100644
--- a/README.md
+++ b/README.md
@@ -21,9 +21,9 @@ This will setup the folling keybindings:
 
 Key Binding | Function
 |--
-C-c l p | Lorem-ipsum-insert-paragraphs
-C-c l s | Lorem-ipsum-insert-sentences
-C-c l l | Lorem-ipsum-insert-list
+`C-c l p`   | Lorem-ipsum-insert-paragraphs
+`C-c l s`   | Lorem-ipsum-insert-sentences
+`C-c l l`   | Lorem-ipsum-insert-list
 
 If you want different keybinding, say you want the prefix C-c C-l, use a 
variation of the
 following:

[nongnu] elpa/lorem-ipsum a2a45dd401 06/30: Merge pull request #1 from jschaf/tweaks

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit a2a45dd4018585f3978ead20c8dcf8d899c33a53
Merge: 60045e7d1d 65b486c051
Author: Joe Schafer 
Commit: Joe Schafer 

Merge pull request #1 from jschaf/tweaks

Tweaks
---
 README.md  |  8 
 lorem-ipsum.el | 17 +++--
 2 files changed, 15 insertions(+), 10 deletions(-)

diff --git a/README.md b/README.md
index e69de29bb2..0222820755 100644
--- a/README.md
+++ b/README.md
@@ -0,0 +1,8 @@
+# Lorem Ipsum for Emacs #
+
+Add filler lorem ipsum text to Emacs
+
+## Installation
+
+
+## Setup
diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index bc627b7b7c..45872525e1 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -4,8 +4,7 @@
 ;; and Marcus Tullius Cicero
 ;;
 ;; version :
-(defconst lorem-ipsum-version "0.1")
-;; last update: 16/09/2003
+(defconst lorem-ipsum-version "0.2")
 
 ;;;
 ;;; Copyright (c) 2003 Jean-Philippe Theberge
@@ -119,9 +118,8 @@
   (progn
(insert (concat
 (mapconcat 'identity
-   (nth (if (interactive-p) 0 (random (length 
Lorem-ipsum-text)))
-Lorem-ipsum-text) " ")
-Lorem-ipsum-paragraph-separator))
+   (nth (random (length Lorem-ipsum-text))
+Lorem-ipsum-text) 
Lorem-ipsum-sentence-separator) Lorem-ipsum-paragraph-separator))
(Lorem-ipsum-insert-paragraphs (- num 1)
 
 (defun Lorem-ipsum-insert-sentences (&optional num)
@@ -130,8 +128,8 @@
   (if (> num 0)
   (progn
(let ((para
-  (nth (if (interactive-p) 0 (random (length Lorem-ipsum-text))) 
Lorem-ipsum-text)))
- (insert (concat (nth (if (interactive-p) 0 (random (length para))) 
para) Lorem-ipsum-sentence-separator)))
+  (nth (random (length Lorem-ipsum-text)) Lorem-ipsum-text)))
+ (insert (concat (nth (random (length para)) para) 
Lorem-ipsum-sentence-separator)))
(Lorem-ipsum-insert-sentences (- num 1)
 
 (defun Lorem-ipsum-insert-list (&optional num)
@@ -139,10 +137,9 @@
   (if (not num)(setq num 1))
   (if (> num 0)
   (progn
-   (if (interactive-p) (insert Lorem-ipsum-list-beginning))
-   (let ((para (nth (if (interactive-p) 0 (random (length 
Lorem-ipsum-text))) Lorem-ipsum-text)))
+   (let ((para (nth (random (length Lorem-ipsum-text)) Lorem-ipsum-text)))
  (insert (concat Lorem-ipsum-list-bullet
- (nth (if (interactive-p) 0 (random (length para))) 
para)
+ (nth (random (length para)) para)
  Lorem-ipsum-list-item-end)))
(Lorem-ipsum-insert-list (- num 1)))
 (insert Lorem-ipsum-list-end)))

[nongnu] elpa/lorem-ipsum 5d35808d77 08/30: add autoload cookies to entry functions

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 5d35808d77dd203e987e5b58428127075e2897b6
Author: Joe Schafer 
Commit: Joe Schafer 

add autoload cookies to entry functions
---
 lorem-ipsum.el | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 323d33b5c4..61cc451165 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -125,6 +125,7 @@
  Lorem-ipsum-list-item-end "\n"
  Lorem-ipsum-list-end "\n")))
 
+;;;###autoload
 (defun Lorem-ipsum-insert-paragraphs (&optional num)
   "Insert Lorem ipsum paragraphs into buffer.
 If NUM is non-nil, insert NUM paragraphs."
@@ -138,6 +139,7 @@ If NUM is non-nil, insert NUM paragraphs."
 Lorem-ipsum-text) 
Lorem-ipsum-sentence-separator) Lorem-ipsum-paragraph-separator))
(Lorem-ipsum-insert-paragraphs (- num 1)
 
+;;;###autoload
 (defun Lorem-ipsum-insert-sentences (&optional num)
   "Insert Lorem ipsum sentences into buffer.
 If NUM is non-nil, insert NUM sentences."
@@ -150,6 +152,7 @@ If NUM is non-nil, insert NUM sentences."
  (insert (concat (nth (random (length para)) para) 
Lorem-ipsum-sentence-separator)))
(Lorem-ipsum-insert-sentences (- num 1)
 
+;;;###autoload
 (defun Lorem-ipsum-insert-list (&optional num)
   "Insert Lorem ipsum list items into buffer.
 If NUM is non-nil, insert NUM list items."

[nongnu] elpa/lorem-ipsum 63e5e5f21c 30/30: Bump version to 0.3

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 63e5e5f21c2ed41bfa7c921ee3a0aff159dd5a3c
Author: Stefan Kangas 
Commit: Joe Schafer 

Bump version to 0.3
---
 lorem-ipsum.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 362d0ed82b..a2a6d51f38 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -4,7 +4,7 @@
 
 ;; Author: Jean-Philippe Theberge (jphi...@sourceforge.net)
 ;; Maintainer: Joe Schafer (j...@jschaf.com)
-;; Version: 0.2
+;; Version: 0.3
 ;; Keywords: tools, language, convenience
 ;; URL: https://github.com/jschaf/emacs-lorem-ipsum
 
@@ -60,7 +60,7 @@
 
 ;;; Code:
 
-(defconst lorem-ipsum-version "0.2")
+(defconst lorem-ipsum-version "0.3")
 
 (defgroup lorem-ipsum nil
   "Insert filler text."

[nongnu] elpa/lorem-ipsum c287072c46 17/30: fix table formatting

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit c287072c462a4829bbac43c3a844d7d4788d9f79
Author: Joe Schafer 
Commit: Joe Schafer 

fix table formatting
---
 README.md | 11 ++-
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/README.md b/README.md
index 0646165735..40fe9eab43 100644
--- a/README.md
+++ b/README.md
@@ -18,11 +18,12 @@ file:
 
 
 This will setup the folling keybindings:
-===  =
-C-c l p  Lorem-ipsum-insert-paragraphs
-C-c l s  Lorem-ipsum-insert-sentences
-C-c l l  Lorem-ipsum-insert-list
-===  =
+
+Key Binding | Function
+|--
+C-c l p | Lorem-ipsum-insert-paragraphs
+C-c l s | Lorem-ipsum-insert-sentences
+C-c l l | Lorem-ipsum-insert-list
 
 If you want different keybinding, say you want the prefix C-c C-l, use a 
variation of the
 following:

[nongnu] elpa/lorem-ipsum 65b486c051 05/30: bump version to 0.2

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 65b486c051a4ec93ec2f4d2459bf66f13800b690
Author: Joe Schafer 
Commit: Joe Schafer 

bump version to 0.2
---
 lorem-ipsum.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 0401604c62..45872525e1 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -4,8 +4,7 @@
 ;; and Marcus Tullius Cicero
 ;;
 ;; version :
-(defconst lorem-ipsum-version "0.1")
-;; last update: 16/09/2003
+(defconst lorem-ipsum-version "0.2")
 
 ;;;
 ;;; Copyright (c) 2003 Jean-Philippe Theberge

[nongnu] elpa/lorem-ipsum 4b39f6fed4 24/30: Merge pull request #2 from peterwvj/patch-1

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 4b39f6fed455d67f635b3837cf5668bf74d0f6cd
Merge: 893a275057 57682a5d6b
Author: Joe Schafer 
Commit: GitHub 

Merge pull request #2 from peterwvj/patch-1

Add MELPA installation instructions
---
 README.md | 10 +-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/README.md b/README.md
index 3709c6018b..e957ed39fd 100644
--- a/README.md
+++ b/README.md
@@ -4,7 +4,15 @@ Add filler lorem ipsum text to Emacs
 
 ## Installation
 
-Soon to be added to the normal Emacs package repositories.
+**MELPA**
+
+This package is available via MELPA. You can install it by calling:
+
+M-x package-install RET lorem-ipsum
+
+Finally, the package must be required:
+
+(require 'lorem-ipsum)
 
 **Manual Installation**
 

[nongnu] elpa/lorem-ipsum c317c2f1b7 03/30: remove obsolete function interactive-p

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit c317c2f1b7454f038172f981c414a96a1e3d24d1
Author: Joe Schafer 
Commit: Joe Schafer 

remove obsolete function interactive-p
---
 lorem-ipsum.el | 11 +--
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 052dd5c28c..0401604c62 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -119,7 +119,7 @@
   (progn
(insert (concat
 (mapconcat 'identity
-   (nth (if (interactive-p) 0 (random (length 
Lorem-ipsum-text)))
+   (nth (random (length Lorem-ipsum-text))
 Lorem-ipsum-text) 
Lorem-ipsum-sentence-separator) Lorem-ipsum-paragraph-separator))
(Lorem-ipsum-insert-paragraphs (- num 1)
 
@@ -129,8 +129,8 @@
   (if (> num 0)
   (progn
(let ((para
-  (nth (if (interactive-p) 0 (random (length Lorem-ipsum-text))) 
Lorem-ipsum-text)))
- (insert (concat (nth (if (interactive-p) 0 (random (length para))) 
para) Lorem-ipsum-sentence-separator)))
+  (nth (random (length Lorem-ipsum-text)) Lorem-ipsum-text)))
+ (insert (concat (nth (random (length para)) para) 
Lorem-ipsum-sentence-separator)))
(Lorem-ipsum-insert-sentences (- num 1)
 
 (defun Lorem-ipsum-insert-list (&optional num)
@@ -138,10 +138,9 @@
   (if (not num)(setq num 1))
   (if (> num 0)
   (progn
-   (if (interactive-p) (insert Lorem-ipsum-list-beginning))
-   (let ((para (nth (if (interactive-p) 0 (random (length 
Lorem-ipsum-text))) Lorem-ipsum-text)))
+   (let ((para (nth (random (length Lorem-ipsum-text)) Lorem-ipsum-text)))
  (insert (concat Lorem-ipsum-list-bullet
- (nth (if (interactive-p) 0 (random (length para))) 
para)
+ (nth (random (length para)) para)
  Lorem-ipsum-list-item-end)))
(Lorem-ipsum-insert-list (- num 1)))
 (insert Lorem-ipsum-list-end)))

[nongnu] elpa/lorem-ipsum 57682a5d6b 23/30: Add MELPA installation instructions

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 57682a5d6b89500a6b3e0ab4e55ba02c9cb9c84c
Author: Peter W. V. Tran-Jørgensen 
Commit: GitHub 

Add MELPA installation instructions
---
 README.md | 10 +-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/README.md b/README.md
index 3709c6018b..e957ed39fd 100644
--- a/README.md
+++ b/README.md
@@ -4,7 +4,15 @@ Add filler lorem ipsum text to Emacs
 
 ## Installation
 
-Soon to be added to the normal Emacs package repositories.
+**MELPA**
+
+This package is available via MELPA. You can install it by calling:
+
+M-x package-install RET lorem-ipsum
+
+Finally, the package must be required:
+
+(require 'lorem-ipsum)
 
 **Manual Installation**
 

[nongnu] elpa/lorem-ipsum 5857686989 20/30: change Lorem to lorem

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 58576869895a38e976a5520ea25d063dcf7a88d9
Author: Joe Schafer 
Commit: Joe Schafer 

change Lorem to lorem
---
 README.md  |  14 
 lorem-ipsum.el | 106 +++--
 2 files changed, 64 insertions(+), 56 deletions(-)

diff --git a/README.md b/README.md
index 5f562b1411..3709c6018b 100644
--- a/README.md
+++ b/README.md
@@ -17,20 +17,20 @@ functions you need are `autoload`ed.
 Use the default keybindings by adding the following to your .emacs
 file:
 
-(Lorem-ipsum-use-default-bindings)
+(lorem-ipsum-use-default-bindings)
 
 
 This will setup the folling keybindings:
 
 Key Binding | Function
 |--
-`C-c l p`   | Lorem-ipsum-insert-paragraphs
-`C-c l s`   | Lorem-ipsum-insert-sentences
-`C-c l l`   | Lorem-ipsum-insert-list
+`C-c l p`   | lorem-ipsum-insert-paragraphs
+`C-c l s`   | lorem-ipsum-insert-sentences
+`C-c l l`   | lorem-ipsum-insert-list
 
 If you want different keybinding, say you want the prefix C-c C-l, use a 
variation of the
 following:
 
-(global-set-key (kbd "C-c C-l s") 'Lorem-ipsum-insert-sentences)
-(global-set-key (kbd "C-c C-l p") 'Lorem-ipsum-insert-paragraphs)
-(global-set-key (kbd "C-c C-l l") 'Lorem-ipsum-insert-list)
+(global-set-key (kbd "C-c C-l s") 'lorem-ipsum-insert-sentences)
+(global-set-key (kbd "C-c C-l p") 'lorem-ipsum-insert-paragraphs)
+(global-set-key (kbd "C-c C-l l") 'lorem-ipsum-insert-list)
diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index df0ebe6e56..6d4ab7d98b 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -38,40 +38,40 @@
 ;; Add this file to your `load-path'.  Use the default keybindings by
 ;; adding the following to your .emacs file:
 ;;
-;; (Lorem-ipsum-use-default-bindings)
+;; (lorem-ipsum-use-default-bindings)
 ;;
 ;; This will setup the folling keybindings:
 ;;
-;; C-c l p: Lorem-ipsum-insert-paragraphs
-;; C-c l s: Lorem-ipsum-insert-sentences
-;; C-c l l: Lorem-ipsum-insert-list
+;; C-c l p: lorem-ipsum-insert-paragraphs
+;; C-c l s: lorem-ipsum-insert-sentences
+;; C-c l l: lorem-ipsum-insert-list
 ;;
 ;; If you want a different keybinding, say you want the prefix C-c C-l, use a 
variation of the
 ;; following:
 ;;
-;; (global-set-key (kbd "C-c C-l s") 'Lorem-ipsum-insert-sentences)
-;; (global-set-key (kbd "C-c C-l p") 'Lorem-ipsum-insert-paragraphs)
-;; (global-set-key (kbd "C-c C-l l") 'Lorem-ipsum-insert-list)
+;; (global-set-key (kbd "C-c C-l s") 'lorem-ipsum-insert-sentences)
+;; (global-set-key (kbd "C-c C-l p") 'lorem-ipsum-insert-paragraphs)
+;; (global-set-key (kbd "C-c C-l l") 'lorem-ipsum-insert-list)
 
 
 ;;; Code:
 
 (defconst lorem-ipsum-version "0.2")
 
-(defgroup Lorem-ipsum nil
+(defgroup lorem-ipsum nil
   "Insert filler text."
   :group 'tools
   :group 'convenience)
 
 ;;;###autoload
-(defun Lorem-ipsum-use-default-bindings ()
+(defun lorem-ipsum-use-default-bindings ()
   "Use the default keybindings of C-c l [spl]."
   (interactive)
-  (global-set-key (kbd "C-c l s") 'Lorem-ipsum-insert-sentences)
-  (global-set-key (kbd "C-c l p") 'Lorem-ipsum-insert-paragraphs)
-  (global-set-key (kbd "C-c l l") 'Lorem-ipsum-insert-list))
+  (global-set-key (kbd "C-c l s") 'lorem-ipsum-insert-sentences)
+  (global-set-key (kbd "C-c l p") 'lorem-ipsum-insert-paragraphs)
+  (global-set-key (kbd "C-c l l") 'lorem-ipsum-insert-list))
 
-(defconst Lorem-ipsum-text
+(defconst lorem-ipsum-text
   '(("Lorem ipsum dolor sit amet, consectetuer adipiscing elit."
  "Donec hendrerit tempor tellus."
  "Donec pretium posuere tellus."
@@ -132,31 +132,31 @@
  "Curabitur lacinia pulvinar nibh."
  "Nam a sapien.")))
 
-(defvar Lorem-ipsum-paragraph-separator "\n\n")
-(defvar Lorem-ipsum-sentence-separator "  ")
-(defvar Lorem-ipsum-list-beginning "")
-(defvar Lorem-ipsum-list-bullet "* ")
-(defvar Lorem-ipsum-list-item-end "\n")
-(defvar Lorem-ipsum-list-end "")
+(defvar lorem-ipsum-paragraph-separator "\n\n")
+(defvar lorem-ipsum-sentence-separator "  ")
+(defvar lorem-ipsum-list-beginning "")
+(defvar lorem-ipsum-list-bullet "* ")
+(defvar lorem-ipsum-list-item-end "\n")
+(defvar lorem-ipsum-list-end "")
 
-(make-variable-buffer-local 'Lorem-ipsum-paragraph-separator)
-(make-variable-buffer-local 'Lorem-ipsum-sentence-separator)
-(make-variable-buffer-local 'Lorem-ipsum-list-beginning)
-(make-variable-buffer-local 'Lorem-ipsum-list-bullet)
-(make-variable-buffer-local 'Lorem-ipsum-list-item-end)
-(make-variable-buffer-local 'Lorem-ipsum-list-end)
+(make-variable-buffer-local 'lorem-ipsum-paragraph-separator)
+(make-variable-buffer-local 'lorem-ipsum-sentence-separator)
+(make-variable-buffer-local 'lorem-ipsum-list-beginning)
+(make-variable-buffer-local 'lorem-ipsum-list-bullet)
+(make-variable-buffer-local 'lorem-ipsum-list-item-end)
+(make-variable-buffer-local 'lorem-ipsum-list-end)
 
 (add-hook 'sgml-mode-hook (lambda ()
-   (setq Lorem-ipsum-para

[nongnu] elpa/lorem-ipsum e265ac064a 12/30: add interactive to lorem-ipsum-use-default-bindings

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit e265ac064a42b2880d7eb5e791e690f8bf384259
Author: Joe Schafer 
Commit: Joe Schafer 

add interactive to lorem-ipsum-use-default-bindings
---
 lorem-ipsum.el | 7 ---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 358cb49831..9d8a5a8055 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -50,9 +50,10 @@
 ;;;###autoload
 (defun Lorem-ipsum-use-default-bindings ()
   "Use the default keybindings of C-c l [spl]."
-(global-set-key (kbd "C-c l s") 'Lorem-ipsum-insert-sentences)
-(global-set-key (kbd "C-c l p") 'Lorem-ipsum-insert-paragraphs)
-(global-set-key (kbd "C-c l l") 'Lorem-ipsum-insert-list))
+  (interactive)
+  (global-set-key (kbd "C-c l s") 'Lorem-ipsum-insert-sentences)
+  (global-set-key (kbd "C-c l p") 'Lorem-ipsum-insert-paragraphs)
+  (global-set-key (kbd "C-c l l") 'Lorem-ipsum-insert-list))
 
 (defconst Lorem-ipsum-text
   '(("Lorem ipsum dolor sit amet, consectetuer adipiscing elit."

[nongnu] elpa/lorem-ipsum 590301d2c3 27/30: Fix some minor packaging issues and warnings

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 590301d2c3aabb6dcd0af0a567b278056009ab16
Author: Stefan Kangas 
Commit: Joe Schafer 

Fix some minor packaging issues and warnings
---
 lorem-ipsum.el | 43 +++
 1 file changed, 23 insertions(+), 20 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index d8a347a30c..c69e0346ff 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -1,11 +1,12 @@
-;;; lorem-ipsum.el --- Insert dummy pseudo Latin text.
+;;; lorem-ipsum.el --- Insert dummy pseudo Latin text
 
 ;; Copyright (c) 2003 Jean-Philippe Theberge
 
 ;; Author: Jean-Philippe Theberge (jphi...@sourceforge.net)
 ;; Maintainer: Joe Schafer (j...@jschaf.com)
-;; Package-Version: 0.2
+;; Version: 0.2
 ;; Keywords: tools, language, convenience
+;; URL: https://github.com/jschaf/emacs-lorem-ipsum
 
 ;; Special Thanks: The emacswiki users, the #em...@freenode.net citizens
 ;; and Marcus Tullius Cicero
@@ -26,13 +27,7 @@
 ;; General Public License for more details.
 
 ;; You should have received a copy of the GNU General Public License
-;; along with lorem-ipsum.el.  If not, see .
-
-;;; History:
-
-;; Version 0.1 released by Jean-Philippe Theberge in 2003.  After
-;; attempting to contact Jean-Philippe, Joe Schafer took over as
-;; maintainer and published to Github.
+;; along with lorem-ipsum.el.  If not, see .
 
 ;;; Commentary:
 
@@ -40,7 +35,7 @@
 ;; text into a buffer.
 ;;
 ;; To install manually, add this file to your `load-path'.  Use the
-;; default keybindings by adding the following to your .emacs file:
+;; default keybindings by adding the following to your init file:
 ;;
 ;; (lorem-ipsum-use-default-bindings)
 ;;
@@ -50,13 +45,18 @@
 ;; C-c l s: lorem-ipsum-insert-sentences
 ;; C-c l l: lorem-ipsum-insert-list
 ;;
-;; If you want a different keybinding, say you want the prefix C-c C-l, use a 
variation of the
-;; following:
+;; If you want a different keybinding, say you want the prefix C-c C-l, use a
+;; variation of the following:
 ;;
 ;; (global-set-key (kbd "C-c C-l s") 'lorem-ipsum-insert-sentences)
 ;; (global-set-key (kbd "C-c C-l p") 'lorem-ipsum-insert-paragraphs)
 ;; (global-set-key (kbd "C-c C-l l") 'lorem-ipsum-insert-list)
 
+;;; History:
+
+;; Version 0.1 released by Jean-Philippe Theberge in 2003.  After
+;; attempting to contact Jean-Philippe, Joe Schafer took over as
+;; maintainer and published to Github.
 
 ;;; Code:
 
@@ -69,7 +69,7 @@
 
 ;;;###autoload
 (defun lorem-ipsum-use-default-bindings ()
-  "Use the default keybindings of C-c l [spl]."
+  "Use the default keybindings of `C-c l [spl]'."
   (interactive)
   (global-set-key (kbd "C-c l s") 'lorem-ipsum-insert-sentences)
   (global-set-key (kbd "C-c l p") 'lorem-ipsum-insert-paragraphs)
@@ -150,13 +150,16 @@
 (make-variable-buffer-local 'lorem-ipsum-list-item-end)
 (make-variable-buffer-local 'lorem-ipsum-list-end)
 
-(add-hook 'sgml-mode-hook (lambda ()
-   (setq lorem-ipsum-paragraph-separator "\n"
- lorem-ipsum-sentence-separator "  "
- lorem-ipsum-list-beginning "\n"
- lorem-ipsum-list-bullet ""
- lorem-ipsum-list-item-end "\n"
- lorem-ipsum-list-end "\n")))
+(defun lorem-ipsum-sgml-mode-hook ()
+  "Set some variables for lorem-ipsum in `sgml-mode'."
+  (setq lorem-ipsum-paragraph-separator "\n"
+   lorem-ipsum-sentence-separator "  "
+   lorem-ipsum-list-beginning "\n"
+   lorem-ipsum-list-bullet ""
+   lorem-ipsum-list-item-end "\n"
+   lorem-ipsum-list-end "\n"))
+
+(add-hook 'sgml-mode-hook #'lorem-ipsum-sgml-mode-hook)
 
 ;;;###autoload
 (defun lorem-ipsum-insert-paragraphs (&optional num)

[nongnu] elpa/lorem-ipsum 3d0152632d 16/30: add detail to README.md

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 3d0152632d5dad48e1b633b2cee38c9f64e873a0
Author: Joe Schafer 
Commit: Joe Schafer 

add detail to README.md
---
 README.md | 24 
 1 file changed, 24 insertions(+)

diff --git a/README.md b/README.md
index 0222820755..0646165735 100644
--- a/README.md
+++ b/README.md
@@ -4,5 +4,29 @@ Add filler lorem ipsum text to Emacs
 
 ## Installation
 
+Soon to be added to the normal Emacs package repositories.
+
+Add this file to your `load-path'.
+
 
 ## Setup
+
+Use the default keybindings by adding the following to your .emacs
+file:
+
+(Lorem-ipsum-use-default-bindings)
+
+
+This will setup the folling keybindings:
+===  =
+C-c l p  Lorem-ipsum-insert-paragraphs
+C-c l s  Lorem-ipsum-insert-sentences
+C-c l l  Lorem-ipsum-insert-list
+===  =
+
+If you want different keybinding, say you want the prefix C-c C-l, use a 
variation of the
+following:
+
+(global-set-key (kbd "C-c C-l s") 'Lorem-ipsum-insert-sentences)
+(global-set-key (kbd "C-c C-l p") 'Lorem-ipsum-insert-paragraphs)
+(global-set-key (kbd "C-c C-l l") 'Lorem-ipsum-insert-list)

[nongnu] elpa/lorem-ipsum 861e29b034 28/30: Use lexical-binding

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 861e29b034ae2cff48804d10595af98582c76b4a
Author: Stefan Kangas 
Commit: Joe Schafer 

Use lexical-binding
---
 lorem-ipsum.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index c69e0346ff..255b8b8bbe 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -1,4 +1,4 @@
-;;; lorem-ipsum.el --- Insert dummy pseudo Latin text
+;;; lorem-ipsum.el --- Insert dummy pseudo Latin text  -*- lexical-binding: t 
-*-
 
 ;; Copyright (c) 2003 Jean-Philippe Theberge
 
@@ -202,7 +202,7 @@ If NUM is non-nil, insert NUM list items."
   (if (not num)(setq num 1))
   (when (> num 0)
 (insert lorem-ipsum-list-beginning)
-(dotimes (i num)
+(dotimes (_ num)
   (let ((para (nth (random (length lorem-ipsum-text)) lorem-ipsum-text)))
 (insert (concat lorem-ipsum-list-bullet
 (nth (random (length para)) para)

[nongnu] elpa/lorem-ipsum db7e5433e1 21/30: add package version and additional commentary

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit db7e5433e145e010bb5bcfde968a477460b6b589
Author: Joe Schafer 
Commit: Joe Schafer 

add package version and additional commentary
---
 lorem-ipsum.el | 13 -
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 6d4ab7d98b..5ac8677691 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -1,13 +1,13 @@
 ;;; lorem-ipsum.el --- Insert dummy pseudo Latin text.
 
 ;; Copyright (c) 2003 Jean-Philippe Theberge
-;;
+
 ;; Author: Jean-Philippe Theberge (jphi...@sourceforge.net)
 ;; Maintainer: Joe Schafer (j...@jschaf.com)
-;;
 ;; Special Thanks: The emacswiki users, the #em...@freenode.net citizens
 ;; and Marcus Tullius Cicero
-;; keywords: tools, language, convenience
+;; Keywords: tools, language, convenience
+;; Version: 0.2
 
 ;; This file is not part of GNU Emacs.
 
@@ -35,8 +35,11 @@
 
 ;;; Commentary:
 
-;; Add this file to your `load-path'.  Use the default keybindings by
-;; adding the following to your .emacs file:
+;; This package provides convenience functions to insert dummy Latin
+;; text into a buffer.
+;;
+;; To install manually, add this file to your `load-path'.  Use the
+;; default keybindings by adding the following to your .emacs file:
 ;;
 ;; (lorem-ipsum-use-default-bindings)
 ;;

[nongnu] elpa/lorem-ipsum 9ee134c149 19/30: expand on manual installation

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 9ee134c149b735d851442d3340ab26399e3cf011
Author: Joe Schafer 
Commit: Joe Schafer 

expand on manual installation
---
 README.md | 5 -
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/README.md b/README.md
index b58044bf14..5f562b1411 100644
--- a/README.md
+++ b/README.md
@@ -6,7 +6,10 @@ Add filler lorem ipsum text to Emacs
 
 Soon to be added to the normal Emacs package repositories.
 
-Add this file to your `load-path'.
+**Manual Installation**
+
+Add `lorem-ipsum.el` to your `load-path`.  That's it, all the
+functions you need are `autoload`ed.
 
 
 ## Setup

[nongnu] elpa/lorem-ipsum 893a275057 22/30: move special thanks below package metadata

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit 893a27505734a1497b79bc26e0736a78221b35d9
Author: Joe Schafer 
Commit: Joe Schafer 

move special thanks below package metadata
---
 lorem-ipsum.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 5ac8677691..50eeb3a73a 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -4,10 +4,11 @@
 
 ;; Author: Jean-Philippe Theberge (jphi...@sourceforge.net)
 ;; Maintainer: Joe Schafer (j...@jschaf.com)
+;; Package-Version: 0.2
+;; Keywords: tools, language, convenience
+
 ;; Special Thanks: The emacswiki users, the #em...@freenode.net citizens
 ;; and Marcus Tullius Cicero
-;; Keywords: tools, language, convenience
-;; Version: 0.2
 
 ;; This file is not part of GNU Emacs.
 

[nongnu] elpa/lorem-ipsum da75c155da 26/30: Merge pull request #5 from nja/master

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit da75c155da327c7a7aedb80f5cfe409984787049
Merge: 4b39f6fed4 7268e111f9
Author: Joe Schafer 
Commit: GitHub 

Merge pull request #5 from nja/master

Insert list beginning
---
 lorem-ipsum.el | 14 +++---
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 50eeb3a73a..d8a347a30c 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -197,13 +197,13 @@ If NUM is non-nil, insert NUM sentences."
 If NUM is non-nil, insert NUM list items."
   (interactive "p")
   (if (not num)(setq num 1))
-  (if (> num 0)
-  (progn
-   (let ((para (nth (random (length lorem-ipsum-text)) lorem-ipsum-text)))
- (insert (concat lorem-ipsum-list-bullet
- (nth (random (length para)) para)
- lorem-ipsum-list-item-end)))
-   (lorem-ipsum-insert-list (- num 1)))
+  (when (> num 0)
+(insert lorem-ipsum-list-beginning)
+(dotimes (i num)
+  (let ((para (nth (random (length lorem-ipsum-text)) lorem-ipsum-text)))
+(insert (concat lorem-ipsum-list-bullet
+(nth (random (length para)) para)
+lorem-ipsum-list-item-end
 (insert lorem-ipsum-list-end)))
 
 ;;;###autoload

[nongnu] elpa/lorem-ipsum a19b5372ff 14/30: fix lonely paren

[ELPA Syncer]

branch: elpa/lorem-ipsum
commit a19b5372ffc4fc46c0bb9b944856ce9235616c6b
Author: Joe Schafer 
Commit: Joe Schafer 

fix lonely paren
---
 lorem-ipsum.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lorem-ipsum.el b/lorem-ipsum.el
index 750d1e103b..2c1a68122a 100644
--- a/lorem-ipsum.el
+++ b/lorem-ipsum.el
@@ -70,8 +70,7 @@
   (interactive)
   (global-set-key (kbd "C-c l s") 'Lorem-ipsum-insert-sentences)
   (global-set-key (kbd "C-c l p") 'Lorem-ipsum-insert-paragraphs)
-  (global-set-key (kbd "C-c l l") 'Lorem-ipsum-insert-list)
-  )
+  (global-set-key (kbd "C-c l l") 'Lorem-ipsum-insert-list))
 
 (defconst Lorem-ipsum-text
   '(("Lorem ipsum dolor sit amet, consectetuer adipiscing elit."

[nongnu] elpa/eat f76c27cd93: Don't intercept background processes in Eshell

[ELPA Syncer]

branch: elpa/eat
commit f76c27cd93ad5573353e931ec66ea968852519ba
Author: Akib Azmain Turja 
Commit: Akib Azmain Turja 

Don't intercept background processes in Eshell

* eat.el (eat--eshell-adjust-make-process-args): Don't do any
change to the environment if 'eshell-current-subjob-p' is
non-nil.
---
 eat.el | 94 ++
 1 file changed, 49 insertions(+), 45 deletions(-)

diff --git a/eat.el b/eat.el
index de48353f39..6c66a42946 100644
--- a/eat.el
+++ b/eat.el
@@ -5474,6 +5474,8 @@ PROGRAM can be a shell command."
 (eat--eshell-cleanup
   (eshell-sentinel process message))
 
+(defvar eshell-current-subjob-p) ; In `esh-proc'.
+
 ;; HACK: This is a dirty hack, it can break easily.
 (defun eat--eshell-adjust-make-process-args (fn command args)
   "Setup an environment to adjust `make-process' arguments.
@@ -5481,53 +5483,55 @@ PROGRAM can be a shell command."
 Call FN with COMMAND and ARGS, and whenever `make-process' is called,
 modify its argument to change the filter, the sentinel and invoke
 `stty' from the new process."
-  (cl-letf*
-  (;; For Emacs 29 and above.
-   (make-process (symbol-function #'make-process))
-   ((symbol-function #'make-process)
-(if (< emacs-major-version 29)
-make-process
-  (lambda (&rest plist)
-;; Make sure we don't attack wrong process.
-(if (not (equal (plist-get plist :command)
-(cons (file-local-name
-   (expand-file-name command))
-  args)))
-(apply make-process plist)
-  (setf (plist-get plist :command)
-`("/usr/bin/env" "sh" "-c"
-  ,(format "stty -nl echo rows %d columns %d \
+  (if eshell-current-subjob-p
+  (funcall fn command args)
+(cl-letf*
+(;; For Emacs 29 and above.
+ (make-process (symbol-function #'make-process))
+ ((symbol-function #'make-process)
+  (if (< emacs-major-version 29)
+  make-process
+(lambda (&rest plist)
+  ;; Make sure we don't attack wrong process.
+  (if (not (equal (plist-get plist :command)
+  (cons (file-local-name
+ (expand-file-name command))
+args)))
+  (apply make-process plist)
+(setf (plist-get plist :command)
+  `("/usr/bin/env" "sh" "-c"
+,(format "stty -nl echo rows %d columns %d \
 sane 2>%s ; if [ $1 = .. ]; then shift; fi; exec \"$@\""
-   (floor (window-screen-lines))
-   (window-max-chars-per-line)
-   null-device)
-  ".." ,@(plist-get plist :command)))
-  (apply make-process plist)
-   ;; For Emacs 28.
-   (start-file-process (symbol-function #'start-file-process))
-   ((symbol-function #'start-file-process)
-(if (< emacs-major-version 29)
-(lambda (name buffer &rest command)
-  (apply start-file-process name buffer
- `("/usr/bin/env" "sh" "-c"
-   ,(format "stty -nl echo rows %d columns %d \
+ (floor (window-screen-lines))
+ (window-max-chars-per-line)
+ null-device)
+".." ,@(plist-get plist :command)))
+(apply make-process plist)
+ ;; For Emacs 28.
+ (start-file-process (symbol-function #'start-file-process))
+ ((symbol-function #'start-file-process)
+  (if (< emacs-major-version 29)
+  (lambda (name buffer &rest command)
+(apply start-file-process name buffer
+   `("/usr/bin/env" "sh" "-c"
+ ,(format "stty -nl echo rows %d columns %d \
 sane 2>%s ; if [ $1 = .. ]; then shift; fi; exec \"$@\""
-(floor (window-screen-lines))
-(window-max-chars-per-line)
-null-device)
-   ".." ,@command)))
-  ;; Don't override on Emacs 28.
-  start-file-process)))
-(let ((hook
-   (lambda (proc)
- (set-process-filter proc #'eat--eshell-filter)
- (set-process-sentinel proc #'eat--eshell-sentinel)
- (eat--eshell-setup-proc-and-term proc
-  (unwind-protect
-  (progn
-(add-hook 'eshell-exec-hook hook 99)
-(funcall fn command args))
-(remove-hook 'eshell-exec-hook hook)
+  (floor (window-screen-lines))
+  (window-max-chars-per-line)
+