[mew-dist 25449] A patch for mew-summary-set-walk-mark
sai at example.com
sai at example.com
2004年 10月 13日 (水) 00:10:46 JST
西東です。
C-u N, C-u P で、markではない文字('a'など)を入力すると、
Wrong type argument: integerp, nil
が起きる問題を修正する、mew-summary-set-walk-markへの1行
patchです。
Index: mew-mark.el
===================================================================
RCS file: /cvsmew/mew/mew-mark.el,v
retrieving revision 1.141
diff -u -r1.141 mew-mark.el
--- mew-mark.el 12 Oct 2004 08:19:35 -0000 1.141
+++ mew-mark.el 12 Oct 2004 15:09:19 -0000
@@ -779,6 +779,7 @@
(defun mew-summary-set-walk-mark ()
(let ((char (mew-input-mark)))
(cond
+ ((null char))
((char-equal char ?\r)
(setq mew-mark-walk mew-mark-default-walk)
(message "Target mark was set to '%c'" mew-mark-walk))
--
// SAITO Atsunori
// % echo zbp.bqrl at example.com | rot13 | rev
Mew-dist メーリングリストの案内