Function: gnus-uu-grab-move

gnus-uu-grab-move is a byte-compiled function defined in gnus-uu.el.gz.

Signature

(gnus-uu-grab-move FILE)

Documentation

Move FILE to somewhere.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-uu.el.gz
(defun gnus-uu-grab-move (file)
  "Move FILE to somewhere."
  (when gnus-uu-default-dir
    (let ((to-file (concat (file-name-as-directory gnus-uu-default-dir)
			   (file-name-nondirectory file))))
      (rename-file file to-file)
      (unless (file-exists-p file)
	(make-symbolic-link to-file file)))))