From: Eshel Yaron <me@eshelyaron.com>
Date: Mon, 10 Feb 2025 20:54:25 +0000 (+0100)
Subject: scope.el: Fix defalias handling
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9a2bd6a17ba553a5fceefbdbede0611fc31adc0f;p=emacs.git

scope.el: Fix defalias handling
---

diff --git a/lisp/emacs-lisp/scope.el b/lisp/emacs-lisp/scope.el
index 5b73f5e4cea..176c1260f51 100644
--- a/lisp/emacs-lisp/scope.el
+++ b/lisp/emacs-lisp/scope.el
@@ -1158,8 +1158,8 @@ a (possibly empty) list of safe macros.")
     (scope-1 l form))
   (scope-1 l lexical))
 
-(scope-define-function-analyzer defalias (definition &optional _docstring)
-  (when-let ((quoted (scope--unqoute definition))) (scope-report-s quoted 'defun)))
+(scope-define-function-analyzer defalias (sym _def &optional _docstring)
+  (when-let ((quoted (scope--unqoute sym))) (scope-report-s quoted 'defun)))
 
 (scope-define-function-analyzer custom-declare-variable (sym _default _doc &rest args)
   (when-let ((quoted (scope--unqoute sym))) (scope-report-s quoted 'defvar))