Lines Matching +defs:local +defs:copy
22 ;; You should have received a copy of the GNU General Public License
68 ; may prefer /usr/local/gnu/bin or whatever. However, chown is
128 (defcustom dired-keep-marker-copy ?C
160 The target is used in the prompt for file copy, rename etc."
165 (defcustom dired-copy-preserve-time t
166 "*If non-nil, Dired preserves the last-modified time in a file copy.
204 '(("^file:///" . dired-dnd-handle-local-file)
206 ("^file:" . dired-dnd-handle-local-file))
288 (make-variable-buffer-local 'dired-switches-alist)
705 ;; kill-all-local-variables any longer.
730 ;; (buffer-local), so we can call dired-readin:
781 \(including making it buffer-local and clearing it first)."
783 ;; default-directory and dired-actual-switches must be buffer-local
797 (make-local-variable 'file-name-coding-system)
807 ;; Must first make alist buffer local and set it to nil because
809 (set (make-local-variable 'dired-subdir-alist) nil)
896 (if (> other file) (setq other (copy-marker other)))
897 (setq file (copy-marker file))
961 (process-environment (copy-sequence process-environment))
1156 (define-key map "C" 'dired-do-copy)
1186 ;; but that seems to serve little purpose, and copy-keymap
1195 (define-key map "%C" 'dired-do-copy-regexp)
1238 (define-key map "w" 'dired-copy-filename-as-kill)
1395 (define-key map [menu-bar regexp copy]
1396 '(menu-item "Copy..." dired-do-copy-regexp
1531 (define-key map [menu-bar operate copy]
1532 '(menu-item "Copy to..." dired-do-copy
1573 Type \\[dired-do-copy] to Copy files.
1595 `dired-keep-marker-copy'
1610 (kill-all-local-variables)
1611 (use-local-map dired-mode-map)
1620 (set (make-local-variable 'revert-buffer-function)
1622 (set (make-local-variable 'buffer-stale-function)
1624 (set (make-local-variable 'page-delimiter)
1626 (set (make-local-variable 'dired-directory)
1629 (set (make-local-variable 'list-buffers-directory)
1633 (set (make-local-variable 'dired-actual-switches)
1635 (set (make-local-variable 'font-lock-defaults)
1637 (set (make-local-variable 'desktop-save-buffer)
1642 (set (make-local-variable 'dnd-protocol-alist)
2009 (defun dired-copy-filename-as-kill (&optional arg)
2602 `copy', `delete', `hardlink', `load', `move', `print', `shell', `symlink',
2607 (const copy) (const delete) (const hardlink)
2655 (setq files (nconc (copy-sequence files) ; fill up with empty fns
3196 (make-variable-buffer-local 'dired-subdir-alist-pre-R)
3236 `always' means copy recursively without asking.
3258 '(("Copy here" . copy)
3264 (dired-dnd-handle-local-file uri action)
3267 (defun dired-dnd-handle-local-file (uri action)
3269 URI is the file to handle, ACTION is one of copy, move, link or ask.
3270 Ask means pop up a menu for the user to select one of copy, move or link."
3272 (let* ((from (dnd-get-local-file-name uri t))
3277 (cond ((or (eq action 'copy)
3278 (eq action 'private)) ; Treat private as copy.
3281 ;; dired-copy-file silently fails. Pop up a notice.
3286 (dired-copy-file from to 1)
3306 "Copy, move or link a file to the dired directory if it is a local file.
3307 URI is the file to handle. If the hostname in the URI isn't local, do nothing.
3308 ACTION is one of copy, move, link or ask.
3309 Ask means pop up a menu for the user to select one of copy, move or link."
3310 (let ((local-file (dnd-get-local-file-uri uri)))
3311 (if local-file (dired-dnd-handle-local-file local-file action)