]> git.eshelyaron.com Git - emacs.git/commit
Add reasonable default to wallpaper-set
authorStefan Kangas <stefankangas@gmail.com>
Sun, 25 Sep 2022 14:16:51 +0000 (16:16 +0200)
committerStefan Kangas <stefankangas@gmail.com>
Sun, 25 Sep 2022 14:16:51 +0000 (16:16 +0200)
commitad88e3e0b5d625282fb73f3378407ac87dad21f0
treea1a170e5204518ea56e4a110890050fa8438faad
parentf761869a563866d55da437d06f267979e90cf3a0
Add reasonable default to wallpaper-set

* lisp/image/wallpaper.el
(wallpaper-default-file-name-regexp): New variable.
(wallpaper--get-default-file): New function.
(wallpaper-set): Use above new function to set a default.
* test/lisp/image/wallpaper-tests.el: New file.
lisp/image/wallpaper.el
test/lisp/image/wallpaper-tests.el [new file with mode: 0644]