emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] 190/287: Fix Issue #233


From: Matthew Fidler
Subject: [elpa] 190/287: Fix Issue #233
Date: Wed, 02 Jul 2014 14:45:52 +0000

mlf176f2 pushed a commit to branch externals/ergoemacs-mode
in repository elpa.

commit ce438f083706c4958c92ac1b8b43eed4543fad7e
Author: Matthew L. Fidler <address@hidden>
Date:   Sun Jun 22 21:11:43 2014 -0500

    Fix Issue #233
---
 ergoemacs-menus.el |   13 ++++---------
 1 files changed, 4 insertions(+), 9 deletions(-)

diff --git a/ergoemacs-menus.el b/ergoemacs-menus.el
index d27415c..e0f76b9 100644
--- a/ergoemacs-menus.el
+++ b/ergoemacs-menus.el
@@ -603,20 +603,15 @@ All other modes are assumed to be minor modes or 
unimportant.
 (defun ergoemacs-menu-tabbar-toggle ()
   "Enables/Disables (and installs if not present) a tab-bar for emacs."
   (interactive)
+  (require 'package)
   (if (not (fboundp 'tabbar-mode))
-      (progn
+      (let ((package-archives '(("melpa" . 
"http://melpa.milkbox.net/packages/";))))
         (require 'tabbar-ruler nil t)
         (if (fboundp 'tabbar-install-faces)
             (tabbar-install-faces)
-          (when (fboundp 'package-install)`
-            (ergoemacs-pushnew '("melpa" . 
"http://melpa.milkbox.net/packages/";)
-                     package-archives
-                     :test 'equal )
-            (when (< emacs-major-version 24)
-              (ergoemacs-pushnew '("melpa" . 
"http://melpa.milkbox.net/packages/";)
-                       package-archives
-                       :test 'equal))
+          (when (fboundp 'package-install)
             (package-refresh-contents)
+            (package-initialize)
             (package-install 'tabbar-ruler)
             (require 'tabbar-ruler nil t)
             (tabbar-install-faces))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]