Mercurial > emacs
comparison lisp/textmodes/dns-mode.el @ 72361:3b5cb5e41d55
Fix formatting/indentation.
| author | Romain Francoise <romain@orebokech.com> |
|---|---|
| date | Fri, 11 Aug 2006 14:11:24 +0000 |
| parents | 2b576e9ebfa4 |
| children | e3694f1cb928 |
comparison
equal
deleted
inserted
replaced
| 72360:8cd74611dbf4 | 72361:3b5cb5e41d55 |
|---|---|
| 214 This function is run from `before-save-hook'." | 214 This function is run from `before-save-hook'." |
| 215 (when (and (buffer-modified-p) | 215 (when (and (buffer-modified-p) |
| 216 dns-mode-soa-auto-increment-serial | 216 dns-mode-soa-auto-increment-serial |
| 217 (or (eq dns-mode-soa-auto-increment-serial t) | 217 (or (eq dns-mode-soa-auto-increment-serial t) |
| 218 (y-or-n-p "Increment SOA serial? "))) | 218 (y-or-n-p "Increment SOA serial? "))) |
| 219 ;; If `dns-mode-soa-increment-serial' signals | 219 ;; If `dns-mode-soa-increment-serial' signals an error saving will |
| 220 ;; an error saving will fail but that probably means that the | 220 ;; fail but that probably means that the serial should be fixed to |
| 221 ;; serial should be fixed to comply with the RFC anyway! -rfr | 221 ;; comply with the RFC anyway! -rfr |
| 222 (progn (dns-mode-soa-increment-serial) | 222 (progn (dns-mode-soa-increment-serial) |
| 223 ;; We return nil in case this is used in write-contents-functions. | 223 ;; We return nil in case this is used in write-contents-functions. |
| 224 nil))) | 224 nil))) |
| 225 | 225 |
| 226 ;;;###autoload(add-to-list 'auto-mode-alist '("\\.soa\\'" . dns-mode)) | 226 ;;;###autoload(add-to-list 'auto-mode-alist '("\\.soa\\'" . dns-mode)) |
| 227 | 227 |
| 228 (provide 'dns-mode) | 228 (provide 'dns-mode) |
| 229 | 229 |