* lisp/dired-x.el (dired-filename-at-point): Fix 8-year old typo.

[bpt/emacs.git] / lisp / dired-x.el

diff --git a/lisp/dired-x.el b/lisp/dired-x.el
index 0d16eef..56b3c7b 100644 (file)
--- 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)))