Ticket #30347: puts.diff

File puts.diff, 508 bytes (added by ryandesign (Ryan Carsten Schmidt), 13 years ago)

proposed patch

  • src/images_to_archives.tcl

     
    5252    }
    5353
    5454    if {$location == "" || ![file isfile $location]} {
     55        puts "Converting ${iname}-${iversion}_${irevision}${ivariants}"
    5556        # no image archive present, so make one
    5657        set archs [registry::property_retrieve $iref archs]
    5758        if {$archs == "" || $archs == "0"} {