| … | |
… | |
| 258 | } |
258 | } |
| 259 | |
259 | |
| 260 | =item root |
260 | =item root |
| 261 | |
261 | |
| 262 | Returns the root window pixmap, that is, hopefully, the background image |
262 | Returns the root window pixmap, that is, hopefully, the background image |
| 263 | of your screen. The image is set to extend mode. |
263 | of your screen. |
| 264 | |
264 | |
| 265 | This function makes your expression root sensitive, that means it will be |
265 | This function makes your expression root sensitive, that means it will be |
| 266 | reevaluated when the bg image changes. |
266 | reevaluated when the bg image changes. |
| 267 | |
267 | |
| 268 | =cut |
268 | =cut |
| … | |
… | |
| 304 | } |
304 | } |
| 305 | |
305 | |
| 306 | =item merge $img ... |
306 | =item merge $img ... |
| 307 | |
307 | |
| 308 | Takes any number of images and merges them together, creating a single |
308 | Takes any number of images and merges them together, creating a single |
| 309 | image containing them all. |
309 | image containing them all. The tiling mode of the first image is used as |
|
|
310 | the tiling mdoe of the resulting image. |
| 310 | |
311 | |
| 311 | This function is called automatically when an expression returns multiple |
312 | This function is called automatically when an expression returns multiple |
| 312 | images. |
313 | images. |
| 313 | |
314 | |
| 314 | =cut |
315 | =cut |
| … | |
… | |
| 335 | $x1 = $x if $x1 < $x; |
336 | $x1 = $x if $x1 < $x; |
| 336 | $y1 = $y if $y1 < $y; |
337 | $y1 = $y if $y1 < $y; |
| 337 | } |
338 | } |
| 338 | |
339 | |
| 339 | my $base = $self->new_img (urxvt::PictStandardARGB32, $x0, $y0, $x1 - $x0, $y1 - $y0); |
340 | my $base = $self->new_img (urxvt::PictStandardARGB32, $x0, $y0, $x1 - $x0, $y1 - $y0); |
|
|
341 | $base->repeat_mode ($_[0]->repeat_mode); |
| 340 | $base->fill ([0, 0, 0, 0]); |
342 | $base->fill ([0, 0, 0, 0]); |
| 341 | |
343 | |
| 342 | $base->draw ($_) |
344 | $base->draw ($_) |
| 343 | for @_; |
345 | for @_; |
| 344 | |
346 | |
