[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] elpa 9e627fc 02/16: Do not use a function from cl
From: |
Tassilo Horn |
Subject: |
[elpa] elpa 9e627fc 02/16: Do not use a function from cl |
Date: |
Fri, 14 Oct 2016 16:03:32 +0000 (UTC) |
branch: elpa
commit 9e627fc8d7b744dd5342cf3e0e76de67fa0eb9be
Author: Mosè Giordano <address@hidden>
Commit: Mosè Giordano <address@hidden>
Do not use a function from cl
* tex-buf.el (TeX-parse-TeX): Do not use the `signum' function, provided
by `cl' library.
---
tex-buf.el | 13 ++++++++++---
1 file changed, 10 insertions(+), 3 deletions(-)
diff --git a/tex-buf.el b/tex-buf.el
index 575c1ed..cf2ec78 100644
--- a/tex-buf.el
+++ b/tex-buf.el
@@ -2321,8 +2321,11 @@ already in an Emacs buffer) and the cursor is placed at
the error."
(while (null (zerop arg))
(setq TeX-error-last-visited
;; Increase or decrese `TeX-error-last-visited' depending on
- ;; the sign of `arg'.
- (+ (signum arg) TeX-error-last-visited)
+ ;; the sign of `arg'. Note: `signum' is a function from
+ ;; `cl' library, do not be tempted to use it.
+ (if (> arg 0)
+ (1+ TeX-error-last-visited)
+ (1- TeX-error-last-visited))
item (if (natnump TeX-error-last-visited)
(nth TeX-error-last-visited TeX-error-list)
;; XEmacs doesn't support `nth' with a negative
index.
@@ -2330,7 +2333,11 @@ already in an Emacs buffer) and the cursor is placed at
the error."
;; Increase or decrease `arg' only if the warning isn't to be
;; skipped.
(unless (TeX-error-list-skip-warning-p (nth 0 item) (nth 10 item))
- (setq arg (- arg (signum arg)))))
+ ;; Note: `signum' is a function from `cl' library, do not be
+ ;; tempted to use it.
+ (setq arg (if (> arg 0)
+ (1- arg)
+ (1+ arg)))))
(if (< TeX-error-last-visited -1)
(setq TeX-error-last-visited -1))
(cond ((or (null item)
- [elpa] elpa updated (9c24759 -> 5489ef2), Tassilo Horn, 2016/10/14
- [elpa] elpa c9bc7d6 03/16: ; Query for second mandatory argument., Tassilo Horn, 2016/10/14
- [elpa] elpa bc23073 05/16: ; Turn mandatory argument to optional, Tassilo Horn, 2016/10/14
- [elpa] elpa 50b63b0 07/16: Improve style/graphicx.el, Tassilo Horn, 2016/10/14
- [elpa] elpa 0392f01 04/16: ; Fix a typo, Tassilo Horn, 2016/10/14
- [elpa] elpa b90986f 01/16: Fix type of ConTeXt-Mark-version option, Tassilo Horn, 2016/10/14
- [elpa] elpa 9e627fc 02/16: Do not use a function from cl,
Tassilo Horn <=
- [elpa] elpa 785eabf 11/16: Don't require \end{env} is on a separate line, Tassilo Horn, 2016/10/14
- [elpa] elpa 84d31ca 10/16: Fix default command after running BibTeX with warnings, Tassilo Horn, 2016/10/14
- [elpa] elpa 0c955d5 15/16: Fix TeX--if-macro-fboundp edebug spec, Tassilo Horn, 2016/10/14
- [elpa] elpa 86a4c75 12/16: Add information about prettify and semi WYSIWYG features., Tassilo Horn, 2016/10/14
- [elpa] elpa 75d672c 09/16: Improve font-locking of verbatim environments, Tassilo Horn, 2016/10/14
- [elpa] elpa 18f1783 06/16: Cherry-pick 9c24759a96f41e288841ec2e815d62d58dc01e7a from elpa branch, Tassilo Horn, 2016/10/14
- [elpa] elpa 0762736 13/16: Improve docs added/changed in last commit, Tassilo Horn, 2016/10/14
- [elpa] elpa eb2d64b 14/16: Fix to my previous commit, Tassilo Horn, 2016/10/14
- [elpa] elpa 3654a62 08/16: Improve style/bidi and add make file entry., Tassilo Horn, 2016/10/14
- [elpa] elpa 5489ef2 16/16: Merge branch 'master' into elpa, Tassilo Horn, 2016/10/14