diff options
| author | Paul Eggert | 2016-04-30 17:50:17 -0700 |
|---|---|---|
| committer | Paul Eggert | 2016-04-30 17:51:29 -0700 |
| commit | 4d9e34e02c11b05b075ada241ef93f458f486fe5 (patch) | |
| tree | 4c3311655703339f108dabde86c9c858a54f1388 | |
| parent | 2b4c099822811ede787fc6e575bfbb17b3cc0681 (diff) | |
| download | emacs-4d9e34e02c11b05b075ada241ef93f458f486fe5.tar.gz emacs-4d9e34e02c11b05b075ada241ef93f458f486fe5.zip | |
Fix the buffer-count patch (Bug#23394)
* src/buffer.c (Fgenerate_new_buffer_name): Increment count just
once each time through the loop. Reported by Lars Ingebrigtsen in:
http://lists.gnu.org/archive/html/emacs-devel/2016-04/msg00918.html
| -rw-r--r-- | src/buffer.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/buffer.c b/src/buffer.c index 06467d2cdc4..55a16b237e5 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -1073,11 +1073,11 @@ is first appended to NAME, to speed up finding a non-existent buffer. */) | |||
| 1073 | return genbase; | 1073 | return genbase; |
| 1074 | } | 1074 | } |
| 1075 | 1075 | ||
| 1076 | for (ptrdiff_t count = 1; ; count++) | 1076 | for (ptrdiff_t count = 2; ; count++) |
| 1077 | { | 1077 | { |
| 1078 | char number[INT_BUFSIZE_BOUND (ptrdiff_t) + sizeof "<>"]; | 1078 | char number[INT_BUFSIZE_BOUND (ptrdiff_t) + sizeof "<>"]; |
| 1079 | AUTO_STRING_WITH_LEN (lnumber, number, | 1079 | AUTO_STRING_WITH_LEN (lnumber, number, |
| 1080 | sprintf (number, "<%"pD"d>", ++count)); | 1080 | sprintf (number, "<%"pD"d>", count)); |
| 1081 | Lisp_Object gentemp = concat2 (genbase, lnumber); | 1081 | Lisp_Object gentemp = concat2 (genbase, lnumber); |
| 1082 | if (!NILP (Fstring_equal (gentemp, ignore)) | 1082 | if (!NILP (Fstring_equal (gentemp, ignore)) |
| 1083 | || NILP (Fget_buffer (gentemp))) | 1083 | || NILP (Fget_buffer (gentemp))) |