yaz/commit

allow empty Process

authorMichiel Hildebrand
Thu Nov 10 10:47:09 2011 +0100
committerMichiel Hildebrand
Thu Nov 10 10:47:09 2011 +0100
commit296dc6e926f6cb1eb47d4d8b0175d009f662773f
tree6c367948cc332c9786106f8c413e4d26d97b6df2
parenta72b96ff6a47cc7c5185c6320e26ffa400ffa2fe
Diff style: patch stat
diff --git a/api/edm_export.pl b/api/edm_export.pl
index d16190f..e152e8e 100644
--- a/api/edm_export.pl
+++ b/api/edm_export.pl
@@ -49,8 +49,11 @@ http_yaz_sip_update(Request) :-
 				    [boolean, default(false),
 				     description('When true only tags that are entered by >1 user are shown')])
 			]),
-	 % end TagGarden process
-	end_user_process(Process),
+	% end TagGarden process
+	(   nonvar(Process)
+	->  end_user_process(Process)
+	;   true
+	),
 	(   ShotLevel
 	->  video_shot_annotations(Video, Process, Annotations)
 	;   video_annotations(Video, Annotations0,