Mercurial > emacs
comparison lisp/erc/erc-compat.el @ 85845:e95712050fdc
Silence some byte-compiler warnings in ERC
| author | Michael Olson <mwolson@gnu.org> |
|---|---|
| date | Thu, 01 Nov 2007 01:12:59 +0000 |
| parents | 4ee03308c9b6 |
| children | 107ccd98fa12 |
comparison
equal
deleted
inserted
replaced
| 85844:cf0d3de08293 | 85845:e95712050fdc |
|---|---|
| 47 (defalias 'erc-propertize 'propertize) | 47 (defalias 'erc-propertize 'propertize) |
| 48 (defalias 'erc-view-mode-enter 'view-mode-enter) | 48 (defalias 'erc-view-mode-enter 'view-mode-enter) |
| 49 (defalias 'erc-function-arglist 'help-function-arglist) | 49 (defalias 'erc-function-arglist 'help-function-arglist) |
| 50 (defalias 'erc-delete-dups 'delete-dups) | 50 (defalias 'erc-delete-dups 'delete-dups) |
| 51 (defalias 'erc-replace-regexp-in-string 'replace-regexp-in-string) | 51 (defalias 'erc-replace-regexp-in-string 'replace-regexp-in-string) |
| 52 | |
| 53 (defun erc-set-write-file-functions (new-val) | |
| 54 (set (make-local-variable 'write-file-functions) new-val)) | |
| 52 | 55 |
| 53 (defvar erc-emacs-build-time | 56 (defvar erc-emacs-build-time |
| 54 (if (stringp emacs-build-time) | 57 (if (stringp emacs-build-time) |
| 55 emacs-build-time | 58 emacs-build-time |
| 56 (format-time-string "%Y-%m-%d" emacs-build-time)) | 59 (format-time-string "%Y-%m-%d" emacs-build-time)) |