[30245] users/rhwood/MacPorts.Framework/MPPort.m

source_changes at macosforge.org source_changes at macosforge.org
Mon Oct 22 19:02:22 PDT 2007


Revision: 30245
          http://trac.macosforge.org/projects/macports/changeset/30245
Author:   rhwood at macports.org
Date:     2007-10-22 19:02:22 -0700 (Mon, 22 Oct 2007)

Log Message:
-----------
Test that a port is installed. As of now, this code only sets the Not Installed state from the default state of Unknown.

Modified Paths:
--------------
    users/rhwood/MacPorts.Framework/MPPort.m

Modified: users/rhwood/MacPorts.Framework/MPPort.m
===================================================================
--- users/rhwood/MacPorts.Framework/MPPort.m	2007-10-23 02:00:53 UTC (rev 30244)
+++ users/rhwood/MacPorts.Framework/MPPort.m	2007-10-23 02:02:22 UTC (rev 30245)
@@ -73,7 +73,12 @@
 
 - (void) setPortWithTclListAsString:(NSString *)string {
 	MPInterpreter *interpreter;
+	MPRegistery *registery;
+	NSArray *installed;
+	NSEnumerator *installedEnumerator;
+	id item;
 	interpreter = [MPInterpreter sharedInterpreter];
+	registery = [MPRegistery sharedRegistery];
 	
 	[self setDictionary:[interpreter dictionaryFromTclListAsString:string]];
 
@@ -124,6 +129,15 @@
 	[self setValue:[[[self valueForKey:@"version"] stringByAppendingString:@"_"] stringByAppendingString:[self valueForKey:@"revision"]] forKey:@"compositeVersion"];
 	// set the status flag to unknown
 	[self setState:MPPortStateUnknown];
+	installed = [[registery installed:[self valueForKey:@"name"]] valueForKey:[self valueForKey:@"name"]];
+	if (installed) {
+		installedEnumerator = [installed objectEnumerator];
+		while (item = [installedEnumerator nextObject]) {
+			
+		}
+	} else {
+		[self setState:MPPortStateNotInstalled];
+	}
 }	
 
 - (void)addDependencyAsPortName:(NSString *)dependency {

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.macosforge.org/pipermail/macports-changes/attachments/20071022/80f8aadf/attachment.html


More information about the macports-changes mailing list