Ticket #1068: uninst.patch
File uninst.patch, 622 bytes (added by jdputsch@…, 21 years ago) |
---|
-
UnInstaller.app/Contents/Resources/uninstall.tcl
old new 163 163 ui_warn "Unable to delete $fullPath: $result" 164 164 } 165 165 } 166 set postremove [file join $receiptDir Contents/Resources/postremove ] 167 if {[file exists $postremove]} { 168 if {[catch {exec $postremove} result]} { 169 ui_error "Error running post-remove script ($postremove): $result" 170 exit 4 171 } 172 } 166 173 if {[catch {file delete -force -- $receiptDir} result]} { 167 174 ui_error "Unable to delete package receipt: $result" 168 175 exit 4