At Tue, 29 Mar 2011 09:43:27 -0500,
Russell Adams wrote:
> I made a minor change. File names are now generated by using the
> current org buffer filename, plus the date and time, and a unique
> number. This allows me to sort out the images better.
>
>                           (defun org-screenshot ()
>                             "Take a screenshot into a time stamped unique-named file in the same directory as the org-buffer and insert a link to this file."
>                             (interactive)
>                             (setq filename
>                                   (concat
>                                    (make-temp-name
>                                     (concat (buffer-file-name)
>                                             "_"
>                                             (format-time-string "%Y%m%d_%H%M%S_")) ) ".png"))
>                             (call-process "import" nil nil nil filename)
>                             (insert (concat "[[" filename "]]"))
>                             (org-display-inline-images))
>

Thanks, I update the function on Worg.

Best,
  -- David
--
OpenPGP... 0x99ADB83B5A4478E6
Jabber.... dmjena@jabber.org
Email..... dmaus@ictsoc.de