;; basic configuration parameters for scwm
;; ATTENTION!!!: THE FOLLOWING VARIABLES MUST BE DEFINED!!!
;; user-image-path,menu-font,title-font,icon-font,menuFG,menuBG,
;; windowFG,windowBG,focus-type,restart-function,init-function,
;; window-toggle-maximize

;; the path where a user can put own images 
(define user-image-path '())

;; now we define the font for menus, titles and icons
(define helvetica12
  (load-font "-adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-*-*"))

(define menu-font helvetica12)
(define title-font helvetica12)
(define icon-font helvetica12)

;; here we define the menus and windows foregroud and background colors
(define menuFG "black")
(define menuBG "grey76")
 
(define windowFG "white")
(define windowBG "navy")

;; here you can put one of these values:
;; 'click     - must click on the window to focus.
;; 'mouse     - the window gains focus as the mouse enters or leaves.
;; 'sloppy    - the window gains focus as the mouse enters, but does not
;;              lose it if the pointer enters the root window, or a window
;;              with 'click or 'none focus.
;; 'none      - don't ever give this window focus, even if
;;              it is clicked.

(define focus-type 'mouse)

;; this is the function, scwm call when you restart it 
(define (restart-function)
  ())

;; init-function is the function, scwm call after the initialisation.

(define (init-function) 
  ())

;;; now we define the maximize function

;; use this definition, if you want the normal vertical-only maximize function

(define (window-toggle-maximize) 
  (toggle-maximize 0 (%y 100)))

;; use this function, if you want a vertical-and-orrizontal maximize function

;; (define (window-toggle-maximize)
;;   (toggle-maximize (%x 99) (%y 99))
;;   (move-to 7 7))
    
