New Ticket     Tickets     Wiki     Browse Source     Timeline     Roadmap     Ticket Reports     Search

Ticket #15514: reinplace-warning2.diff

File reinplace-warning2.diff, 587 bytes (added by ryandesign@…, 5 years ago)

  • src/port1.0/portutil.tcl

     
    776776     
    777777        close $tmpfd 
    778778     
     779        if {![catch {exec cmp -s $file $tmpfile}]} { 
     780            ui_warn "[format [msgcat::mc "reinplace %1\$s didn't change anything in %2\$s"] $pattern $file]" 
     781        } 
     782     
    779783        set attributes [file attributes $file] 
    780784        # We need to overwrite this file 
    781785        if {[catch {file attributes $file -permissions u+w} error]} {