sawfish r4256 - in trunk: . themes/get-S-tabbed
- From: sscriven svn gnome org
- To: svn-commits-list gnome org
- Subject: sawfish r4256 - in trunk: . themes/get-S-tabbed
- Date: Tue, 5 Aug 2008 10:07:30 +0000 (UTC)
Author: sscriven
Date: Tue Aug 5 10:07:30 2008
New Revision: 4256
URL: http://svn.gnome.org/viewvc/sawfish?rev=4256&view=rev
Log:
get-S-tabbed: First working version of get-S-tabbed.
Added:
trunk/themes/get-S-tabbed/INSTALL
trunk/themes/get-S-tabbed/example.png
trunk/themes/get-S-tabbed/foo-l.png
trunk/themes/get-S-tabbed/foo-r.png
trunk/themes/get-S-tabbed/title-left-active-f.png
trunk/themes/get-S-tabbed/title-left-active-l.png
trunk/themes/get-S-tabbed/title-left-active-m.png
trunk/themes/get-S-tabbed/title-left-active-r.png
trunk/themes/get-S-tabbed/title-left-inactive-f.png
trunk/themes/get-S-tabbed/title-left-inactive-l.png
trunk/themes/get-S-tabbed/title-left-inactive-m.png
trunk/themes/get-S-tabbed/title-left-inactive-r.png
trunk/themes/get-S-tabbed/title-right-l.png
trunk/themes/get-S-tabbed/title-right-r.png
Modified:
trunk/ (props changed)
trunk/themes/get-S-tabbed/README
trunk/themes/get-S-tabbed/theme.jl
Added: trunk/themes/get-S-tabbed/INSTALL
==============================================================================
--- (empty file)
+++ trunk/themes/get-S-tabbed/INSTALL Tue Aug 5 10:07:30 2008
@@ -0,0 +1,14 @@
+To use this theme, you'll need to do slightly more than just unpack it and
+select it. After untarring, add this to your sawfish config:
+
+ (define-special-variable default-frame-style 'get-S-tabbed "Default frame style")
+ (custom-set-typed-variable 'tab-left-dec-width '5 'number)
+ (custom-set-typed-variable 'tab-right-dec-width '5 'number)
+ (custom-set-typed-variable 'tab-left-margin '14 'number)
+ (custom-set-typed-variable 'tab-right-margin '38 'number)
+ ; choose whatever font you like...
+ (custom-set-typed-variable
+ (quote default-font) (quote ("Pango" . "Sans 10")) (quote font))
+
+I don't yet have a way to get those tab-* variables directly from the theme to
+the tab layout code, so it's currently necessary to configure them manually.
Modified: trunk/themes/get-S-tabbed/README
==============================================================================
--- trunk/themes/get-S-tabbed/README (original)
+++ trunk/themes/get-S-tabbed/README Tue Aug 5 10:07:30 2008
@@ -1,6 +1,8 @@
-This is a port of my get-E theme for Enlihtenment.
+This is a port of my get-E theme for Enlihtenment.
e-mail your comments to egggman penguinpowered com
egggman
+(modified by ToyKeeper [ http://toykeeper.net/ ]
+to add tabbed windowing support)
Added: trunk/themes/get-S-tabbed/example.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/example.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/foo-l.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/foo-l.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/foo-r.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/foo-r.png Tue Aug 5 10:07:30 2008 differ
Modified: trunk/themes/get-S-tabbed/theme.jl
==============================================================================
--- trunk/themes/get-S-tabbed/theme.jl (original)
+++ trunk/themes/get-S-tabbed/theme.jl Tue Aug 5 10:07:30 2008
@@ -1,12 +1,14 @@
-; get-S/theme.jl
+; get-S-tabbed/theme.jl
;; Based off of my arctic Enlightenment theme....
(let*
(
- (font (get-font "-*-lucida-medium-r-normal-*-*-100-*-*-p-*-iso8859-1"))
- (font-colors (list "grey" "white"))
+ ;(font (get-font "-*-lucida-medium-r-normal-*-*-100-*-*-p-*-iso8859-1"))
+ ;(font (get-font "Sans 9"))
+ (font default-font)
+ (font-colors (list "grey50" "white"))
(title-images (list (make-image "title-bar-inactive.png")
(make-image "title-bar-active.png")))
@@ -16,6 +18,22 @@
(set-image-border
(make-image "title-left-active.png") 10 10 0 0)))
+ (title-left-f-images (list (set-image-border
+ (make-image "title-left-inactive-f.png") 10 10 3 1)
+ (set-image-border
+ (make-image "title-left-active-f.png") 10 10 3 1)))
+
+ (title-left-l-images (list (make-image "title-left-inactive-l.png")
+ (make-image "title-left-active-l.png")))
+
+ (title-left-m-images (list (set-image-border
+ (make-image "title-left-inactive-m.png") 10 10 0 0)
+ (set-image-border
+ (make-image "title-left-active-m.png") 10 10 0 0)))
+
+ (title-left-r-images (list (make-image "title-left-inactive-r.png")
+ (make-image "title-left-active-r.png")))
+
(iconify-images (list (make-image "iconify-normal.png")
nil nil
(make-image "iconify-clicked.png")))
@@ -33,6 +51,8 @@
(make-image "close-clicked.png")))
(title-right (set-image-border(make-image "title-right.png")10 10 10 10))
+ (title-right-l (set-image-border(make-image "title-right-l.png") 3 0 10 10))
+ (title-right-r (set-image-border(make-image "title-right-r.png") 0 3 10 10))
(border-top (make-image "border_top.png"))
(border-bottom (make-image "border_bottom.png"))
(border-right (make-image "border_right.png"))
@@ -76,22 +96,22 @@
(class . title))
((background . ,menu-images)
- (top-edge . -11)
+ (top-edge . -12)
(left-edge . 1)
(class . menu-button))
((background . ,iconify-images)
- (top-edge . -11)
+ (top-edge . -12)
(right-edge . 26)
(class . iconify-button))
((background . ,maximize-images)
- (top-edge . -11)
+ (top-edge . -12)
(right-edge . 13)
(class . maximize-button))
((background . ,close-images)
- (top-edge . -11)
+ (top-edge . -12)
(right-edge . 1)
(class . close-button))
@@ -191,40 +211,67 @@
))
(frame `(
- ((background . ,title-right)
+ ; TODO: re-add this part
+ ;((background . ,title-right)
+ ; (top-edge . -14)
+ ; (left-edge . -3)
+ ; (right-edge . -3)
+ ; (class . title))
+
+ ;; left part of title background
+ ((background . ,title-right-l)
(top-edge . -14)
(left-edge . -3)
+ (width . 18)
+ (class . title))
+
+ ;; right part of title background
+ ((background . ,title-right-r)
+ (top-edge . -14)
+ (width . 42)
(right-edge . -3)
(class . title))
- ((background . ,title-left-images)
+ ;; tab
+ ;((background . ,title-left-f-images)
+ ((background . ,title-left-m-images)
(foreground . ,font-colors)
(font . ,font)
(text . ,window-name)
(x-justify . center)
(y-justify . center)
(top-edge . -16)
- (left-edge . 15)
- (right-edge . 40)
- (class . title))
+ ;(left-edge . 15)
+ ;(right-edge . 40)
+ (class . tab))
+
+ ;; tab
+ ((background . ,title-left-l-images)
+ (top-edge . -16)
+ (class . tab-l))
+
+ ;; tab
+ ((background . ,title-left-r-images)
+ (top-edge . -16)
+ (class . tab-r))
((background . ,menu-images)
- (top-edge . -11)
+ (top-edge . -12)
(left-edge . 1)
(class . menu-button))
((background . ,iconify-images)
- (top-edge . -11)
+ (top-edge . -12)
(right-edge . 26)
(class . iconify-button))
((background . ,maximize-images)
- (top-edge . -11)
+ (top-edge . -12)
(right-edge . 13)
(class . maximize-button))
((background . ,close-images)
- (top-edge . -11)
+ (top-edge . -12)
(right-edge . 1)
(class . close-button))
@@ -259,10 +306,18 @@
))
)
- (add-frame-style 'get-S
+ (add-frame-style 'get-S-tabbed
(lambda (w type)
(case type
((default) frame)
((transient) transient-frame)
((shaped) shaped-frame)
- ((shaped-transient) shaped-transient-frame)))))
+ ((shaped-transient) shaped-transient-frame))))
+
+ ; TODO: figure out how to store this info in this file correctly
+ ;(custom-set-typed-variable'tab-left-dec-width '5 'number)
+ ;(custom-set-typed-variable'tab-right-dec-width '5 'number)
+ ;(custom-set-typed-variable'tab-left-margin '14 'number)
+ ;(custom-set-typed-variable'tab-right-margin '38 'number)
+
+ )
Added: trunk/themes/get-S-tabbed/title-left-active-f.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-left-active-f.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-left-active-l.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-left-active-l.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-left-active-m.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-left-active-m.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-left-active-r.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-left-active-r.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-left-inactive-f.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-left-inactive-f.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-left-inactive-l.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-left-inactive-l.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-left-inactive-m.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-left-inactive-m.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-left-inactive-r.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-left-inactive-r.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-right-l.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-right-l.png Tue Aug 5 10:07:30 2008 differ
Added: trunk/themes/get-S-tabbed/title-right-r.png
==============================================================================
Binary files (empty file) and trunk/themes/get-S-tabbed/title-right-r.png Tue Aug 5 10:07:30 2008 differ
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]
