procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Format long lines.

Browse source
This commit is contained in:
Michael Albinus 2013-09-06 10:24:00 +02:00
parent 1486fa3149
commit 352d3beabb
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/net/tramp-gvfs.el
View file

@ -1424,7 +1424,8 @@ It was \"a(say)\", but has changed to \"a{sv})\"."
(string-match "^/?\\([^/]+\\)" localname)
(list (tramp-gvfs-mount-spec-entry "type" "smb-share")
(tramp-gvfs-mount-spec-entry "server" host)
(tramp-gvfs-mount-spec-entry "share" (match-string 1 localname))))
(tramp-gvfs-mount-spec-entry
"share" (match-string 1 localname))))
((string-equal "obex" method)
(list (tramp-gvfs-mount-spec-entry "type" method)
(tramp-gvfs-mount-spec-entry
@ -1441,7 +1442,8 @@ It was \"a(say)\", but has changed to \"a{sv})\"."
,@(when domain
(list (tramp-gvfs-mount-spec-entry "domain" domain)))
,@(when port
(list (tramp-gvfs-mount-spec-entry "port" (number-to-string port))))))
(list (tramp-gvfs-mount-spec-entry
"port" (number-to-string port))))))
(mount-pref
(if (and (string-match "\\`dav" method)
(string-match "^/?[^/]+" localname))