Mercurial > emacs
comparison lisp/thumbs.el @ 60920:242e5edee3ce
* complete.el, thumbs.el: Replace `legal' with `valid'.
author | Werner LEMBERG <wl@gnu.org> |
---|---|
date | Fri, 25 Mar 2005 09:49:00 +0000 |
parents | aac0a33f5772 |
children | 6dd34b690fa9 4da4a09e8b1b |
comparison
equal
deleted
inserted
replaced
60919:3ad3287d2e49 | 60920:242e5edee3ce |
---|---|
1 ;;; thumbs.el --- Thumbnails previewer for images files | 1 ;;; thumbs.el --- Thumbnails previewer for images files |
2 | 2 |
3 ;; Copyright 2004 Free Software Foundation, Inc | 3 ;; Copyright 2004, 2005 Free Software Foundation, Inc |
4 | 4 |
5 ;; Author: Jean-Philippe Theberge <jphiltheberge@videotron.ca> | 5 ;; Author: Jean-Philippe Theberge <jphiltheberge@videotron.ca> |
6 ;; Keywords: Multimedia | 6 ;; Keywords: Multimedia |
7 | 7 |
8 ;; This file is part of GNU Emacs. | 8 ;; This file is part of GNU Emacs. |
628 | 628 |
629 ;; Image modification routines | 629 ;; Image modification routines |
630 | 630 |
631 (defun thumbs-modify-image (action &optional arg) | 631 (defun thumbs-modify-image (action &optional arg) |
632 "Call convert to do ACTION on image with argument ARG. | 632 "Call convert to do ACTION on image with argument ARG. |
633 ACTION and ARG should be legal convert command." | 633 ACTION and ARG should be a valid convert command." |
634 (interactive "sAction: \nsValue: ") | 634 (interactive "sAction: \nsValue: ") |
635 ;; cleaning of old temp file | 635 ;; cleaning of old temp file |
636 (mapc 'delete-file | 636 (mapc 'delete-file |
637 (directory-files | 637 (directory-files |
638 thumbs-temp-dir | 638 thumbs-temp-dir |