branch: externals/async
commit d834cd90fe6f1d87dab86b637d23958241cadac3
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>
Don't alter the string itself when stripping out "#"'s #145
---
async.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/async.el b/async.el
index eb9da7b..a8455b6 100644
--- a/async.el
+++ b/async.el
@@ -175,8 +175,8 @@ It is intended to be used as follows:
;; can parse it to restitute marker.
(while (re-search-forward "#<\\([^>]*\\)>" nil t)
(replace-match (concat "(" (match-string 1) ")") t t)))
- (while (re-search-forward "#" nil t)
- (replace-match "" t t))
+ (while (re-search-forward "#(" nil t)
+ (replace-match "(" t t))
(goto-char (point-max))
(backward-sexp)
(async-handle-result async-callback (read (current-buffer))
