home *** CD-ROM | disk | FTP | other *** search
/ PCGUIA 2010 Software/Programs / PCGuia_programas.iso / Software / Utils / The GIMP / gimp-2.6.8-i686-setup.exe / {app} / share / gimp / 2.0 / scripts / copy-visible.scm < prev    next >
Encoding:
GIMP Script-Fu Script  |  2009-12-15  |  1.8 KB  |  51 lines
  1. ; GIMP - The GNU Image Manipulation Program
  2. ; Copyright (C) 1995 Spencer Kimball and Peter Mattis
  3. ;
  4. ; "Copy Visible" -- copy the visible selection so that it can be pasted easily
  5. ; Copyright (C) 2004 Rapha├½l Quinet, Adrian Likins, Sven Neumann
  6. ;
  7. ; This program is free software; you can redistribute it and/or modify
  8. ; it under the terms of the GNU General Public License as published by
  9. ; the Free Software Foundation; either version 2 of the License, or
  10. ; (at your option) any later version.
  11. ;
  12. ; This program is distributed in the hope that it will be useful,
  13. ; but WITHOUT ANY WARRANTY; without even the implied warranty of
  14. ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15. ; GNU General Public License for more details.
  16. ;
  17. ; You should have received a copy of the GNU General Public License
  18. ; along with this program; if not, write to the Free Software
  19. ; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20. ;
  21. ; 2004-04-14 This script was almost rewritten from scratch
  22. ;     by Rapha├½l Quinet <raphael@gimp.org>
  23. ;     see also http://bugzilla.gnome.org/show_bug.cgi?id=139989
  24. ;
  25. ; The code is new but the API is the same as in the previous version:
  26. ; "Copy Visible"  version 0.11 01/24/98
  27. ;     by Adrian Likins <adrian@gimp.org>
  28. ;   _heavily_ based on:
  29. ;        cyn-merge.scm   version 0.02   10/10/97
  30. ;        Copyright (C) 1997 Sven Neumann (neumanns@uni-duesseldorf.de)
  31. ;
  32. ; Removed all code and made it a backward-compat wrapper around
  33. ;     (gimp-edit-copy-visible)
  34. ;     2004-12-12 Michael Natterer <mitch@gimp.org>
  35. ;
  36.  
  37. (define (script-fu-copy-visible image drawable)
  38.   (gimp-edit-copy-visible image)
  39. )
  40.  
  41. (script-fu-register "script-fu-copy-visible"
  42.   "Copy Visible"
  43.   "This procedure is deprecated! use \'gimp-edit-copy-visible\' instead."
  44.   ""
  45.   ""
  46.   ""
  47.   "RGB* INDEXED* GRAY*"
  48.   SF-IMAGE    "Image"    0
  49.   SF-DRAWABLE "Drawable" 0
  50. )
  51.