diff options
| author | Stefan Kangas | 2022-09-17 22:14:31 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2022-09-18 00:20:29 +0200 |
| commit | f5f296b0800de4cd459e41b4a7b1cb97673e8dbb (patch) | |
| tree | a83fa035d42dab0b04993744f0d7d7e3a0724537 | |
| parent | 9aef9e2cb6b547f62911d06e90081af32134de66 (diff) | |
| download | emacs-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.el | 12 |
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'." | |||
| 238 | The value of this option is ignored if Image-Dired is customized | 238 | The value of this option is ignored if Image-Dired is customized |
| 239 | to use the Thumbnail Managing Standard; the standard sizes will | 239 | to use the Thumbnail Managing Standard; the standard sizes will |
| 240 | be used instead. See `image-dired-thumbnail-storage'." | 240 | be 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. |
| 249 | This is where you see the cursor." | 249 | This 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) |