branch: master commit d9d04d151c636b4836d3789c445dc3cdf95621d4 Author: Martin Rudalics <rudal...@gmx.at> Commit: Martin Rudalics <rudal...@gmx.at>
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)