diff options
| -rw-r--r-- | lisp/woman.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/woman.el b/lisp/woman.el index de7d557f856..b1f8581ab9c 100644 --- a/lisp/woman.el +++ b/lisp/woman.el | |||
| @@ -828,7 +828,7 @@ Heading emboldening is NOT standard `man' behavior." | |||
| 828 | :group 'woman-formatting) | 828 | :group 'woman-formatting) |
| 829 | 829 | ||
| 830 | (defcustom woman-ignore t | 830 | (defcustom woman-ignore t |
| 831 | "*If non-nil then unrecognised requests etc. are ignored. Default is t. | 831 | "*If non-nil then unrecognized requests etc. are ignored. Default is t. |
| 832 | This gives the standard ?roff behavior. If nil then they are left in | 832 | This gives the standard ?roff behavior. If nil then they are left in |
| 833 | the buffer, which may aid debugging." | 833 | the buffer, which may aid debugging." |
| 834 | :type 'boolean | 834 | :type 'boolean |
| @@ -2504,7 +2504,7 @@ REQUEST is the invoking directive without the leading dot." | |||
| 2504 | (setq c (memq (following-char) woman-if-conditions-true))) | 2504 | (setq c (memq (following-char) woman-if-conditions-true))) |
| 2505 | ;; Unrecognised letter so reject: | 2505 | ;; Unrecognised letter so reject: |
| 2506 | ((looking-at "[A-Za-z]") (setq c nil) | 2506 | ((looking-at "[A-Za-z]") (setq c nil) |
| 2507 | (WoMan-warn "%s %s -- unrecognised condition name rejected!" | 2507 | (WoMan-warn "%s %s -- unrecognized condition name rejected!" |
| 2508 | request (match-string 0))) | 2508 | request (match-string 0))) |
| 2509 | ;; Accept strings if identical: | 2509 | ;; Accept strings if identical: |
| 2510 | ((save-restriction | 2510 | ((save-restriction |