# the next line restarts using tclsh \
exec tclsh "$0" "$@"
#
-# $Id: cvs-date.tcl,v 1.3 2001-09-11 12:43:40 adam Exp $
+# $Id: cvs-date.tcl,v 1.4 2001-09-11 12:44:22 adam Exp $
set sec 0
proc cvslog {} {
set f [open [lindex $argv 0] w]
puts $f "#define YAZ_DATE ${sec}L"
puts $f "#define YAZ_DATE_STR \"$sec\""
- puts $f
+ puts $f ""
close $f
} else {
puts $sec