fix content type for xml/put.pl

diff --git a/xml-db/put.pl b/xml-db/put.pl
index b564bd518aa6cda322aa22dfa6e2be44c7b2b7a0..2950c74e8013b69f53cb52bfa7cae39198e25b02 100755 (executable)
--- a/xml-db/put.pl
+++ b/xml-db/put.pl
@@ -31,8 +31,11 @@ if (defined $ENV{'QUERY_STRING'}) {
   @request = split("&",$ENV{'QUERY_STRING'});
   unless ($server  =~ /HTTPi/i) {
     print "Content-type: text/html\n\n";
-    }
+  } else {
+    &htsponse(200, "OK");
+    print "Content-type: text/html; charset=utf-8\r\n\r\n";
   }
+}
 else {
   $request[0] = ""; #Dummy entry to run foreach
   }