Mercurial > emacs
comparison lisp/dired.el @ 62658:4c2b5f50f981
(dired-dnd-popup-notice): Use message-box.
| author | Nick Roberts <nickrob@snap.net.nz> |
|---|---|
| date | Mon, 23 May 2005 23:36:18 +0000 |
| parents | 1f84b1fd2560 |
| children | ac4dcbb00c51 5b029ff3b08d |
comparison
equal
deleted
inserted
replaced
| 62657:fa9ab301872c | 62658:4c2b5f50f981 |
|---|---|
| 3178 (const :tag "Ask for each top directory only" top) | 3178 (const :tag "Ask for each top directory only" top) |
| 3179 (const :tag "Copy directories without asking" always)) | 3179 (const :tag "Copy directories without asking" always)) |
| 3180 :group 'dired) | 3180 :group 'dired) |
| 3181 | 3181 |
| 3182 (defun dired-dnd-popup-notice () | 3182 (defun dired-dnd-popup-notice () |
| 3183 (x-popup-dialog | 3183 (message-box |
| 3184 t | 3184 "Recursive copies not enabled.\nSee variable dired-recursive-copies.")) |
| 3185 '("Recursive copies not enabled.\nSee variable dired-recursive-copies." | |
| 3186 ("Ok" . nil)))) | |
| 3187 | 3185 |
| 3188 | 3186 |
| 3189 (defun dired-dnd-do-ask-action (uri) | 3187 (defun dired-dnd-do-ask-action (uri) |
| 3190 ;; No need to get actions and descriptions from the source, | 3188 ;; No need to get actions and descriptions from the source, |
| 3191 ;; we only have three actions anyway. | 3189 ;; we only have three actions anyway. |