Mercurial > hg > xemacs-beta

comparison lisp/package-admin.el @ 629:a6c89d799f00

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-07-15 08:18:59 by adrian] [PATCH] xemacs-21.5: typo fixes of of this this nature for lisp/ <8zhqhahu.fsf@ecf.teradyne.com>
author adrian
date Sun, 15 Jul 2001 08:18:59 +0000
parents e545f3ec2337
children 79940b592197
comparison
equal deleted inserted replaced
628:e545f3ec2337 629:a6c89d799f00
437 (setq dirs (cons file dirs)) 437 (setq dirs (cons file dirs))
438 ;; Delete each file. 438 ;; Delete each file.
439 ;; Make sure that the file is writable. 439 ;; Make sure that the file is writable.
440 ;; (This is important under MS Windows.) 440 ;; (This is important under MS Windows.)
441 ;; I do not know why it important under MS Windows but 441 ;; I do not know why it important under MS Windows but
442 ;; 1. It bombs out out when the file does not exist. This can be condition-cased 442 ;; 1. It bombs out when the file does not exist. This can be condition-cased
443 ;; 2. If I removed the write permissions, I do not want XEmacs to just ignore them. 443 ;; 2. If I removed the write permissions, I do not want XEmacs to just ignore them.
444 ;; If it wants to, XEmacs may ask, but that is about all 444 ;; If it wants to, XEmacs may ask, but that is about all
445 ;; (set-file-modes file 438) ;; 438 -> #o666 445 ;; (set-file-modes file 438) ;; 438 -> #o666
446 ;; Note, user might have removed the file! 446 ;; Note, user might have removed the file!
447 (condition-case () 447 (condition-case ()