diff options
| author | Stefan Kangas | 2022-09-26 21:32:55 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2022-09-26 21:32:55 +0200 |
| commit | 93b9cf41846b40cd050b56f6e83b590330be255e (patch) | |
| tree | 101c8e0ec6ff4808be783f3170f540abc36adfe5 | |
| parent | bb9df76dc96afa046e8a576708f39881f0535235 (diff) | |
| download | emacs-93b9cf41846b40cd050b56f6e83b590330be255e.tar.gz emacs-93b9cf41846b40cd050b56f6e83b590330be255e.zip | |
Get rid of default wallpaper-setter constructor
* lisp/image/wallpaper.el (wallpaper-setter): Actually get rid of
the default constructor.
| -rw-r--r-- | lisp/image/wallpaper.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/image/wallpaper.el b/lisp/image/wallpaper.el index de650a7318e..36bc7e91a69 100644 --- a/lisp/image/wallpaper.el +++ b/lisp/image/wallpaper.el | |||
| @@ -84,7 +84,8 @@ the image file to set the wallpaper to.") | |||
| 84 | ;;; Finding the wallpaper command | 84 | ;;; Finding the wallpaper command |
| 85 | 85 | ||
| 86 | (cl-defstruct (wallpaper-setter | 86 | (cl-defstruct (wallpaper-setter |
| 87 | ;; Rename the default constructor from `make-wallpaper-cmd'. | 87 | ;; Get rid of the default constructor (`make-wallpaper-cmd'). |
| 88 | (:constructor nil) | ||
| 88 | (:constructor | 89 | (:constructor |
| 89 | wallpaper-setter-create | 90 | wallpaper-setter-create |
| 90 | ( name command args-raw | 91 | ( name command args-raw |