1 # lib
2 
3 This are some common stuff that needs to be shared between panel
4 and event-gen.
5 
6 	fn hc { herbstclient $* }
7 
8 	if (~ $"monitor '')
9 		monitor=0
10 
11 	geometry=`{hc monitor_rect $"monitor}
12 	if (test -z $"geometry) {
13 		echo invalid monitor $monitor
14 		exit 1
15 	}
16 
17 	x=$geometry(1)
18 	y=$geometry(2)
19 	panel_width=$geometry(3)
20 	panel_height=16
21 
22 	font='-*-fixed-medium-*-*-*-12-*-*-*-*-*-*-*'
23 
24 	fn omit-alpha {
25 		sed 's,^\(\#[0-9a-f]\{6\}\)[0-9a-f]\{2\}$,\1,'
26 	}
27 
28 	# extract colors from hlwm and omit alpha-value
29 	bgcolor=`{hc get frame_border_normal_color | omit-alpha}
30 	selbg=`{hc get window_border_active_color | omit-alpha}
31 	selfg='#101010'