[59315] trunk/base/src/registry1.0/portimage.tcl

[jmr at macports.org]

Revision: 59315
          http://trac.macports.org/changeset/59315
Author:   jmr at macports.org
Date:     2009-10-13 06:53:46 -0700 (Tue, 13 Oct 2009)
Log Message:
-----------
remove a couple of useless lines from _deactivate_contents

Modified Paths:
--------------
    trunk/base/src/registry1.0/portimage.tcl

Modified: trunk/base/src/registry1.0/portimage.tcl
===================================================================
--- trunk/base/src/registry1.0/portimage.tcl	2009-10-13 13:42:26 UTC (rev 59314)
+++ trunk/base/src/registry1.0/portimage.tcl	2009-10-13 13:53:46 UTC (rev 59315)
@@ -392,12 +392,9 @@
 }
 
 proc _deactivate_contents {name imagefiles} {
-	variable force
-
 	set files [list]
 	
 	foreach file $imagefiles {
-		set port [registry::file_registered $file]
 		if { [file exists $file] || (![catch {file type $file}] && [file type $file] == "link") } {
 			# Normalize the file path to avoid removing the intermediate
 			# symlinks (remove the empty directories instead)
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20091013/fbcf2c4b/attachment.html>