Lines Matching +defs:backward +defs:delete +defs:char
124 "If set, delete older file in the thumbnails directory.
232 (delete-file (cadr (cdar files-list)))
308 (subst-char-in-string
400 (goto-char (point-min))
442 (delete-region (point-min)(point-max))
492 (goto-char (point-min))
499 (forward-char 1))
506 (goto-char (point-min))
510 (forward-char 1))
513 (defun thumbs-delete-images ()
517 (if (yes-or-no-p (format "Really delete %d files? " (length files)))
524 (delete-file x)
525 (delete-file (thumbs-thumbname x)))
529 (goto-char (car (rassoc x thumbs-file-list)))
530 (delete-region (point) (1+ (point))))
560 (goto-char (car (rassoc file thumbs-file-list)))
561 (delete-region (point) (1+ (point))))
586 (goto-char (point-min))))
618 (goto-char p)))
628 (delete-char 1)
630 (when (eolp) (forward-char)))
638 (setq thumbs-marked-list (delete elt thumbs-marked-list))
640 (delete-char 1)
642 (when (eolp) (forward-char)))
645 (mapc 'delete-file
697 (defun thumbs-forward-char ()
700 (forward-char)
702 (forward-char))
705 (defun thumbs-backward-char ()
706 "Move backward one image."
708 (forward-char -1)
710 (forward-char -1))
713 (defun thumbs-backward-line ()
760 (define-key map [delete] 'thumbs-delete-images)
761 (define-key map [right] 'thumbs-forward-char)
762 (define-key map [left] 'thumbs-backward-char)
763 (define-key map [up] 'thumbs-backward-line)
770 (define-key map "x" 'thumbs-delete-images)