diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/nnmairix.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 01cbd7f2a59..908c3bc33a7 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2008-09-08 David Engster <dengste@eml.cc> | ||
| 2 | |||
| 3 | * nnmairix.el (nnmairix-create-server-and-default-group): Require match | ||
| 4 | in completing-read for back end server. | ||
| 5 | |||
| 1 | 2008-09-03 Teodor Zlatanov <tzz@lifelogs.com> | 6 | 2008-09-03 Teodor Zlatanov <tzz@lifelogs.com> |
| 2 | 7 | ||
| 3 | * message.el (message-confirm-send): New variable to confirm sending a | 8 | * message.el (message-confirm-send): New variable to confirm sending a |
diff --git a/lisp/gnus/nnmairix.el b/lisp/gnus/nnmairix.el index 6917b7739db..32ca980fc67 100644 --- a/lisp/gnus/nnmairix.el +++ b/lisp/gnus/nnmairix.el | |||
| @@ -877,7 +877,7 @@ All necessary information will be queried from the user." | |||
| 877 | (interactive) | 877 | (interactive) |
| 878 | (let* ((name (read-string "Name of the mairix server: ")) | 878 | (let* ((name (read-string "Name of the mairix server: ")) |
| 879 | (server (completing-read "Back end server (TAB for completion): " | 879 | (server (completing-read "Back end server (TAB for completion): " |
| 880 | (nnmairix-get-valid-servers))) | 880 | (nnmairix-get-valid-servers) nil 1)) |
| 881 | (mairix (read-string "Command to call mairix: " "mairix")) | 881 | (mairix (read-string "Command to call mairix: " "mairix")) |
| 882 | (defaultgroup (read-string "Default search group: ")) | 882 | (defaultgroup (read-string "Default search group: ")) |
| 883 | (backend (symbol-name (car (gnus-server-to-method server)))) | 883 | (backend (symbol-name (car (gnus-server-to-method server)))) |