Ignore:
Timestamp:
Jan 27, 2014, 3:31:02 PM (7 years ago)
Author:
cal@…
Message:

portmgr/packaging: Tcl cleanup, patch by Gustaf Neumann, Tcl8.4-clean

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/portmgr/packaging/mpkgall.tcl

    r83052 r116517  
    122122proc write_welcome_html {filename portname portversion long_description description homepage} {
    123123    set fd [open ${filename} w+]
    124     if {$long_description == ""} {
     124    if {$long_description eq ""} {
    125125        set long_description $description
    126126    }
     
    138138<p>"
    139139
    140     if {$homepage != ""} {
     140    if {$homepage ne ""} {
    141141        puts $fd "<font face=\"Helvetica\">${homepage}</font><p>"
    142142    }
     
    158158        set vers [split $portversion "."]
    159159       
    160         if {[string index $destination end] != "/"} {
     160        if {[string index $destination end] ne "/"} {
    161161                append destination /
    162162        }
Note: See TracChangeset for help on using the changeset viewer.