summaryrefslogtreecommitdiffstats
path: root/ds9/library
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-06-21 19:07:46 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-06-21 19:07:46 (GMT)
commit6d5c5839631639d21a123e97c0afbb07d6ee68a3 (patch)
tree53fa318ac613fbe1c529f59aedd5108769319bbe /ds9/library
parente384095085218f8181d2a8f9492fafcefe1b33d0 (diff)
downloadblt-6d5c5839631639d21a123e97c0afbb07d6ee68a3.zip
blt-6d5c5839631639d21a123e97c0afbb07d6ee68a3.tar.gz
blt-6d5c5839631639d21a123e97c0afbb07d6ee68a3.tar.bz2
update ds9 parsers
Diffstat (limited to 'ds9/library')
-rw-r--r--ds9/library/error.tcl6
1 files changed, 3 insertions, 3 deletions
diff --git a/ds9/library/error.tcl b/ds9/library/error.tcl
index afed4ea..906a9e4 100644
--- a/ds9/library/error.tcl
+++ b/ds9/library/error.tcl
@@ -59,12 +59,12 @@ proc ParserError {msg yycnt yy_current_buffer index_} {
xpa -
hv -
samp {
- Error "$msg: [lindex $yy_current_buffer [expr $yycnt-1]]"
+ Error "$msg, found [lindex $yy_current_buffer [expr $yycnt-1]]"
}
default {
- puts stderr "[string range $yy_current_buffer 0 80]"
+ puts stderr "[string range $yy_current_buffer 0 60]"
puts stderr [format "%*s" $index_ ^]
- puts stderr "$msg:"
+ puts stderr "$msg"
QuitDS9
}
}