X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fcomponents%2Fgetter%2Fhttp_getter_storage.ml;h=b1a05d9963f0b24673a56892af8ede8695fdc125;hb=6039963e325cd4001853478403b671dfcbd7698a;hp=3650d79b95f0bc9b492271a4ea35db4d64e150eb;hpb=ee3f8d6fa92b051394a2ff7c71c03ac33a05182b;p=helm.git

diff --git a/helm/software/components/getter/http_getter_storage.ml b/helm/software/components/getter/http_getter_storage.ml
index 3650d79b9..b1a05d996 100644
--- a/helm/software/components/getter/http_getter_storage.ml
+++ b/helm/software/components/getter/http_getter_storage.ml
@@ -295,7 +295,10 @@ let exists s =
   with Resource_not_found _ -> false
 
 let resolve ?(must_exists=true) ~writable =
-  dispatch_single 
+  (if must_exists then
+    dispatch_multi
+  else
+    dispatch_single)
     { write = writable;
       name="resolve"; 
       exists = must_exists;