Changeset 88 for trunk/lstview


Ignore:
Timestamp:
Dec 4, 2009 5:00:12 PM (11 years ago)
Author:
toby
Message:

# on 1999/07/21 15:12:10, toby did:
fix error reading R(F2)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/lstview

    • Property rcs:date changed from 1999/04/06 21:37:19 to 1999/07/21 15:12:10
    • Property rcs:lines changed from +31 -6 to +6 -4
    • Property rcs:rev changed from 1.5 to 1.6
    r77 r88  
    129129            set line [lindex [split $npos .] 0]
    130130            set x [$win get $line.0 $line.end]
    131             regexp {gram *([0-9]+).*\) =(.*)} $x a hst rf2
    132             lappend valuelst(Rbragg$hst) $cycle $rf2
     131            catch {
     132                regexp {gram *([0-9]+).*\) =(.*)} $x a hst rf2
     133                lappend valuelst(Rbragg$hst) $cycle $rf2
     134            }
    133135            $win tag add rval $npos $line.end
    134136            set npos [$win search -regexp -count chars \
Note: See TracChangeset for help on using the changeset viewer.