013-04-07 Michael Berg <mike@berg-net.us>

        * do_cut_text - Fix copying (not cutting) text setting Modified state.  Fixes
          issue reported by Benno Schulenberg.

git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@4573 35c25a1d-7b9e-4130-9fde-d3aeb78583b8

diff --git a/ChangeLog b/ChangeLog
index 97aafe6ff27a03791728d38e9037134b0055773e..10d88a3cdd35c93ebc5aaf9e6410fc51ea403e3a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2013-04-07 Michael Berg <mike@berg-net.us>
+       * do_cut_text - Fix copying (not cutting) text setting Modified state.  Fixes
+         issue reported by Benno Schulenberg.
+
 GNU nano 2.3.2 - 2011.03.23
 2013-03-17 Chris Allegretta <chrisa@asty.org>
         * Revert r4547 as we should have a new release and the overlap code is not yet

diff --git a/src/cut.c b/src/cut.c
index d9a60837d2c3890ad16b1f1101c025da3fbc3fdb..60a1533a3c5554e2206f9db938eab8be8c13c32f 100644 (file)
--- a/src/cut.c
+++ b/src/cut.c
@@ -209,7 +209,9 @@ void do_cut_text(
 #endif
        /* Leave the text in the cutbuffer, and mark the file as
         * modified. */
-       set_modified();
+  if (!copy_text) {
+         set_modified();
+  }
 
     /* Update the screen. */
     edit_refresh_needed = TRUE;