Pass base commit to gitty_update/5. Need to deal with proper error message.

Author: Jan Wielemaker

lib/storage.pl

@@ -163,7 +163,7 @@
 	->  gitty_data(Dir, File, Data, _OldMeta)
 	;   option(data(Data), Dict, "")
 	),
-	meta_data(Request, Dict, Meta),
+	meta_data(Request, Dir, Dict, Meta),
 	storage_url(File, URL),
 	gitty_update(Dir, File, Data, Meta, Commit),
 	debug(storage, 'Updated: ~p', [Commit]),
@@ -189,7 +189,7 @@
 	http_link_to_id(web_storage, path_postfix(File), HREF).
 
 %%	meta_data(+Request, +Dict, -Meta) is det.
-%%	meta_data(+Request, Store, +Dict, -Meta) is det.
+%%	meta_data(+Request, +Store, +Dict, -Meta) is det.
 %
 %	Gather meta-data from the  Request   (user,  peer)  and provided
 %	meta-data. Illegal and unknown values are ignored.

web/js/storage.js

@@ -284,9 +284,6 @@ define([ "jquery", "config", "modal", "form", "gitty", "history", "tabbed",
 	post = { data: data.getValue(),
 		 type: type.dataType
 	       };
-	if ( data.meta ) {			/* rename */
-	  post.previous = data.meta.commit;
-	}
       } else {
 	if ( !data.isClean(data.cleanGeneration) ) {
 	  post = { data: data.getValue(),
@@ -300,6 +297,8 @@ define([ "jquery", "config", "modal", "form", "gitty", "history", "tabbed",
 
       if ( meta )
 	post.meta = meta;
+      if ( data.meta )
+	post.previous = data.meta.commit;
 
       $.ajax({ url: url,
                dataType: "json",