Changeset 562 for trunk/import_cell.tcl

Timestamp:

Dec 4, 2009 5:08:15 PM (14 years ago)

Author:

toby

Message:

# on 2002/02/11 19:30:57, toby did:
make sure file gets closed

File:

• trunk/import_cell.tcl (modified) (2 diffs, 3 props)

trunk/import_cell.tcl

@@ -31 +31 @@
                 set setting [lindex $line 2]
                 if {$setting == ""} {set setting 1}
+                # note that RGNR comes at the end of the file; ignore 
+                # anything beyond here
                 close $fp
                 global expgui
@@ -39 +41 @@
                         set spg [lindex $line 8]
                         set shift [lindex $line 9]
-                        close $fp
                         break
                     }
                 }
+                close $fp
                 break
             }