Commits

Anonymous committed d358238 Draft

.

Comments (0)

Files changed (1)

src/pre_template.ml

 
     let last_component_of_uri u =
       let (_pre, post) = split_by_last ( (=) '/' ) u in
-      post
+      if post = ""
+      then
+        failwith "can't determine last component of uri %S" u
+      else
+        post
 
-    let dl_local path =
-            (fun ~dl_dest ->
-               ( ignore dl_dest
-               ; path
-               )
-            )
 
     let hg ?(rev="tip") repo =
       let clone ~workcopy ~src ~dest =