[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Erc-commit] [commit][emacs22] New option: erc-system-name
From: |
mwolson |
Subject: |
[Erc-commit] [commit][emacs22] New option: erc-system-name |
Date: |
Sun, 14 Oct 2007 00:48:38 -0400 |
commit 2ca553a033aeb36764148398018e84718367df2a
Author: Michael Olson <address@hidden>
Date: Tue Jan 9 07:00:17 2007 +0000
New option: erc-system-name
2007-01-09 Michael Olson <address@hidden>
* erc.el (erc-system-name): New option that determines the system
name to use when logging in. The default is to figure this out by
calling `system-name'.
(erc-login): Use it.
git-archimport-id: address@hidden/erc--main--0--patch-79
diff --git a/ChangeLog b/ChangeLog
index 51ba380..ade1625 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2007-01-09 Michael Olson <address@hidden>
+
+ * erc.el (erc-system-name): New option that determines the system
+ name to use when logging in. The default is to figure this out by
+ calling `system-name'.
+ (erc-login): Use it.
+
2007-01-07 Michael Olson <address@hidden>
* erc.el (erc-modules): Add the menu module. This should fix a
diff --git a/erc.el b/erc.el
index dd784c6..69fdc83 100644
--- a/erc.el
+++ b/erc.el
@@ -790,6 +790,13 @@ set if some hacker is trying to flood you away."
:group 'erc
:type 'string)
+(defcustom erc-system-name nil
+ "Use this as the name of your system.
+If nil, ERC will call `system-name' to get this information."
+ :group 'erc
+ :type '(choice (const :tag "Default system name" nil)
+ string))
+
(defcustom erc-ignore-list nil
"*List of regexps matching user identifiers to ignore.
@@ -5441,7 +5448,7 @@ user input."
(erc-log (format "login: nick: %s, user: %s %s %s :%s"
(erc-current-nick)
(user-login-name)
- (system-name)
+ (or erc-system-name (system-name))
erc-session-server
erc-session-user-full-name))
(if erc-session-password
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Erc-commit] [commit][emacs22] New option: erc-system-name,
mwolson <=