From b5676d7f1d800a9e416d955298b468b8112cd3f5 Mon Sep 17 00:00:00 2001 From: ueno Date: Fri, 1 Feb 2008 03:00:31 +0000 Subject: [PATCH] * riece.el (riece-save-variables-files): Display message before/after saving files. * riece-mcat-japanese.el (riece-mcat-japanese-alist): Translate these mesasges for riece-save-variables-files. --- lisp/ChangeLog | 7 +++++++ lisp/riece-mcat-japanese.el | 2 ++ lisp/riece.el | 2 ++ 3 files changed, 11 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8735542..e6341ae 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2008-02-01 Daiki Ueno + + * riece.el (riece-save-variables-files): Display message + before/after saving files. + * riece-mcat-japanese.el (riece-mcat-japanese-alist): Translate + these mesasges for riece-save-variables-files. + 2007-12-21 OHASHI Akira * riece-mini.el (riece-mini-send-message): Use riece-format-identity. diff --git a/lisp/riece-mcat-japanese.el b/lisp/riece-mcat-japanese.el index d73d32c..c914007 100644 --- a/lisp/riece-mcat-japanese.el +++ b/lisp/riece-mcat-japanese.el @@ -136,6 +136,8 @@ ("Recent messages of the day:\n" . "最近のメッセージ (今日中):\n") ("Recent messages up to %d lines:\n" . "最近のメッセージ (%d 行まで):\n") ("Save as (default %s) " . "保存先 (既定値 %s) ") + ("Saving %s..." . "%s を保存しています...") + ("Saving %s...done" . "%s を保存しています...完了") ("Sending %s...(%s/%d)" . "%s を送信中...(%s/%d)") ("Sending %s...done" . "%s を送信中...完了") ("Sending QUIT to \"%s\"..." . "\"%s\" に QUIT を送信しています...") diff --git a/lisp/riece.el b/lisp/riece.el index 75356bd..8f80cec 100644 --- a/lisp/riece.el +++ b/lisp/riece.el @@ -249,6 +249,7 @@ If optional argument SAFE is nil, overwrite previous definitions." (defvar print-escape-multibyte) (defun riece-save-variables-files () "Save current settings to `riece-saved-variables-file'." + (message (riece-mcat "Saving %s...") riece-saved-variables-file) (with-temp-file riece-saved-variables-file (insert ";;; This file is generated automatically by " riece-version ".\n" ";;; Do not edit this file!\n\n") @@ -264,6 +265,7 @@ If optional argument SAFE is nil, overwrite previous definitions." (current-buffer)) (insert "\n") (setq variables (cdr variables))))) + (message (riece-mcat "Saving %s...done") riece-saved-variables-file) (setq riece-save-variables-are-dirty nil)) ;;;###autoload -- 1.7.10.4