Mercurial > emacs
comparison lisp/allout.el @ 87139:f358a2fd5895
Fix buggy calls to `error'.
| author | Deepak Goel <deego@gnufans.org> |
|---|---|
| date | Thu, 06 Dec 2007 17:56:42 +0000 |
| parents | de8ef384c3ef |
| children | 1c8ae140143d |
comparison
equal
deleted
inserted
replaced
| 87138:b63e2a5b45dd | 87139:f358a2fd5895 |
|---|---|
| 1499 (message "auto-encrypting pending topics") | 1499 (message "auto-encrypting pending topics") |
| 1500 (sit-for 0) | 1500 (sit-for 0) |
| 1501 (condition-case failure | 1501 (condition-case failure |
| 1502 (setq allout-after-save-decrypt | 1502 (setq allout-after-save-decrypt |
| 1503 (allout-encrypt-decrypted except-mark)) | 1503 (allout-encrypt-decrypted except-mark)) |
| 1504 (error (progn | 1504 (error "%s" (progn |
| 1505 (message | 1505 (message |
| 1506 "allout-write-file-hook-handler suppressing error %s" | 1506 "allout-write-file-hook-handler suppressing error %s" |
| 1507 failure) | 1507 failure) |
| 1508 (sit-for 2)))))) | 1508 (sit-for 2)))))) |
| 1509 )) | 1509 )) |