[53245] trunk/base/src/package1.0/portpkg.tcl

[jmr at macports.org]

Revision: 53245
          http://trac.macports.org/changeset/53245
Author:   jmr at macports.org
Date:     2009-07-01 14:21:03 -0700 (Wed, 01 Jul 2009)
Log Message:
-----------
remove unused proc

Modified Paths:
--------------
    trunk/base/src/package1.0/portpkg.tcl

Modified: trunk/base/src/package1.0/portpkg.tcl
===================================================================
--- trunk/base/src/package1.0/portpkg.tcl	2009-07-01 21:00:01 UTC (rev 53244)
+++ trunk/base/src/package1.0/portpkg.tcl	2009-07-01 21:21:03 UTC (rev 53245)
@@ -161,28 +161,6 @@
     close $infofd
 }
 
-# XXX: deprecated
-proc portpkg::write_info_file {infofile portname portversion description} {
-    set infofd [open ${infofile} w+]
-    puts $infofd "Title ${portname}
-Version ${portversion}
-Description ${description}
-DefaultLocation /
-DeleteWarning
-
-### Package Flags
-
-NeedsAuthorization YES
-Required NO
-Relocatable NO
-RequiresReboot NO
-UseUserMask YES
-OverwritePermissions NO
-InstallFat NO
-RootVolumeOnly NO"
-    close $infofd
-}
-
 proc portpkg::xml_escape {s} {
     regsub -all {&} $s {\&} s
     regsub -all {<} $s {\&lt;} s
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090701/dd71b828/attachment.html>