diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-08-19 16:48:59 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-08-19 16:48:59 -0700 |
| commit | 07fcbb558d797272b9f43547da60beda485873a3 (patch) | |
| tree | 77d5da14e9f9d9d8b1d877c70c01296fd3893796 /lisp/obsolete/erc-compat.el | |
| parent | c9bdeff3e45a7ac84a74a81bb048046f82dddc91 (diff) | |
| parent | fb81c8c3adf8633f2f617c82f6019aef630860c7 (diff) | |
| download | emacs-07fcbb558d797272b9f43547da60beda485873a3.tar.gz | |
Merge remote-tracking branch 'origin/master' into athena/unstable
Diffstat (limited to 'lisp/obsolete/erc-compat.el')
| -rw-r--r-- | lisp/obsolete/erc-compat.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/obsolete/erc-compat.el b/lisp/obsolete/erc-compat.el index 203ef079c14..9972e927e61 100644 --- a/lisp/obsolete/erc-compat.el +++ b/lisp/obsolete/erc-compat.el @@ -1,4 +1,4 @@ -;;; erc-compat.el --- ERC compatibility code for XEmacs +;;; erc-compat.el --- ERC compatibility code for XEmacs -*- lexical-binding: t; -*- ;; Copyright (C) 2002-2003, 2005-2021 Free Software Foundation, Inc. @@ -31,8 +31,7 @@ (require 'format-spec) ;;;###autoload(autoload 'erc-define-minor-mode "erc-compat") -(defalias 'erc-define-minor-mode 'define-minor-mode) -(put 'erc-define-minor-mode 'edebug-form-spec 'define-minor-mode) +(defalias 'erc-define-minor-mode #'define-minor-mode) (defun erc-decode-coding-string (s coding-system) "Decode S using CODING-SYSTEM." @@ -73,7 +72,7 @@ are placed. Note that this should end with a directory separator.") (defun erc-replace-match-subexpression-in-string - (newtext string match subexp start &optional fixedcase literal) + (newtext string _match subexp _start &optional fixedcase literal) "Replace the subexpression SUBEXP of the last match in STRING with NEWTEXT. MATCH is the text which matched the subexpression (see `match-string'). START is the beginning position of the last match (see `match-beginning'). |