--- rxvt-unicode/src/perl/background 2012/06/06 11:46:11 1.16 +++ rxvt-unicode/src/perl/background 2012/06/06 15:06:41 1.18 @@ -2,7 +2,7 @@ #:META:X_RESOURCE:%.expr:string:background expression #:META:X_RESOURCE:%.enable:boolean:some boolean -#:META:X_RESOURCE:%.extra.*:value:extra config +#:META:X_RESOURCE:%.extra.:value:extra config our $EXPR = 'move load "/root/pix/das_fette_schwein.jpg", repeat_wrap, X, Y'; $EXPR = ' @@ -26,8 +26,8 @@ { package urxvt::bgdsl; # background language - *repeat_black = \&urxvt::RepeatNone; #TODO wtf - *repeat_wrap = \&urxvt::RepeatNormal; + *repeat_empty = \&urxvt::RepeatNone; + *repeat_tile = \&urxvt::RepeatNormal; *repeat_pad = \&urxvt::RepeatPad; *repeat_mirror = \&urxvt::RepeatReflect; @@ -254,8 +254,6 @@ sub on_start { my ($self) = @_; - warn $self->x_resource ("background.enable"); - $self->set_expr (parse_expr $EXPR); ()