aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Kangas2022-09-17 22:14:31 +0200
committerStefan Kangas2022-09-18 00:20:29 +0200
commitf5f296b0800de4cd459e41b4a7b1cb97673e8dbb (patch)
treea83fa035d42dab0b04993744f0d7d7e3a0724537
parent9aef9e2cb6b547f62911d06e90081af32134de66 (diff)
downloademacs-f5f296b0800de4cd459e41b4a7b1cb97673e8dbb.tar.gz
emacs-f5f296b0800de4cd459e41b4a7b1cb97673e8dbb.zip
image-dired: Change some custom types to natnum
* lisp/image/image-dired.el (image-dired-thumb-size) (image-dired-thumb-relief, image-dired-thumb-margin) (image-dired-thumbs-per-row, image-dired-thumb-width) (image-dired-thumb-height): Change :type to natnum.
-rw-r--r--lisp/image/image-dired.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/image/image-dired.el b/lisp/image/image-dired.el
index 33f10bdbb73..f5725a53efe 100644
--- a/lisp/image/image-dired.el
+++ b/lisp/image/image-dired.el
@@ -238,16 +238,16 @@ original file with `image-dired-temp-rotate-image-file'."
238The value of this option is ignored if Image-Dired is customized 238The value of this option is ignored if Image-Dired is customized
239to use the Thumbnail Managing Standard; the standard sizes will 239to use the Thumbnail Managing Standard; the standard sizes will
240be used instead. See `image-dired-thumbnail-storage'." 240be used instead. See `image-dired-thumbnail-storage'."
241 :type 'integer) 241 :type 'natnum)
242 242
243(defcustom image-dired-thumb-relief 2 243(defcustom image-dired-thumb-relief 2
244 "Size of button-like border around thumbnails." 244 "Size of button-like border around thumbnails."
245 :type 'integer) 245 :type 'natnum)
246 246
247(defcustom image-dired-thumb-margin 2 247(defcustom image-dired-thumb-margin 2
248 "Size of the margin around thumbnails. 248 "Size of the margin around thumbnails.
249This is where you see the cursor." 249This is where you see the cursor."
250 :type 'integer) 250 :type 'natnum)
251 251
252(defcustom image-dired-thumb-visible-marks t 252(defcustom image-dired-thumb-visible-marks t
253 "Make marks and flags visible in thumbnail buffer. 253 "Make marks and flags visible in thumbnail buffer.
@@ -288,7 +288,7 @@ and No line-up means that no automatic line-up will be done."
288 288
289(defcustom image-dired-thumbs-per-row 3 289(defcustom image-dired-thumbs-per-row 3
290 "Number of thumbnails to display per row in thumb buffer." 290 "Number of thumbnails to display per row in thumb buffer."
291 :type 'integer) 291 :type 'natnum)
292 292
293(defcustom image-dired-track-movement t 293(defcustom image-dired-track-movement t
294 "The current state of the tracking and mirroring. 294 "The current state of the tracking and mirroring.
@@ -1346,13 +1346,13 @@ Track this in associated Dired buffer if
1346 'image-dired-thumb-size "29.1") 1346 'image-dired-thumb-size "29.1")
1347(defcustom image-dired-thumb-width image-dired-thumb-size 1347(defcustom image-dired-thumb-width image-dired-thumb-size
1348 "Width of thumbnails, in pixels." 1348 "Width of thumbnails, in pixels."
1349 :type 'integer) 1349 :type 'natnum)
1350 1350
1351(make-obsolete-variable 'image-dired-thumb-height 1351(make-obsolete-variable 'image-dired-thumb-height
1352 'image-dired-thumb-size "29.1") 1352 'image-dired-thumb-size "29.1")
1353(defcustom image-dired-thumb-height image-dired-thumb-size 1353(defcustom image-dired-thumb-height image-dired-thumb-size
1354 "Height of thumbnails, in pixels." 1354 "Height of thumbnails, in pixels."
1355 :type 'integer) 1355 :type 'natnum)
1356 1356
1357(defcustom image-dired-temp-image-file 1357(defcustom image-dired-temp-image-file
1358 (expand-file-name ".image-dired_temp" image-dired-dir) 1358 (expand-file-name ".image-dired_temp" image-dired-dir)