ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/util/do_file.tcl
(Generate patch)

Comparing ray/src/util/do_file.tcl (file contents):
Revision 2.5 by greg, Thu Dec 8 17:16:38 1994 UTC vs.
Revision 2.6 by greg, Wed Feb 15 14:12:05 1995 UTC

# Line 242 | Line 242 | proc newsave f {               # save a RIF
242                          return 0
243                  }
244          }
245 <        if {! [file writable $f] && [catch {exec chmod u+w $f} curmess]} {
245 >        if {[file exists $f] && ! [file writable $f] &&
246 >                        [catch {exec chmod u+w $f} curmess]} {
247                  beep
248                  return 0
249          }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines