# HG changeset patch # User Deepak Goel # Date 1127047040 0 # Node ID 4e6c5e8ae4e9dc44e1b7a946dfea5191ba6ee1ee # Parent 86bece058ee5bd2415925d78d2f62a83d6301e29 Message format spec fixes (commit 6) diff -r 86bece058ee5 -r 4e6c5e8ae4e9 lisp/mail/feedmail.el --- a/lisp/mail/feedmail.el Sun Sep 18 12:36:08 2005 +0000 +++ b/lisp/mail/feedmail.el Sun Sep 18 12:37:20 2005 +0000 @@ -1943,7 +1943,7 @@ (file-exists-p a-s-file-name) (delete-file a-s-file-name)))) (if feedmail-queue-chatty - (progn (message (concat "FQM: Queued in " filename)) + (progn (message "%s" (concat "FQM: Queued in " filename)) (sit-for feedmail-queue-chatty-sit-for))) (if feedmail-queue-chatty (progn diff -r 86bece058ee5 -r 4e6c5e8ae4e9 lisp/mail/rmail-spam-filter.el --- a/lisp/mail/rmail-spam-filter.el Sun Sep 18 12:36:08 2005 +0000 +++ b/lisp/mail/rmail-spam-filter.el Sun Sep 18 12:37:20 2005 +0000 @@ -449,10 +449,10 @@ (if rsf-autosave-newly-added-definitions (progn (custom-save-all) - (message (concat "added subject \n <<< \n" message-subject + (message "%s" (concat "added subject \n <<< \n" message-subject " \n >>> \n to list of spam definitions. \n" "and saved the spam definitions to file."))) - (message (concat "added subject \n <<< \n" message-subject + (message "%s" (concat "added subject \n <<< \n" message-subject " \n >>> \n to list of spam definitions. \n" "Don't forget to save the spam definitions to file using the spam menu")) @@ -478,10 +478,10 @@ (if rsf-autosave-newly-added-definitions (progn (custom-save-all) - (message (concat "added sender \n <<< \n" message-sender + (message "%s" (concat "added sender \n <<< \n" message-sender " \n >>> \n to list of spam definitions. \n" "and saved the spam definitions to file."))) - (message (concat "added sender \n <<< \n " message-sender + (message "%s" (concat "added sender \n <<< \n " message-sender " \n >>> \n to list of spam definitions." "Don't forget to save the spam definitions to file using the spam menu")) @@ -521,10 +521,10 @@ (if rsf-autosave-newly-added-definitions (progn (custom-save-all) - (message (concat "added highlighted text \n <<< \n" region-to-spam-list + (message "%s" (concat "added highlighted text \n <<< \n" region-to-spam-list " \n >>> \n to list of spam definitions. \n" "and saved the spam definitions to file."))) - (message (concat "added highlighted text \n <<< \n " region-to-spam-list + (message "%s" (concat "added highlighted text \n <<< \n " region-to-spam-list " \n >>> \n to list of spam definitions." "Don't forget to save the spam definitions to file using the spam menu"))