Mercurial > emacs
comparison lisp/erc/erc-services.el @ 107104:c984638f1446
* erc-services.el (erc-nickserv-alist): Fix defcustom type (Bug#5520).
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sun, 07 Feb 2010 01:36:17 -0500 |
| parents | 1d1d5d9bd884 |
| children | 376148b31b5e |
comparison
equal
deleted
inserted
replaced
| 107103:f2353518b994 | 107104:c984638f1446 |
|---|---|
| 301 (string :tag "Identify to") | 301 (string :tag "Identify to") |
| 302 (string :tag "Identify keyword") | 302 (string :tag "Identify keyword") |
| 303 (boolean :tag "Use current nick in identify message?") | 303 (boolean :tag "Use current nick in identify message?") |
| 304 (choice :tag "Command to use (optional)" | 304 (choice :tag "Command to use (optional)" |
| 305 (string :tag "Command") | 305 (string :tag "Command") |
| 306 (const :tag "No special command necessary" nil))))) | 306 (const :tag "No special command necessary" nil)) |
| 307 (choice :tag "Detect Success" | |
| 308 (regexp :tag "Pattern to match") | |
| 309 (const :tag "Do not try to detect success" nil))))) | |
| 310 | |
| 307 | 311 |
| 308 (defsubst erc-nickserv-alist-sender (network &optional entry) | 312 (defsubst erc-nickserv-alist-sender (network &optional entry) |
| 309 (nth 1 (or entry (assoc network erc-nickserv-alist)))) | 313 (nth 1 (or entry (assoc network erc-nickserv-alist)))) |
| 310 | 314 |
| 311 (defsubst erc-nickserv-alist-regexp (network &optional entry) | 315 (defsubst erc-nickserv-alist-regexp (network &optional entry) |