X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=src%2Fcsvtodiag.tcl;h=e0df27ed3997b19ddb76eb8b6a178623ce4eac1b;hb=db93359f0cbf9a1e9dc81ea05f7b8662f843ae3d;hp=e5d6a3f3f4ffd4a68c4ab6111e6cf1b0771ea528;hpb=84d7b06c13daa609e93f353e655c4b02f936d65c;p=yaz-moved-to-github.git

diff --git a/src/csvtodiag.tcl b/src/csvtodiag.tcl
index e5d6a3f..e0df27e 100644
--- a/src/csvtodiag.tcl
+++ b/src/csvtodiag.tcl
@@ -1,8 +1,8 @@
 # This file is part of the YAZ toolkit
-# Copyright (c) Index Data 1996-2005
+# Copyright (c) Index Data 1996-2007
 # See the file LICENSE for details.
 #
-# $Id: csvtodiag.tcl,v 1.1 2005-04-22 08:27:58 adam Exp $
+# $Id: csvtodiag.tcl,v 1.4 2007-01-03 08:42:15 adam Exp $
 #
 # Converts a CSV file with diagnostics to C+H file for easy
 # maintenance
@@ -17,10 +17,13 @@ proc csvtodiag {ifiles name alias} {
     set cfile [open [lindex $ifiles 1] w]
     set hfile [open [lindex $ifiles 2] w]
     set lineno 0
-    set preamble "/* Generated automatically by csvtodiag.tcl from [lindex $ifiles 0] */"
+    puts $cfile "/** \\file [lindex $ifiles 1]"
+    puts $hfile "/** \\file [lindex $ifiles 2]"
+    set preamble "    \\brief Diagnostics: Generated by csvtodiag.tcl from [lindex $ifiles 0] */"
     puts $cfile $preamble
     puts $cfile "
 #include \"diag-entry.h\"
+\#include \"[lindex $ifiles 2]\"
 struct yaz_diag_entry yaz_diag_${name}_tab\[\] = \{
 "
     puts $hfile $preamble