Subject: [PATCH] Mark XEmacs compat alias user-original-login-name obsolete

From: Stefan Kangas <[email-masked]>
Date: Fri, 14 Aug 2020 20:10:44 -0700

The XEmacs compatibility alias `user-original-login-name' was declared
obsolete even in XEmacs:

https://bitbucket.org/xemacs/xemacs/src/e2ac728aa576a39ca5a7de608a1914dde5b1b083/lisp/obsolete.el#lines-461

Searching for its name on github gives 1383 code matches, most of which
seem to be copies of Emacs itself.

Are there any objections to marking it obsolete?

Best regards,
Stefan Kangas
From 287bda37d839ab9f81f59b12be04db6a6961919f Mon Sep 17 00:00:00 2001
From: Stefan Kangas <[email-masked]>
Date: Sat, 15 Aug 2020 04:55:35 +0200
Subject: [PATCH] Mark XEmacs compat alias as obsolete

* lisp/subr.el (user-original-login-name): Mark as obsolete.  This
XEmacs compat alias was obsoleted even by XEmacs, so there should be
no point in keeping it around.
---
 lisp/subr.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/subr.el b/lisp/subr.el
index 8eb4cf452d..0bd09c6556 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -1649,7 +1649,8 @@ 'mkdir
 (defalias 'point-at-eol 'line-end-position)
 (defalias 'point-at-bol 'line-beginning-position)
 
-(defalias 'user-original-login-name 'user-login-name)
+(define-obsolete-function-alias 'user-original-login-name
+  'user-login-name "28.1")
 
 
 ;;;; Hook manipulation functions.
-- 
2.28.0