projects
/
yaz-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Removed unused variable
[yaz-moved-to-github.git]
/
src
/
csvtosrw.tcl
diff --git
a/src/csvtosrw.tcl
b/src/csvtosrw.tcl
old mode 100755
(executable)
new mode 100644
(file)
index
157e231
..
f101bf1
--- a/
src/csvtosrw.tcl
+++ b/
src/csvtosrw.tcl
@@
-1,18
+1,14
@@
-#!/bin/sh
-# the next line restats using tclsh \
-exec tclsh "$0" "$@"
+#!/usr/bin/tclsh
#
# This file is part of the YAZ toolkit
#
# 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.
#
# See the file LICENSE for details.
#
-# $Id: csvtosrw.tcl,v 1.1 2005-04-22 08:27:58 adam Exp $
#
# Converts a CSV file with SRW diagnostics to C+H file for easy
# maintenance
#
#
# Converts a CSV file with SRW diagnostics to C+H file for easy
# maintenance
#
-# $Id: csvtosrw.tcl,v 1.1 2005-04-22 08:27:58 adam Exp $
-source csvtodiag.tcl
+source [lindex $argv 0]/csvtodiag.tcl
-csvtodiag {srw.csv diagsrw.c ../include/yaz/diagsrw.h} srw {}
\ No newline at end of file
+csvtodiag [list [lindex $argv 0]/srw.csv diagsrw.c [lindex $argv 0]/../include/yaz/diagsrw.h] srw {}