[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[mhc:00590] [Gnus] mhc-goto-today fix.

土屋です。

Gnus 環境で (mhc-goto-today) が動作していませんでした。以下、パッチ。


--- mhc.el	2000/05/10 08:30:36
+++ mhc.el	2000/05/12 00:49:04
@@ -219,7 +219,7 @@
     (if (and (= (ddate-yy now) (ddate-yy buf-date))
 	     (= (ddate-mm now) (ddate-mm buf-date))
 	     (re-search-forward
-	      (format "^[0-9]+ | %s" (ddate-mmdd-s1 (ddate-now) "/")) nil t))
+	      (format "^\\([0-9]+\\)? | %s" (ddate-mmdd-s1 (ddate-now) "/")) nil t))
 	(progn 
 	  (beginning-of-line)
 	  (if (not (pos-visible-in-window-p (point)))

-- 
土屋 雅稔  ( TSUCHIYA Masatoshi )
    http://www-nagao.kuee.kyoto-u.ac.jp/member/tsuchiya/