Autoload wallpaper-set
* lisp/image/wallpaper.el (wallpaper-set): Autoload. * lisp/image-mode.el (wallpaper): * lisp/image/image-dired.el (wallpaper): * lisp/thumbs.el (wallpaper): Don't require.
This commit is contained in:
@@ -45,7 +45,6 @@
|
||||
(require 'image)
|
||||
(require 'exif)
|
||||
(require 'dired)
|
||||
(require 'wallpaper)
|
||||
(eval-when-compile (require 'cl-lib))
|
||||
|
||||
;;; Image mode window-info management.
|
||||
|
||||
@@ -133,7 +133,6 @@
|
||||
|
||||
(require 'dired)
|
||||
(require 'image-mode)
|
||||
(require 'wallpaper)
|
||||
(require 'widget)
|
||||
(require 'xdg)
|
||||
|
||||
|
||||
@@ -279,6 +279,7 @@ See also `wallpaper-default-width'.")
|
||||
(declare-function w32-set-wallpaper "w32fns.c")
|
||||
(declare-function haiku-set-wallpaper "term/haiku-win.el")
|
||||
|
||||
;;;###autoload
|
||||
(defun wallpaper-set (file)
|
||||
"Set the desktop background to FILE in a graphical environment.
|
||||
|
||||
|
||||
@@ -54,7 +54,6 @@
|
||||
;;; Code:
|
||||
|
||||
(require 'dired)
|
||||
(require 'wallpaper)
|
||||
(require 'cl-lib) ; for cl-gensym
|
||||
|
||||
;; CUSTOMIZATIONS
|
||||
|
||||
Reference in New Issue
Block a user