summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorDave Love <fx@gnu.org>2000-11-10 18:01:58 +0000
committerDave Love <fx@gnu.org>2000-11-10 18:01:58 +0000
commit31f35b6f94447fba95fc1f19bb5ec91a88cd8cc6 (patch)
tree559653dce6d5b340e9d453ce872ff3c19ce77741 /lisp
parentce2a8a6a938b759d84aa33eb6e06e0e0109b64b6 (diff)
downloademacs-31f35b6f94447fba95fc1f19bb5ec91a88cd8cc6.tar.gz
emacs-31f35b6f94447fba95fc1f19bb5ec91a88cd8cc6.tar.bz2
emacs-31f35b6f94447fba95fc1f19bb5ec91a88cd8cc6.zip
(gnus-start-news-server): Use expand-file-name, not
concat.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/gnus/gnus-int.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-int.el b/lisp/gnus/gnus-int.el
index bdd0227b848..d5a507599f9 100644
--- a/lisp/gnus/gnus-int.el
+++ b/lisp/gnus/gnus-int.el
@@ -70,8 +70,7 @@ If CONFIRM is non-nil, the user will be asked for an NNTP server."
(list 'nnmh-directory
(file-name-as-directory
(expand-file-name
- (concat "~/" (substring
- gnus-nntp-server 1)))))
+ (substring gnus-nntp-server 1) "~/")))
(list 'nnmh-get-new-mail nil)))
(t
(list 'nntp gnus-nntp-server)))))