src/Pure/General/ssh.scala

   }
 
   val default_port = 22
   def make_port(port: Int): Int = if (port > 0) port else default_port
 
-  def port_suffix(port: Int, suffix: String = ":"): String =
-    if (port == default_port) "" else suffix + port
+  def port_suffix(port: Int): String =
+    if (port == default_port) "" else ":" + port
 
   def user_prefix(user: String): String =
     proper_string(user) match {
       case None => ""
       case Some(name) => name + "@"

     def port: Int = session.getPort
 
     override def hg_url: String =
       "ssh://" + user_prefix(nominal_user) + nominal_host + "/"
 
+    override def rsync_prefix: String =
+      user_prefix(nominal_user) + nominal_host + ":"
+
     override def toString: String =
       user_prefix(session.getUserName) + host + port_suffix(port) +
       (if (session.isConnected) "" else " (disconnected)")
 
 

 
   trait System extends AutoCloseable {
     def close(): Unit = ()
 
     def hg_url: String = ""
+
+    def rsync_prefix: String = ""
+    def rsync_path(path: Path): String = rsync_prefix + expand_path(path)
 
     def expand_path(path: Path): Path = path.expand
     def bash_path(path: Path): String = File.bash_path(path)
     def is_dir(path: Path): Boolean = path.is_dir
     def is_file(path: Path): Boolean = path.is_file