diff options
| author | Michael Albinus | 2013-09-06 10:24:00 +0200 |
|---|---|---|
| committer | Michael Albinus | 2013-09-06 10:24:00 +0200 |
| commit | 352d3beabbb6aada64c9fd1b946954164640b7f7 (patch) | |
| tree | 8f9f4826ec8e36346995c6b6dbd2d2b39dafedfe | |
| parent | 1486fa3149caaf94f0fa88b91fa9fe6616c67ea1 (diff) | |
| download | emacs-352d3beabbb6aada64c9fd1b946954164640b7f7.tar.gz emacs-352d3beabbb6aada64c9fd1b946954164640b7f7.zip | |
Format long lines.
| -rw-r--r-- | lisp/net/tramp-gvfs.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el index e70400af820..a1ead96eaea 100644 --- a/lisp/net/tramp-gvfs.el +++ b/lisp/net/tramp-gvfs.el | |||
| @@ -1424,7 +1424,8 @@ It was \"a(say)\", but has changed to \"a{sv})\"." | |||
| 1424 | (string-match "^/?\\([^/]+\\)" localname) | 1424 | (string-match "^/?\\([^/]+\\)" localname) |
| 1425 | (list (tramp-gvfs-mount-spec-entry "type" "smb-share") | 1425 | (list (tramp-gvfs-mount-spec-entry "type" "smb-share") |
| 1426 | (tramp-gvfs-mount-spec-entry "server" host) | 1426 | (tramp-gvfs-mount-spec-entry "server" host) |
| 1427 | (tramp-gvfs-mount-spec-entry "share" (match-string 1 localname)))) | 1427 | (tramp-gvfs-mount-spec-entry |
| 1428 | "share" (match-string 1 localname)))) | ||
| 1428 | ((string-equal "obex" method) | 1429 | ((string-equal "obex" method) |
| 1429 | (list (tramp-gvfs-mount-spec-entry "type" method) | 1430 | (list (tramp-gvfs-mount-spec-entry "type" method) |
| 1430 | (tramp-gvfs-mount-spec-entry | 1431 | (tramp-gvfs-mount-spec-entry |
| @@ -1441,7 +1442,8 @@ It was \"a(say)\", but has changed to \"a{sv})\"." | |||
| 1441 | ,@(when domain | 1442 | ,@(when domain |
| 1442 | (list (tramp-gvfs-mount-spec-entry "domain" domain))) | 1443 | (list (tramp-gvfs-mount-spec-entry "domain" domain))) |
| 1443 | ,@(when port | 1444 | ,@(when port |
| 1444 | (list (tramp-gvfs-mount-spec-entry "port" (number-to-string port)))))) | 1445 | (list (tramp-gvfs-mount-spec-entry |
| 1446 | "port" (number-to-string port)))))) | ||
| 1445 | (mount-pref | 1447 | (mount-pref |
| 1446 | (if (and (string-match "\\`dav" method) | 1448 | (if (and (string-match "\\`dav" method) |
| 1447 | (string-match "^/?[^/]+" localname)) | 1449 | (string-match "^/?[^/]+" localname)) |