[Erc-commit] [commit][master] Handle freenode's new 328 channel URL response message.

[mwolson]

commit 0e130a7e892831ff3f0f8359b570b2af3a077020
Author: Diane Murray <address@hidden>
Date:   Fri May 30 19:17:34 2008 +0200

    Handle freenode's new 328 channel URL response message.
    
    * erc-backend.el (328): New response handler.
    
    * erc.el (english): Added 328 to catalog.

diff --git a/ChangeLog b/ChangeLog
index ee1699b..b575b47 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2008-05-30  Diane Murray  <address@hidden>
+
+       * erc-backend.el (328): New response handler.
+
+       * erc.el (english): Added 328 to catalog.
+
 2008-05-29  Diane Murray  <address@hidden>
 
        * erc-services.el (erc-nickserv-alist): Updated REGEXP and
diff --git a/erc-backend.el b/erc-backend.el
index 1bb3e4a..3acc0a0 100644
--- a/erc-backend.el
+++ b/erc-backend.el
@@ -1686,6 +1686,13 @@ See `erc-display-server-message'." nil
      parsed 'notice (erc-get-buffer channel proc)
      's324 ?c channel ?m modes)))
 
+(define-erc-response-handler (328)
+  "Channel URL (on freenode network)." nil
+  (let ((channel (second (erc-response.command-args parsed)))
+        (url (erc-response.contents parsed)))
+    (erc-display-message parsed 'notice (erc-get-buffer channel proc)
+                         's328 ?c channel ?u url)))
+
 (define-erc-response-handler (329)
   "Channel creation date." nil
   (let ((channel (second (erc-response.command-args parsed)))
diff --git a/erc.el b/erc.el
index ca25be9..57ddb5a 100644
--- a/erc.el
+++ b/erc.el
@@ -6305,6 +6305,7 @@ All windows are opened in the current frame."
    (s321   . "Channel  Users  Topic")
    (s322   . "%c [%u] %t")
    (s324   . "%c modes: %m")
+   (s328   . "%c URL: %u")
    (s329   . "%c was created on %t")
    (s330   . "%n %a %i")
    (s331   . "No topic is set for %c")