[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 7c691f3: pcmpl-ssh-known-hosts: Use `char-before' i
From: |
Nicolas Richard |
Subject: |
[Emacs-diffs] master 7c691f3: pcmpl-ssh-known-hosts: Use `char-before' instead of `looking-back'. |
Date: |
Fri, 03 Apr 2015 11:56:48 +0000 |
branch: master
commit 7c691f32f78303750d29972a29dcc6754fae257a
Author: Nicolas Richard <address@hidden>
Commit: Nicolas Richard <address@hidden>
pcmpl-ssh-known-hosts: Use `char-before' instead of `looking-back'.
Fixes: debbugs:17284
* lisp/pcmpl-unix.el (pcmpl-ssh-known-hosts): Use `char-before' instead
of `looking-back'.
---
lisp/ChangeLog | 5 +++++
lisp/pcmpl-unix.el | 2 +-
2 files changed, 6 insertions(+), 1 deletions(-)
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b004a2b..7a4293b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2015-04-03 Nicolas Richard <address@hidden>
+
+ * pcmpl-unix.el (pcmpl-ssh-known-hosts): Use `char-before' instead
+ of `looking-back' (bug#17284).
+
2015-04-03 Dmitry Gutov <address@hidden>
* progmodes/js.el (js-indent-line): Do nothing when bol is inside
diff --git a/lisp/pcmpl-unix.el b/lisp/pcmpl-unix.el
index 3598cd6..7be57e9 100644
--- a/lisp/pcmpl-unix.el
+++ b/lisp/pcmpl-unix.el
@@ -157,7 +157,7 @@ documentation), this function returns nil."
(while (re-search-forward (concat "^ *" host-re) nil t)
(add-to-list 'ssh-hosts-list (concat (match-string 1)
(match-string 2)))
- (while (and (looking-back ",")
+ (while (and (eq (char-before) ?,)
(re-search-forward host-re (line-end-position) t))
(add-to-list 'ssh-hosts-list (concat (match-string 1)
(match-string 2)))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 7c691f3: pcmpl-ssh-known-hosts: Use `char-before' instead of `looking-back'.,
Nicolas Richard <=