Added authorization launcher (no more terminal needed \!)

git-svn-id: https://svn.macports.org/repository/macports/branches/gsoc15-pallet@139317 d073be05-634f-4543-b044-5fe20cf6d1d6

MacPorts_Framework/MPPort.m

@@ -309,7 +309,7 @@
 	NSLog(@"Interpreter string:\n%@",[NSString stringWithFormat:
 									  @"set portHandle [mportopen  %@  %@  %@]; mportexec  $portHandle %@; mportclose $portHandle", 
 									  [self valueForKey:@"porturl"], opts, vrnts, target]);
-
+    NSString * foo = [interpreter evaluateStringAsString:[NSString stringWithFormat:@"ui_msg \"Test\""] error:execError];
     NSString * test = [interpreter evaluateStringAsString:[NSString stringWithFormat:@"set portHandle [mportopen  %@  %@  %@]; mportexec  $portHandle %@; mportclose $portHandle", [self valueForKey:@"porturl"], opts, vrnts] error:execError];
     NSLog(@"Pills: %@", test);
 	

MacPorts_Framework/init.tcl

@@ -1,6 +1,3 @@
-
-#set auto_path [concat $auto_path "/opt/local/libexec/macports/lib/"]
-
 package require macports
 package require notifications
 
@@ -31,7 +28,10 @@ proc ui_init {priority prefix channels message} {
 
     proc ::ui_$priority {message} [subst {
         notifications send $nottype "$channels($priority) $prefix" "\$message"
+        set $prefix "TEST"
+
         ui_message $priority $prefix "" "\$message"
+        puts "TESTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT"
     }]
 }
 

MacPorts_Framework/interpInit.tcl

@@ -1,7 +1,6 @@
 package require macports
 package require simplelog
 
-
 proc ui_init {priority prefix channels message} {
     switch $priority {
   		msg {
@@ -13,6 +12,7 @@ proc ui_init {priority prefix channels message} {
   		}
   		warn {
   			set nottype "MPWarnNotification"
+
   		}
   		error {
   			set nottype "MPErrorNotification"
@@ -30,6 +30,7 @@ proc ui_init {priority prefix channels message} {
     proc ::ui_$priority {message} [subst {
         simplelog "$nottype $channels($priority) $prefix" "\$message"
         ui_message $priority $prefix "" "\$message"
+        puts "**************************************************"
     }]
 }
 

MacPorts_Framework/portProcessInit.tcl

@@ -29,7 +29,9 @@ proc ui_init {priority prefix channels message} {
 
     proc ::ui_$priority {message} [subst {
         simplelog "$nottype $channels($priority) $prefix" "\$message"
-        ui_message $priority $prefix "" "\$message"
+        set $prefix "TEST"
+        ui_message $priority $prefix"" "\$message"
+        puts "TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT"
     }]
 }
 
@@ -48,7 +50,7 @@ proc mportuninstall {portname {version ""} {revision ""} {variants 0} {optionsli
 	}
 }
 proc mportuninstall_composite {portname {v ""} {optionslist ""} } {
-    puts "I am here, hear me moo"
+    ui_msg "I am here, hear me moo"
 	if {[catch {registry_uninstall::uninstall_composite $portname $v [array get options]} result]} {
 		
 			global errorInfo

Pallet/SMJobBlessHelper/main.c

@@ -1,10 +1,3 @@
-//
-//  main.c
-//  SMJobBlessHelper
-//
-//  Created by Mr. Appleseed on 7/2/15.
-//
-//
 
 #include <stdio.h>
 

build_and_run.sh

@@ -1,11 +0,0 @@
-#!/bin/bash
-
-if [ "$(id -u)" != "0" ]; then
-    echo "This build script requires you to run as root. " 1>&2
-    exit 1
-fi
-
-cd Pallet/
-make
-build/Build/Products/Debug/Pallet.app/Contents/MacOS/Pallet
-