Ticket #5523: portpkg.2.patch

portpkg.

@@ -43 +43 @@
 }
 
 # define options
-options package.type package.destpath
+options package.type package.destpath package.resources
 
 # Set defaults
 default package.destpath {${workpath}}
@@ -51 +51 @@
 set_ui_prefix
 
 proc pkg_main {args} {
-    global portname portversion portrevision package.type package.destpath UI_PREFIX
+    global portname portversion portrevision package.type package.destpath package.resources UI_PREFIX
 
     ui_msg "$UI_PREFIX [format [msgcat::mc "Creating pkg for %s-%s"] ${portname} ${portversion}]"
 
@@ -60 +60 @@
 
 proc package_pkg {portname portversion portrevision} {
     global UI_PREFIX portdbpath destpath workpath prefix portresourcepath\
-     description package.destpath long_description homepage portpath filespath
+     description package.destpath package.resources long_description homepage portpath filespath
 
     set resourcepath ${workpath}/pkg_resources
     # XXX: we need to support .lproj in resources.
@@ -85 +85 @@
     }
     write_welcome_html ${pkgpath}/Contents/Resources/Welcome.html $portname $portversion $pkg_long_description $pkg_description $pkg_homepage
     file copy -force -- ${portresourcepath}/package/background.tiff ${pkgpath}/Contents/Resources/background.tiff
+
+        if {[info exists package.resources]} {
+        foreach file ${package.resources} {
+                if {![file exists ${file}]} {
+              ui_msg "$UI_PREFIX ${file} from package.resources not found."
+            } else {
+              file copy -force -- ${file} ${pkgpath}/Contents/Resources/
+                }
+        }
+        }
+    
     system "mkbom ${destpath} ${pkgpath}/Contents/Archive.bom"
     system "cd ${destpath} && pax -x cpio -w -z . > ${pkgpath}/Contents/Archive.pax.gz"