diff options
| author | Miles Bader <miles@gnu.org> | 2007-04-01 13:36:38 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 2007-04-01 13:36:38 +0000 |
| commit | ff59d266c7dcb9c6f7cc7ff7942510bda288e167 (patch) | |
| tree | 9cc762d166a00ae8d02c9f079890afb68125072e /lisp/erc/erc-networks.el | |
| parent | 25c8c1594fe7ba177ec0621260304181b7052af3 (diff) | |
| download | emacs-ff59d266c7dcb9c6f7cc7ff7942510bda288e167.tar.gz | |
Release ERC 5.2.
I have updated the version of ERC to 5.2, since it fixes a bug with C-c
C-SPC being bound globally by default. For the full list of changes in
this version, see etc/ERC-NEWS.
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-687
Creator: Michael Olson <mwolson@gnu.org>
Diffstat (limited to 'lisp/erc/erc-networks.el')
| -rw-r--r-- | lisp/erc/erc-networks.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/erc/erc-networks.el b/lisp/erc/erc-networks.el index 9f8c5528d04..4631ceae3ae 100644 --- a/lisp/erc/erc-networks.el +++ b/lisp/erc/erc-networks.el @@ -317,6 +317,7 @@ ("Novernet: Random server" Novernet "irc.novernet.com" ((6665 6669) 7000 )) ("Nullrouted: Random server" Nullrouted "irc.nullrouted.org" ((6666 6669) 7000 )) ("NullusNet: Random server" NullusNet "irc.nullus.net" 6667) + ("OFTC: Random server" OFTC "irc.oftc.net" ((6667 6670) 7000)) ("OpChat: Random server" OpChat "irc.opchat.org" ((6667 6669))) ("Othernet: Random server" Othernet "irc.othernet.org" 6667) ("Othernet: US, FL, Miami" Othernet "miami.fl.us.othernet.org" 6667) @@ -611,6 +612,7 @@ PORTS is either a number, a list of numbers, or a list of port ranges." (Novernet "novernet.com") (Nullrouted "nullrouted.org") (NullusNet "nullus.net") + (OFTC "oftc.net") (OpChat "opchat.org") (Openprojects "openprojects.net") (Othernet "othernet.org") @@ -737,12 +739,12 @@ search for a match in `erc-networks-alist'." (defun erc-network () "Return the value of `erc-network' for the current server." - (with-current-buffer (erc-server-buffer) erc-network)) + (erc-with-server-buffer erc-network)) (defun erc-current-network () "Deprecated. Use `erc-network' instead. Return the name of this server's network as a symbol." - (with-current-buffer (erc-server-buffer) + (erc-with-server-buffer (intern (downcase (symbol-name erc-network))))) (erc-make-obsolete 'erc-current-network 'erc-network @@ -750,7 +752,7 @@ network as a symbol." (defun erc-network-name () "Returns the name of the current network as a string." - (with-current-buffer (erc-server-buffer) (symbol-name erc-network))) + (erc-with-server-buffer (symbol-name erc-network))) (defun erc-set-network-name (proc parsed) "Set `erc-network' to the value returned by `erc-determine-network'." |