Get rid of default wallpaper-setter constructor

* lisp/image/wallpaper.el (wallpaper-setter): Actually get rid of
the default constructor.

diff --git a/lisp/image/wallpaper.el b/lisp/image/wallpaper.el
index de650a7318efebd92b8c922a2833280bb4ca5879..36bc7e91a6927ecdc4eb9a94a8d1345325fa0940 100644 (file)
--- a/lisp/image/wallpaper.el
+++ b/lisp/image/wallpaper.el
@@ -84,7 +84,8 @@ the image file to set the wallpaper to.")
 ;;; Finding the wallpaper command
 
 (cl-defstruct (wallpaper-setter
-               ;; Rename the default constructor from `make-wallpaper-cmd'.
+               ;; Get rid of the default constructor (`make-wallpaper-cmd').
+               (:constructor nil)
                (:constructor
                 wallpaper-setter-create
                 ( name command args-raw