Modified: trunk/base/src/port1.0/portactivate.tcl (140034 => 140035)
--- trunk/base/src/port1.0/portactivate.tcl 2015-09-07 14:43:21 UTC (rev 140034)
+++ trunk/base/src/port1.0/portactivate.tcl 2015-09-07 16:09:03 UTC (rev 140035)
@@ -63,15 +63,12 @@
global subport version revision portvariants user_options PortInfo
registry_activate $subport $version $revision $portvariants [array get user_options]
- if {[info exists PortInfo(notes)] && [llength $PortInfo(notes)] > 0} {
- ui_notifications_append $subport $PortInfo(notes)
- }
return 0
}
proc portactivate::activate_finish {args} {
- global subport startupitem.autostart UI_PREFIX
+ global subport startupitem.autostart PortInfo UI_PREFIX
# Do this _after_ activate_main, because post-activate hooks might create
# the files needed for this
@@ -83,5 +80,10 @@
}
}
+ # Save notes for display by the port client
+ if {[info exists PortInfo(notes)] && [llength $PortInfo(notes)] > 0} {
+ ui_notifications_append $subport $PortInfo(notes)
+ }
+
return 0
}