Read works. Forward missing (but safe to commit, as not used from anywhere)
[idzebra-moved-to-github.git] / data1 / d1_write.c
index 587e75d..20b7b14 100644 (file)
@@ -1,14 +1,30 @@
-/*
- * Copyright (c) 1995-2002, Index Data.
- * See the file LICENSE for details.
- * Sebastian Hammer, Adam Dickmeiss
- *
- * $Id: d1_write.c,v 1.1 2002-10-22 12:53:33 adam Exp $
- */
+/* $Id: d1_write.c,v 1.4 2004-09-28 10:15:03 adam Exp $
+   Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002
+   Index Data Aps
+
+This file is part of the Zebra server.
+
+Zebra is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2, or (at your option) any later
+version.
+
+Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+for more details.
+
+You should have received a copy of the GNU General Public License
+along with Zebra; see the file LICENSE.zebra.  If not, write to the
+Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
+02111-1307, USA.
+*/
+
+/* converts data1 tree to XML record */
 
 #include <string.h>
 
-#include <data1.h>
+#include <idzebra/data1.h>
 #include <yaz/wrbuf.h>
 
 #define IDSGML_MARGIN 75
@@ -98,8 +114,6 @@ static int nodetoidsgml(data1_node *n, int select, WRBUF b, int col,
 
         if (c->which == DATA1N_preprocess)
         {
-            data1_xattr *p;
-
             if (pretty_format)
                 indent (b, col);
            wrbuf_puts (b, "<?");
@@ -124,8 +138,6 @@ static int nodetoidsgml(data1_node *n, int select, WRBUF b, int col,
            }
            else
            {
-               data1_xattr *p;
-
                 if (pretty_format)
                     indent (b, col);
                wrbuf_puts (b, "<");