[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/orgalist 057737ed9f 1/3: Update bug:31361 workaround fo
|
From: |
Nicolas Goaziou |
|
Subject: |
[elpa] externals/orgalist 057737ed9f 1/3: Update bug:31361 workaround for new upstream signature |
|
Date: |
Thu, 11 Jan 2024 13:16:10 -0500 (EST) |
branch: externals/orgalist
commit 057737ed9f1e4632d0635ccee8148bd0e64edf8f
Author: Leo Vivier <zaeph@zaeph.net>
Commit: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Update bug:31361 workaround for new upstream signature
Upstream, `indent-according-to-mode' has a new signature.
- Introduced: Thu Nov 18 08:11:26 2021 +0100
f596f0db82c0b1ff3fe8e8f1d8b07d2fe7504ab6
- Still present in master: Thu Mar 9 12:04:52 2023 +0200
8589de94d8a44cd566eb3fe128f8091d7e958ee9
The old signature raised wrong-number-of-arguments errors on
`indent-region'.
---
orgalist.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/orgalist.el b/orgalist.el
index 7bf27e27b6..6f1d2ec07c 100644
--- a/orgalist.el
+++ b/orgalist.el
@@ -880,12 +880,12 @@ C-c C-c `orgalist-check-item'"
;; FIXME: Workaround bug#31361.
(unless (advice-member-p 'orgalist-fix-bug:31361 'indent-according-to-mode)
(advice-add 'indent-according-to-mode
- :around (lambda (old)
+ :around (lambda (old &rest r)
"Workaround bug#31361."
(or (orgalist--indent-line)
(let ((indent-line-function
(advice--cd*r indent-line-function)))
- (funcall old))))
+ (funcall old r))))
'((name . orgalist-fix-bug:31361)))))
(t
(remove-function (local 'fill-forward-paragraph-function)