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

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

[elpa] master d9d04d1: Fix byte compile warning and some customizations


From: Martin Rudalics
Subject: [elpa] master d9d04d1: Fix byte compile warning and some customizations
Date: Wed, 11 Jul 2018 03:34:25 -0400 (EDT)

branch: master
commit d9d04d151c636b4836d3789c445dc3cdf95621d4
Author: Martin Rudalics <address@hidden>
Commit: Martin Rudalics <address@hidden>

    Fix byte compile warning and some customizations
    
    * packages/frame-tabs/frame-tabs.el (frame-tabs-mode): New
    variable to silence byte compiler.
    (frame-tabs--set-value): Don't turn on 'frame-tabs-mode' unless
    it's already on.
    (frame-tabs-min-size, frame-tabs-max-size, frame-tabs-delay): Set
    value via 'frame-tabs--set-value'.
---
 packages/frame-tabs/frame-tabs.el | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/packages/frame-tabs/frame-tabs.el 
b/packages/frame-tabs/frame-tabs.el
index 5b3471f..6f1e8ac 100644
--- a/packages/frame-tabs/frame-tabs.el
+++ b/packages/frame-tabs/frame-tabs.el
@@ -94,12 +94,14 @@ button."
   :group 'frame-tabs)
 
 ;; Options
+(defvar frame-tabs-mode)
+
 (defun frame-tabs--set-value (symbol value)
   "Helper function for customizing frame tabs."
   (set-default symbol value)
   (when frame-tabs-mode
-    (frame-tabs-mode -1))
-  (frame-tabs-mode 1))
+    (frame-tabs-mode -1)
+    (frame-tabs-mode 1)))
 
 (defcustom frame-tabs-side 'top
   "Side of frame where tabs windows are located.
@@ -132,6 +134,8 @@ of a frame this is their minimum number of columns.
 This value may be overridden when the major side window showing
 the frame tabs window contains other windows."
   :type 'integer
+  :initialize 'custom-initialize-default
+  :set 'frame-tabs--set-value
   :version "26.1"
   :group 'frame-tabs)
 
@@ -144,6 +148,8 @@ of a frame this is their maximum number of columns.
 This value may be overridden when the major side window showing
 the frame tabs window contains other windows."
   :type 'integer
+  :initialize 'custom-initialize-default
+  :set 'frame-tabs--set-value
   :version "26.1"
   :group 'frame-tabs)
 
@@ -151,6 +157,8 @@ the frame tabs window contains other windows."
   "Frame tabs update interval, in seconds.
 This is the time Emacs waits before updating frame tabs windows."
   :type 'float
+  :initialize 'custom-initialize-default
+  :set 'frame-tabs--set-value
   :version "26.1"
   :group 'frame-tabs)
 



reply via email to

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