master 5798c4aa2a 1/2: Support fbsetbg in wallpaper.el

[Stefan Kangas]

branch: master
commit 5798c4aa2a7b3e7337234e8122d8243ecf54b402
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>

    Support fbsetbg in wallpaper.el
    
    * lisp/image/wallpaper.el (wallpaper--default-commands)
    (wallpaper-command): Add "fbsetbg".
---
 lisp/image/wallpaper.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/image/wallpaper.el b/lisp/image/wallpaper.el
index 6d57691ff0..2ebe5be033 100644
--- a/lisp/image/wallpaper.el
+++ b/lisp/image/wallpaper.el
@@ -61,6 +61,7 @@
     ("gm" "display" "-size" "%wx%h" "-window" "root" "%f")
     ("display" "-resize" "%wx%h" "-window" "root" "%f")
     ("feh" "--bg-max" "%f")
+    ("fbsetbg" "-a" "%f")
     ("xwallpaper" "--zoom" "%f")
     ("hsetroot" "-full" "%f")
     ("xloadimage" "-onroot" "-fullscreen" "%f")
@@ -152,6 +153,7 @@ native API will be used instead (see 
`haiku-set-wallpaper')."
      (const :tag "gm                          (X Window System)"  "gm")
      (const :tag "display                     (X Window System)"  "display")
      (const :tag "feh                         (X Window System)"  "feh")
+     (const :tag "fbsetbg                     (X Window System)"  "fbsetbg")
      (const :tag "xwallpaper                  (X Window System)"  "xwallpaper")
      (const :tag "hsetroot                    (X Window System)"  "hsetroot")
      (const :tag "xloadimage                  (X Window System)"  "xloadimage")