Mercurial > emacs
comparison lisp/net/eudc-bob.el @ 105074:45b5d5aae703
Fix typos in condition-case handlers.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Fri, 18 Sep 2009 07:07:33 +0000 |
| parents | 2c8224ca97e2 |
| children | 1d1d5d9bd884 |
comparison
equal
deleted
inserted
replaced
| 105073:3d8175dd6918 | 105074:45b5d5aae703 |
|---|---|
| 250 (if (setq viewer (assoc program eudc-external-viewers)) | 250 (if (setq viewer (assoc program eudc-external-viewers)) |
| 251 (call-process-region (point-min) (point-max) | 251 (call-process-region (point-min) (point-max) |
| 252 (car (cdr viewer)) | 252 (car (cdr viewer)) |
| 253 (cdr (cdr viewer))) | 253 (cdr (cdr viewer))) |
| 254 (call-process-region (point-min) (point-max) program))) | 254 (call-process-region (point-min) (point-max) program))) |
| 255 (t | 255 (error |
| 256 (kill-buffer buffer))))) | 256 (kill-buffer buffer))))) |
| 257 | 257 |
| 258 (defun eudc-bob-menu () | 258 (defun eudc-bob-menu () |
| 259 "Retrieve the menu attached to a binary object." | 259 "Retrieve the menu attached to a binary object." |
| 260 (eudc-bob-get-overlay-prop 'menu)) | 260 (eudc-bob-get-overlay-prop 'menu)) |