[elpa] externals/ergoemacs-mode 1c2f61e 018/325: Remove tabbar-toddle since its only purpose is to download tabber

[Stefan Monnier]

branch: externals/ergoemacs-mode
commit 1c2f61e390c6bc322f7d99d905d9aa25a0b2aa3f
Author: Walter Landry <wlandry@caltech.edu>
Commit: Walter Landry <wlandry@caltech.edu>

    Remove tabbar-toddle since its only purpose is to download tabber
---
 ergoemacs-lib.el    | 26 --------------------------
 ergoemacs-themes.el |  5 -----
 2 files changed, 31 deletions(-)

diff --git a/ergoemacs-lib.el b/ergoemacs-lib.el
index 845533d..9ff6c62 100644
--- a/ergoemacs-lib.el
+++ b/ergoemacs-lib.el
@@ -48,7 +48,6 @@
 
 (defvar package-archives)
 
-(defvar tabbar-mode)
 (defvar ergoemacs-handle-ctl-c-or-ctl-x)
 (defvar ergoemacs-dir)
 
@@ -77,10 +76,6 @@
 (declare-function ergoemacs-component-find-definition "ergoemacs-component")
 (declare-function ergoemacs-component-find-1 "ergoemacs-component")
 
-(declare-function tabbar-install-faces "tabbar-ruler")
-(declare-function tabbar-mode "tabbar")
-
-
 (defun ergoemacs-setcdr (var val &optional default)
   "Use `setcdr' on VAL to VAL.
 If VAL is a symbol, use `ergoemacs-sv' to determine the value.
@@ -410,27 +405,6 @@ All other modes are assumed to be minor modes or 
unimportant.
              (separator1 menu-item "--")
              (package menu-item  "Manage Packages" list-packages))))
 
-(defun ergoemacs-menu-tabbar-toggle ()
-  "Enables/Disables (and installs if not present) a tab-bar for emacs."
-  (interactive)
-  (require 'package nil t)
-  (if (not (fboundp 'tabbar-mode))
-      (let ((package-archives '(("melpa" . "http://melpa.org/packages/";))))
-        (require 'tabbar-ruler nil t)
-        (if (fboundp 'tabbar-install-faces)
-            (tabbar-install-faces)
-          (when (fboundp 'package-install)
-            (package-refresh-contents)
-            (package-initialize)
-            (package-install 'tabbar-ruler)
-            (require 'tabbar-ruler nil t)
-            (tabbar-install-faces))))
-    (if (not (featurep 'tabbar-ruler))
-        (require 'tabbar-ruler nil t)
-      (if tabbar-mode
-          (tabbar-mode -1)
-        (tabbar-mode 1)))))
-
 (defun ergoemacs-menu--filter-key-shortcut (cmd &optional keymap)
   "Figures out ergoemacs-mode menu's preferred key-binding for CMD."
   (cond
diff --git a/ergoemacs-themes.el b/ergoemacs-themes.el
index ee95a4c..1dd6f68 100644
--- a/ergoemacs-themes.el
+++ b/ergoemacs-themes.el
@@ -1496,11 +1496,6 @@
                           (blink-cursor menu-item "Cursor Blink" 
blink-cursor-mode
                                         :button (:toggle . blink-cursor-mode))
 
-                          (tabbar-mode menu-item "Tabbar" 
ergoemacs-menu-tabbar-toggle
-                                       :button (:toggle . (and (boundp 
'tabbar-mode)
-                                                               tabbar-mode)))
-                          
-                          
                           (separator-speedbar menu-item "--")
 
                           (showhide-speedbar menu-item "Speedbar" 
speedbar-frame-mode :help "Display a Speedbar quick-navigation frame" :button