diff options
| author | Lars Ingebrigtsen | 2019-06-13 14:37:25 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-06-13 14:37:25 +0200 |
| commit | 67b261d2dad9b07f3fd62f873c892981af8a0742 (patch) | |
| tree | 8d9a2b707f4c5ac12c60d2d251cdd0a8599c448a | |
| parent | 390c8805c2c4e636c12c5c7e892c3c5e481a0256 (diff) | |
| download | emacs-67b261d2dad9b07f3fd62f873c892981af8a0742.tar.gz emacs-67b261d2dad9b07f3fd62f873c892981af8a0742.zip | |
erc-dcc.el minor clean-ups
* lisp/erc/erc-dcc.el: Remove outdated comments.
(erc-dcc-get-file): Remove XEmacs compat code.
| -rw-r--r-- | lisp/erc/erc-dcc.el | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/lisp/erc/erc-dcc.el b/lisp/erc/erc-dcc.el index 2b6f8c91a63..526add1a61f 100644 --- a/lisp/erc/erc-dcc.el +++ b/lisp/erc/erc-dcc.el | |||
| @@ -47,9 +47,6 @@ | |||
| 47 | ;; /dcc get nick [file] - Accept DCC offer from nick | 47 | ;; /dcc get nick [file] - Accept DCC offer from nick |
| 48 | ;; /dcc list - List all DCC offers/connections | 48 | ;; /dcc list - List all DCC offers/connections |
| 49 | ;; /dcc send nick file - Offer DCC SEND to nick | 49 | ;; /dcc send nick file - Offer DCC SEND to nick |
| 50 | ;; | ||
| 51 | ;; Please note that offering DCC connections (offering chats and sending | ||
| 52 | ;; files) is only supported with Emacs 22. | ||
| 53 | 50 | ||
| 54 | ;;; Code: | 51 | ;;; Code: |
| 55 | 52 | ||
| @@ -920,10 +917,7 @@ filter and a process sentinel, and making the connection." | |||
| 920 | (buffer-disable-undo (current-buffer)) | 917 | (buffer-disable-undo (current-buffer)) |
| 921 | ;; This is necessary to have the buffer saved as-is in GNU | 918 | ;; This is necessary to have the buffer saved as-is in GNU |
| 922 | ;; Emacs. | 919 | ;; Emacs. |
| 923 | ;; XEmacs change: We don't have `set-buffer-multibyte', setting | 920 | (set-buffer-multibyte nil) |
| 924 | ;; coding system to 'binary below takes care of us. | ||
| 925 | (when (fboundp 'set-buffer-multibyte) | ||
| 926 | (set-buffer-multibyte nil)) | ||
| 927 | 921 | ||
| 928 | (setq mode-line-process '(":%s") | 922 | (setq mode-line-process '(":%s") |
| 929 | buffer-read-only t) | 923 | buffer-read-only t) |