[Erc-commit] [commit][emacs22] Autoload erc-select; erc-auto-query => 'bury; freenode suffix.

[mwolson]

commit 09d1f3ea19982f9999303010262ad4d8c8e84876
Author: Diane Murray <address@hidden>
Date:   Sat Mar 10 15:41:50 2007 +0000

    Autoload erc-select; erc-auto-query => 'bury; freenode suffix.
    
    * erc.el (erc-select): Added an autoload cookie.
    (erc-message-type-member, erc-restore-text-properties): Use
    `erc-get-parsed-vector'.
    (erc-auto-query): Set the default to 'bury since many new users
    expect private messages from others to be in dedicated query
    buffers, not the server buffer.
    (erc-common-server-suffixes): Use "freenode" for freenode.net, not
    "OPN".  Added oftc.net.
    
    * NEWS: Added note about erc-auto-query's new default setting.
    git-archimport-id: address@hidden/erc--main--0--patch-117

diff --git a/ChangeLog b/ChangeLog
index 31ca040..98f1bb1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,16 @@
+2007-03-05  Diane Murray  <address@hidden>
+
+       * erc.el (erc-select): Added an autoload cookie.
+       (erc-message-type-member, erc-restore-text-properties): Use
+       `erc-get-parsed-vector'.
+       (erc-auto-query): Set the default to 'bury since many new users
+       expect private messages from others to be in dedicated query
+       buffers, not the server buffer.
+       (erc-common-server-suffixes): Use "freenode" for freenode.net, not
+       "OPN".  Added oftc.net.
+
+       * NEWS: Added note about erc-auto-query's new default setting.
+
 2007-03-03  Michael Olson  <address@hidden>
 
        * erc.el (erc-open, erc): Docfixes.
diff --git a/NEWS b/NEWS
index 6215c54..ca768d8 100644
--- a/NEWS
+++ b/NEWS
@@ -8,6 +8,9 @@ an alias of `erc'. Likewise, `erc-select-ssl' has been renamed 
to
 `erc-ssl' with `erc-select-ssl' as its alias.  The function that was
 known as `erc' is now `erc-open'.
 
+** Open query buffers by default when private messages are received.
+The default value of `erc-auto-query' has been changed to 'bury.
+
 ** New command: /RECONNECT
 This command tries to reconnect to the current IRC server exactly
 once.  It does not work in server buffers (throws an error before the
diff --git a/erc.el b/erc.el
index a97a91d..660abd2 100644
--- a/erc.el
+++ b/erc.el
@@ -2141,6 +2141,7 @@ be invoked for the values of the other parameters."
   (interactive (erc-select-read-args))
   (erc-open server port nick full-name t password))
 
+;;;###autoload
 (defalias 'erc-select 'erc)
 
 (defun erc-ssl (&rest r)
@@ -2430,7 +2431,7 @@ See also `erc-format-message' and `erc-display-line'."
 
 This function relies on the erc-parsed text-property being
 present."
-  (let ((prop-val (get-text-property position 'erc-parsed)))
+  (let ((prop-val (erc-get-parsed-vector position)))
     (and prop-val (member (erc-response.command prop-val) list))))
 
 (defvar erc-send-input-line-function 'erc-send-input-line)
@@ -3753,7 +3754,7 @@ To change how this query window is displayed, use `let' 
to bind
     (erc-update-mode-line)
     buf))
 
-(defcustom erc-auto-query nil
+(defcustom erc-auto-query 'bury
   "If non-nil, create a query buffer each time you receive a private message.
 
 If the buffer doesn't already exist it is created.  This can be
@@ -5762,7 +5763,8 @@ Otherwise, use the `erc-header-line' face."
 
 (defcustom erc-common-server-suffixes
   '(("openprojects.net$" . "OPN")
-    ("freenode.net$" . "OPN"))
+    ("freenode.net$" . "freenode")
+    ("oftc.net$" . "OFTC"))
   "Alist of common server name suffixes.
 This variable is used in mode-line display to save screen
 real estate.  Set it to nil if you want to avoid changing
@@ -6262,8 +6264,7 @@ This function should be on `erc-kill-channel-hook'."
   (let ((parsed-posn (erc-find-parsed-property)))
     (put-text-property
      (point-min) (point-max)
-     'erc-parsed (when parsed-posn
-                   (get-text-property parsed-posn 'erc-parsed)))))
+     'erc-parsed (when parsed-posn (erc-get-parsed-vector parsed-posn)))))
 
 (defun erc-get-parsed-vector (point)
   "Return the whole parsed vector on POINT."