From 8551cb3203ce2a4a22f8ac336eb628c400a65021 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 16 Feb 2011 20:38:23 -0800 Subject: [PATCH] * lisp/dired-x.el (dired-filename-at-point): Fix 8-year old typo. Introduced in 2003-01-27T11:36:08Z!fx@gnu.org, 2003/01/27. --- lisp/ChangeLog | 4 ++++ lisp/dired-x.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fafb931b3c..c626dcd4b9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2011-02-17 Glenn Morris + + * dired-x.el (dired-filename-at-point): Fix 8-year old typo. + 2011-02-16 Ken Manheimer * allout-widgets.el: New allout extension that shows allout diff --git a/lisp/dired-x.el b/lisp/dired-x.el index 0d16eef1c2..56b3c7b288 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el @@ -1678,7 +1678,7 @@ Not perfect - point must be in middle of or end of filename." (setq prefix (and (string-match "^\\w+@" - (buffer-substring start (line-beginning-position))) + (buffer-substring start (line-end-position))) "/")) (goto-char start) (if (string-match "[/~]" (char-to-string (preceding-char))) -- 2.20.1