ERC: Sync with upstream.

 - Add `erc-header-line-uses-tabbar-p' option for better integration with
   Tabbar Mode.

 - Update some TODO items in manual.

diff --git a/doc/misc/erc.texi b/doc/misc/erc.texi
index 0405738ade723ffefc59843a74feda3acf4e15dd..d2553cb66348a453864374c141a3c2596a02b54d 100644 (file)
--- a/doc/misc/erc.texi
+++ b/doc/misc/erc.texi
@@ -699,7 +699,7 @@ Translate morse code in messages
 
 @end table
 
-@c PRE5_3: Document every option of every module in its own subnode
+@c PRE5_4: Document every option of every module in its own subnode
 
 
 @node Advanced Usage, Getting Help and Reporting Bugs, Modules, Top
@@ -932,7 +932,7 @@ stuff, to the current ERC buffer."
 @section Options
 @cindex options
 
-@c PRE5_3: (Node) Document every ERC option (module options go in
+@c PRE5_4: (Node) Document every ERC option (module options go in
 @c previous chapter)
 
 This section has not yet been written.  For now, the easiest way to

diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index ccce93528dbabdd971e7321e0c139f8c631c2115..fc0d7b58b0cec60066cb4f3d1108e51344345fc4 100644 (file)
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -5914,6 +5914,11 @@ See `erc-mode-line-format' for which characters are can be used."
   :type '(choice (const :tag "Disabled" nil)
                 string))
 
+(defcustom erc-header-line-uses-tabbar-p t
+  "Use tabbar mode instead of the header line to display the header."
+  :group 'erc-mode-line-and-header
+  :type 'boolean)
+
 (defcustom erc-header-line-uses-help-echo-p t
   "Show the contents of the header line in the echo area or as a tooltip
 when you move point into the header line."
@@ -6085,7 +6090,11 @@ if `erc-away' is non-nil."
        (let ((header (if erc-header-line-format
                          (format-spec erc-header-line-format spec)
                        nil)))
-         (cond ((null header)
+         (cond (erc-header-line-uses-tabbar-p
+                (set (make-local-variable 'tabbar--local-hlf)
+                     header-line-format)
+                (kill-local-variable 'header-line-format))
+               ((null header)
                 (setq header-line-format nil))
                (erc-header-line-uses-help-echo-p
                 (let ((help-echo (with-temp-buffer