]> code.delx.au - gnu-emacs/commitdiff
Format long lines.
authorMichael Albinus <michael.albinus@gmx.de>
Fri, 6 Sep 2013 08:24:00 +0000 (10:24 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Fri, 6 Sep 2013 08:24:00 +0000 (10:24 +0200)
lisp/net/tramp-gvfs.el

index e70400af820f14bd7a2fbf87b6719a2c6686bb04..a1ead96eaeabe5faea8085f5035ff92e1bfd89d0 100644 (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))