diff options
| -rw-r--r-- | lisp/mh-e/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/mh-e/mh-e.el | 7 |
2 files changed, 11 insertions, 2 deletions
diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog index 8c2b843a282..47c7808f192 100644 --- a/lisp/mh-e/ChangeLog +++ b/lisp/mh-e/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2006-02-04 Bill Wohler <wohler@newt.com> | ||
| 2 | |||
| 3 | * mh-e.el (mh-inc-spool-list): Update example for Emacs 22 which | ||
| 4 | has an emacsclient command that supports --eval. I had read that | ||
| 5 | gnudoit was deprecated in favor of gnuclient anyway. | ||
| 6 | |||
| 1 | 2006-02-04 Eric Ding <ericding@alum.mit.edu> | 7 | 2006-02-04 Eric Ding <ericding@alum.mit.edu> |
| 2 | 8 | ||
| 3 | * mh-mime.el (mh-file-mime-type-substitutions): Added entries to | 9 | * mh-mime.el (mh-file-mime-type-substitutions): Added entries to |
diff --git a/lisp/mh-e/mh-e.el b/lisp/mh-e/mh-e.el index 9be827a8071..8012eab5c8a 100644 --- a/lisp/mh-e/mh-e.el +++ b/lisp/mh-e/mh-e.el | |||
| @@ -1521,14 +1521,17 @@ on the \"INS\" button. Enter a \"Spool File\" of \"~/mail/mh-e\", a | |||
| 1521 | \"Folder\" of \"mh-e\", and a \"Key Binding\" of \"m\". | 1521 | \"Folder\" of \"mh-e\", and a \"Key Binding\" of \"m\". |
| 1522 | 1522 | ||
| 1523 | You can use \"xbuffy\" to automate the incorporation of this mail | 1523 | You can use \"xbuffy\" to automate the incorporation of this mail |
| 1524 | using the \"gnudoit\" command in the \"gnuserv\" package as follows: | 1524 | using the Emacs 22 command \"emacsclient\" as follows: |
| 1525 | 1525 | ||
| 1526 | box ~/mail/mh-e | 1526 | box ~/mail/mh-e |
| 1527 | title mh-e | 1527 | title mh-e |
| 1528 | origMode | 1528 | origMode |
| 1529 | polltime 10 | 1529 | polltime 10 |
| 1530 | headertime 0 | 1530 | headertime 0 |
| 1531 | command gnudoit -q '(mh-inc-spool-mh-e)'" | 1531 | command emacsclient --eval '(mh-inc-spool-mh-e)' |
| 1532 | |||
| 1533 | In XEmacs, the command \"gnuclient\" is used in a similar | ||
| 1534 | fashion." | ||
| 1532 | :type '(repeat (list (file :tag "Spool File") | 1535 | :type '(repeat (list (file :tag "Spool File") |
| 1533 | (string :tag "Folder") | 1536 | (string :tag "Folder") |
| 1534 | (character :tag "Key Binding"))) | 1537 | (character :tag "Key Binding"))) |