[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/realgud 90fe351 033/140: More Emacs-gaurded handling of
From: |
Rocky Bernstein |
Subject: |
[elpa] externals/realgud 90fe351 033/140: More Emacs-gaurded handling of realgud:join-string |
Date: |
Sat, 25 May 2019 19:35:25 -0400 (EDT) |
branch: externals/realgud
commit 90fe351f3297b70c7f0aebb80796f81736e76e6c
Author: rocky <address@hidden>
Commit: rocky <address@hidden>
More Emacs-gaurded handling of realgud:join-string
---
realgud/common/utils.el | 14 +++++++++-----
test/test-track.el | 3 ++-
2 files changed, 11 insertions(+), 6 deletions(-)
diff --git a/realgud/common/utils.el b/realgud/common/utils.el
index e6aec5a..a4460e3 100644
--- a/realgud/common/utils.el
+++ b/realgud/common/utils.el
@@ -30,11 +30,15 @@
(t
(append (realgud:flatten (car mylist)) (realgud:flatten (cdr mylist))))))
-;; From
https://stackoverflow.com/questions/12999530/is-there-a-function-that-joins-a-string-into-a-delimited-string
-(defun realgud:join-string (list joiner)
- (if (< emacs-major-version 25)
- (mapconcat 'identity list joiner)
- (string-join list joiner)))
+(if (or (< emacs-major-version 24)
+ (and (= emacs-major-version 24 (< 4 emacs-minor-version))))
+ ;; From
+ ;;
https://stackoverflow.com/questions/12999530/is-there-a-function-that-joins-a-string-into-a-delimited-string
+ (defun realgud:join-string (list joiner)
+ (mapconcat 'identity list joiner))
+ (progn
+ (require 'subr-x)
+ (defalias 'realgud:join-string 'string-join)))
(defun realgud:canonic-major-mode()
"Return
diff --git a/test/test-track.el b/test/test-track.el
index c3f8f9d..e3befb0 100644
--- a/test/test-track.el
+++ b/test/test-track.el
@@ -105,8 +105,9 @@ trepan: That's all, folks...
(note "realgud:eval-command-p")
(setq test-command-name-hash (make-hash-table :test 'equal))
-(puthash "eval" "eval" test-command-name-hash)
(set (make-local-variable 'realgud-command-name-hash) test-command-name-hash)
+(assert-nil (realgud:eval-command-p "eval 'cow'\n'cow'\n(pdb)"))
+(puthash "eval" "eval" test-command-name-hash)
(assert-t (realgud:eval-command-p "eval 'cow'\n'cow'\n(pdb)"))
(assert-nil (realgud:eval-command-p "next 1"))
- [elpa] externals/realgud 7cc1230 047/140: extract method for breakpoint stuff in realgud:track-from-region, (continued)
- [elpa] externals/realgud 7cc1230 047/140: extract method for breakpoint stuff in realgud:track-from-region, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud aa933eb 038/140: Merge pull request #194 from jodonnell/print, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 2fad0c4 020/140: Add test case for an error when realgud:backtrace-init is hanging at startup, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 59b2563 023/140: Add gdb "delete" template, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud d9a3a92 046/140: Administrivia, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud bfabb0e 034/140: I am really bad with Elisp syntax, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 4692821 051/140: fixed an error, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 57eed60 027/140: making eval output truncate and saving all the current command hash, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 6986293 035/140: I am also bad at match relations, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud d00539e 030/140: Merge branch 'print' of https://github.com/jodonnell/realgud into print, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 90fe351 033/140: More Emacs-gaurded handling of realgud:join-string,
Rocky Bernstein <=
- [elpa] externals/realgud 53b0c1a 040/140: Be Explicit about eval command ..., Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 4babac3 042/140: Track changes in elpa:, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 348f73a 049/140: Merge pull request #198 from jodonnell/refactor, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 3804711 045/140: Get ready for 1.4.4 release. Admnistrivia, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 61fbadb 052/140: Merge pull request #199 from jodonnell/whoops, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 3a2e300 055/140: Merge pull request #200 from jodonnell/move-bps, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud b86a9df 054/140: refactor breakpoints further, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud ba91d87 058/140: Add realgud-populate-common-fn-keys-none to not set function keys..., Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 210bd76 053/140: moving breakpoint functions to more central locations, Rocky Bernstein, 2019/05/25
- [elpa] externals/realgud 2b3ffb5 061/140: Add realgud:bashdb-large to handle large bash files, Rocky Bernstein, 2019/05/25