Changeset 662


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

# on 2002/12/27 18:25:35, toby did:
fix MM read bug

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/readexp.tcl

    • Property rcs:date changed from 2002/07/18 20:52:41 to 2002/12/27 18:25:35
    • Property rcs:lines changed from +6 -4 to +4 -3
    • Property rcs:rev changed from 1.36 to 1.37
    r634 r662  
    115115        } else {
    116116            foreach key [array names exparray "CRS$iph  AT*"] {
    117                 lappend expmap(atomlist_$iph) [scan [string range $key 8 11] %x]
     117                scan [string range $key 8 11] %x atm
     118                lappend expmap(atomlist_$iph) $atm
    118119            }
    119120        }
Note: See TracChangeset for help on using the changeset viewer.