changeset 42594:ec991a12a82f

(dired-copy-filename-as-kill): Call kill-append if following a kill command.
author Richard M. Stallman <rms@gnu.org>
date Mon, 07 Jan 2002 05:31:19 +0000
parents dbb64f2b3684
children da855c217292
files lisp/dired.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/dired.el	Mon Jan 07 05:20:57 2002 +0000
+++ b/lisp/dired.el	Mon Jan 07 05:31:19 2002 +0000
@@ -1615,7 +1615,9 @@
                                    (dired-get-marked-files t)))
                           (dired-get-marked-files 'no-dir))
                         " "))))
-    (kill-new string)
+    (if (eq last-command 'kill-region)
+	(kill-append string nil)
+      (kill-new string))
     (message "%s" string)))