[29343] trunk/base/portmgr/PortIndex2MySQL.tcl

[source_changes at macosforge.org]

Revision: 29343
          http://trac.macosforge.org/projects/macports/changeset/29343
Author:   jmpp at macports.org
Date:     2007-09-21 11:18:35 -0700 (Fri, 21 Sep 2007)

Log Message:
-----------

Introduce some BUG markers for stuff I need to cleanup (lock file is not being properly removed
in some places where it should)... when I get back, I have to run now!

Modified Paths:
--------------
    trunk/base/portmgr/PortIndex2MySQL.tcl

Modified: trunk/base/portmgr/PortIndex2MySQL.tcl
===================================================================
--- trunk/base/portmgr/PortIndex2MySQL.tcl	2007-09-21 18:05:40 UTC (rev 29342)
+++ trunk/base/portmgr/PortIndex2MySQL.tcl	2007-09-21 18:18:35 UTC (rev 29343)
@@ -145,6 +145,7 @@
 if {[catch {mportinit ui_options} errstr]} {
     ui_error "${::errorInfo}"
     ui_error "Failed to initialize MacPorts, $errstr"
+#(BUG: need to cleanup lock file here!)
     terminate 1
 }
 
@@ -153,6 +154,7 @@
 if {[catch {macports::selfupdate} errstr]} {
     ui_error "${::errorInfo}"
     ui_error "Failed to update the ports tree, $errstr"
+#(BUG: need to cleanup lock file here!)
     terminate 1
 }
 
@@ -161,11 +163,13 @@
 proc getpasswd {passwdfile} {
     if {[catch {open $passwdfile r} passwdfile_fd]} {
         ui_error "${::errorCode}: $passwdfile_fd"
+#(BUG: need to cleanup lock file here!)
         terminate 1
     }
     if {[gets $passwdfile_fd passwd] <= 0} {
         close $passwdfile_fd
         ui_error "No password found in $passwdfile!"
+#(BUG: need to cleanup lock file here!)
         terminate 1
     }
     close $passwdfile_fd
@@ -183,8 +187,10 @@
 
 
 # Flat text file to which sql statements are written.
+#(BUG: need to cleanup lock file here!)
 if {[catch {open $sqlfile w+} sqlfile_fd]} {
     ui_error "${::errorCode}: $sqlfile_fd"
+#(BUG: need to cleanup lock file here!)
     terminate 1
 }
 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20070921/5dd4c27a/attachment.html