Commit 3e5b780f authored by Nick Roberts's avatar Nick Roberts
Browse files

(thumbs-do-thumbs-insertion): Suppress message when

there are no more images to display.
(thumbs-mark, thumbs-unmark): Revert change so that they move to
the next image.
parent 6045b8ef
...@@ -380,7 +380,7 @@ If MARKED is non-nil, the image is marked." ...@@ -380,7 +380,7 @@ If MARKED is non-nil, the image is marked."
(when (= 0 (mod (setq i (1+ i)) thumbs-per-line)) (when (= 0 (mod (setq i (1+ i)) thumbs-per-line))
(newline))) (newline)))
(unless (bobp) (newline)) (unless (bobp) (newline))
(if diff (message "Type + to display more images.")))) (if (> diff 0) (message "Type + to display more images."))))
(defun thumbs-show-thumbs-list (list &optional dir same-window) (defun thumbs-show-thumbs-list (list &optional dir same-window)
(unless (and (display-images-p) (unless (and (display-images-p)
...@@ -623,8 +623,7 @@ Open another window." ...@@ -623,8 +623,7 @@ Open another window."
(push elt thumbs-marked-list) (push elt thumbs-marked-list)
(let ((inhibit-read-only t)) (let ((inhibit-read-only t))
(delete-char 1) (delete-char 1)
(save-excursion (thumbs-insert-thumb elt t)))
(thumbs-insert-thumb elt t))))
(when (eolp) (forward-char))) (when (eolp) (forward-char)))
(defun thumbs-unmark () (defun thumbs-unmark ()
...@@ -636,11 +635,9 @@ Open another window." ...@@ -636,11 +635,9 @@ Open another window."
(setq thumbs-marked-list (delete elt thumbs-marked-list)) (setq thumbs-marked-list (delete elt thumbs-marked-list))
(let ((inhibit-read-only t)) (let ((inhibit-read-only t))
(delete-char 1) (delete-char 1)
(save-excursion (thumbs-insert-thumb elt nil)))
(thumbs-insert-thumb elt nil))))
(when (eolp) (forward-char))) (when (eolp) (forward-char)))
;; cleaning of old temp files ;; cleaning of old temp files
(mapc 'delete-file (mapc 'delete-file
(directory-files (thumbs-temp-dir) t thumbs-temp-prefix)) (directory-files (thumbs-temp-dir) t thumbs-temp-prefix))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment