Infra: Rudimentary setup system.

[clg] / examples / testgtkrc

# pixmap_path "<dir 1>:<dir 2>:<dir 3>:..."
#
# include "rc-file"
#
# style <name> [= <name>]
# {
#   <option>
# }
#
# widget <widget_set> style <style_name>
# widget_class <widget_class_set> style <style_name>

# testgtkrc2 sets all the buttons in the main window to blue by default
include "testgtkrc2"

#include "/usr/local/share/themes/Pixmap/gtk/gtkrc"
#include "/usr/local/share/themes/Redmond95/gtk/gtkrc"
#include "/usr/local/share/themes/Metal/gtk/gtkrc"
#include "/usr/local/share/themes/Notif/gtk/gtkrc"
#include "/usr/local/share/themes/Default/gtk/gtkrc"

pixmap_path "."

style "defaultfont"
{
#  fontset = "-adobe-helvetica-medium-r-normal--*-100-*-*-*-*-*-*,*"
  font = "-adobe-helvetica-medium-r-normal--*-120-*-*-*-*-*-*,*"
}

# common default
class "GtkWidget" style "defaultfont"

style "window"
{
# bg_pixmap[NORMAL] = "marble.xpm"
}

style "scale"
{
  fg[NORMAL] = { 1.0, 0, 0 }
  bg_pixmap[NORMAL] = "<parent>"
}

style "button" = "default"
{
#  fg[PRELIGHT] = { 1.0, 1.0, 1.0 }
#  bg[PRELIGHT] = { 0, 0, 0.75 }
#  bg[PRELIGHT] = { 0.75, 0, 0x00 }
}

style "toggle_button" = "button"
{
  fg[NORMAL] = { 1.0, 0, 0 }
  fg[ACTIVE] = { 1.0, 0, 0 }
#  bg_pixmap[ACTIVE] = "check-y.xpm"
#  bg_pixmap[NORMAL] = "check-n.xpm"
}

style "text"
{
#  bg_pixmap[NORMAL] = "marble.xpm"
  text[NORMAL] = { 1.0, 1.0, 1.0 }
  fg[NORMAL] = { 1.0, 1.0, 1.0 }
  base[NORMAL] = { 0.0, 0.0, 0.0 }
}

style "slider"
{
  fg[NORMAL] = { 1.0, 1.0, 1.0 }
  bg[NORMAL] = { 0.0, 0.0, 1.0 }
  bg[ACTIVE] = { 0.0 ,0.0, 0.5 }
  bg[PRELIGHT] = { 0.75 ,0.75, 1.0 }
}

style "ruler"
{
  font = '-adobe-helvetica-medium-r-normal--*-80-*-*-*-*-*-*'
}

style "curve"
{
  fg[NORMAL] = { 58000, 0, 0 }                  # red
}

style "red-bar"
{
  bg[PRELIGHT] = { 0.95, .55, 0.55 }
}

# override testgtk2, introduce the green color in the button list
style 'button_list' = 'button'
{
  font = "-adobe-helvetica-medium-r-normal--*-100-*-*-*-*-*-*"
  bg[PRELIGHT] = { 0, 0.75, 0x00 }
}
widget "main window.*GtkScrolledWindow.*GtkButton*" style "button_list"


class "GtkScrollbar" style "red-bar"

widget_class "GtkWindow" style "window"
widget_class "GtkDialog" style "window"
widget_class "GtkFileSelection" style "window"
widget_class "*Gtk*Scale" style "scale"
widget_class "*GtkCheckButton*" style "toggle_button"
widget_class "*GtkRadioButton*" style "toggle_button"
widget_class "*GtkButton*" style "button"
widget_class "*Ruler" style "ruler"
widget_class "*GtkText" style "text"
widget "*GtkCurve" style "curve"

binding "test1"
{
  bind "<ctrl>1" {
    "debug-msg" ("jup!")
  }
}

binding "test2"
{
  bind "<ctrl>1" {
    "debug-msg" ("hallo and")
    "debug-msg" ("huhu")
  }
}

# possible priorities are (in ascending order):
# lowest
# gtk         (used by gtk for internal class bindings)
# application (for hard coded bindings on application basis)
# rc          (used implicitel by rc files)
# highest
class "GtkCList" binding  "test1"           # implicit : rc
#class "GtkWindow" binding : highest "test2" # override "rc" priority

binding "clist-test"
{
  bind "j" {
    "scroll-vertical" (step-backward, 0.0)
  }
  bind "k" {
    "scroll-vertical" (step-forward, 0.0)
  }
}

class "GtkCList" binding "clist-test"