[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[mhc:02175] bugfix mhc-cvs/modify
予定を削除するときにset-file-modesがエラーになるので
以下のような修正でどうでしょうか?
Index: mhc-cvs.el
===================================================================
RCS file: /cvsroot/mhc/emacs/mhc-cvs.el,v
retrieving revision 1.17
diff -u -F^(def -F^[_a-zA-Z] -r1.17 mhc-cvs.el
--- mhc-cvs.el 5 Oct 2005 05:26:57 -0000 1.17
+++ mhc-cvs.el 2 Nov 2005 10:40:29 -0000
@@ -294,7 +294,9 @@ (defun mhc-cvs/modify (filename &optiona
(prog1 (= 0 (mhc-cvs/backend
(list "commit" "-m" ""
(mhc-cvs/shrink-file-name filename))))
- (set-file-modes filename (logior ?\200 (file-modes filename))))))
+ (let ((modes (file-modes filename)))
+ (when modes
+ (set-file-modes filename (logior ?\200 modes)))))))
;;; CVS Backend Function
--
KOIE Hidetaka <hide@xxxxxxxx>