* bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <20120624215241.GA6205@c3po.home>
@ 2012-06-25 11:35 ` Toby Cubitt
0 siblings, 0 replies; 15+ messages in thread
From: Toby Cubitt @ 2012-06-25 11:35 UTC (permalink / raw)
To: Bastien; +Cc: 11774
On Sun, Jun 24, 2012 at 11:52:41PM +0200, Toby Cubitt wrote:
> On Sun, Jun 24, 2012 at 11:39:08PM +0200, Bastien wrote:
> > Hi Toby,
> >
> > Toby Cubitt <tsc25@cantab.net> writes:
> >
> > > For some unknown reason, org-mode is causing the undo boundary between
> > > the (2 . 4) and (1 . 2) entries to be removed from `buffer-undo-list'.
> >
> > Can you try again with
> >
> > (setq org-self-insert-cluster-for-undo nil)
> >
> > and report?
>
> Yup, that fixes the problem.
>
> I don't fully understand the purpose of
> `org-self-insert-cluster-for-undo', given that the Emacs command loop
> already groups consecutive undo entries together, but presumably it
> enables a more aggressive form of clustering.
>
[snip]
>
> I could try to work around this in undo-tree-mode, but it seems to me
> that org-mode shouldn't be throwing away an undo boundary that comes
> before an entry which definitely shouldn't be clustered with anything
> (namely the undo-tree-canary symbol, which is meaningless to org-mode).
I've now added a work-around for this in undo-tree-mode (currently only
in git, but I'll push to ELPA once it's sufficiently tested).
I'm still not entirely convinced that the boundary discarding logic in
org-self-insert-command is correct. For example, if I do the following:
1. Type some text at some location in an org-mode buffer
2. Move to another location very far away
(without invoking any commands other than point motion)
3. Type some more text
then org-self-insert-cluster-for-undo collapses the undo changesets for
these two changes into one. Undoing then reverts both sets of changes at
once, even though those changes might be so far apart that they aren't
both visible at the same time in the buffer.
That seems very undesirable to me.
But as I can work around it in undo-tree-mode, I'll leave it up to
Bastien to decide whether or not this feature needs reworking in
org-mode.
Best,
Toby
--
Dr T. S. Cubitt
Mathematics and Quantum Information group
Department of Mathematics
Complutense University
Madrid, Spain
email: tsc25@cantab.net
web: www.dr-qubit.org
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <20120625113529.GA15913@c3po.home>
@ 2012-07-02 6:51 ` Martin Pohlack
2012-07-03 18:33 ` Martin Pohlack
1 sibling, 0 replies; 15+ messages in thread
From: Martin Pohlack @ 2012-07-02 6:51 UTC (permalink / raw)
To: Toby Cubitt; +Cc: Bastien, 11774
Hi Toby,
On 25.06.2012 13:35, Toby Cubitt wrote:
> On Sun, Jun 24, 2012 at 11:52:41PM +0200, Toby Cubitt wrote:
>> On Sun, Jun 24, 2012 at 11:39:08PM +0200, Bastien wrote:
>>> Hi Toby,
>>>
>>> Toby Cubitt <tsc25@cantab.net> writes:
>>>
>>>> For some unknown reason, org-mode is causing the undo boundary between
>>>> the (2 . 4) and (1 . 2) entries to be removed from `buffer-undo-list'.
>>>
>>> Can you try again with
>>>
>>> (setq org-self-insert-cluster-for-undo nil)
>>>
>>> and report?
>>
>> Yup, that fixes the problem.
>>
>> I don't fully understand the purpose of
>> `org-self-insert-cluster-for-undo', given that the Emacs command loop
>> already groups consecutive undo entries together, but presumably it
>> enables a more aggressive form of clustering.
>>
> [snip]
>>
>> I could try to work around this in undo-tree-mode, but it seems to me
>> that org-mode shouldn't be throwing away an undo boundary that comes
>> before an entry which definitely shouldn't be clustered with anything
>> (namely the undo-tree-canary symbol, which is meaningless to org-mode).
>
> I've now added a work-around for this in undo-tree-mode (currently only
> in git, but I'll push to ELPA once it's sufficiently tested).
>
> I'm still not entirely convinced that the boundary discarding logic in
> org-self-insert-command is correct. For example, if I do the following:
>
> 1. Type some text at some location in an org-mode buffer
> 2. Move to another location very far away
> (without invoking any commands other than point motion)
> 3. Type some more text
>
> then org-self-insert-cluster-for-undo collapses the undo changesets for
> these two changes into one. Undoing then reverts both sets of changes at
> once, even though those changes might be so far apart that they aren't
> both visible at the same time in the buffer.
>
> That seems very undesirable to me.
Having been involved in org-mode's collapsing code I am interested in
this, but I cannot reproduce your problem. I used a very large org-mode
file, inserted some text, moved down some pages and inserted some text
again (3 chars each). Undoing was split between both parts, exactly as
desired. Could you provide more details please?
Thanks,
Martin
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <4FF14504.10609@os.inf.tu-dresden.de>
@ 2012-07-03 9:57 ` Toby Cubitt
0 siblings, 0 replies; 15+ messages in thread
From: Toby Cubitt @ 2012-07-03 9:57 UTC (permalink / raw)
To: Martin Pohlack; +Cc: Bastien, 11774
On Mon, Jul 02, 2012 at 08:51:48AM +0200, Martin Pohlack wrote:
> > I'm still not entirely convinced that the boundary discarding logic in
> > org-self-insert-command is correct. For example, if I do the following:
> >
> > 1. Type some text at some location in an org-mode buffer
> > 2. Move to another location very far away
> > (without invoking any commands other than point motion)
> > 3. Type some more text
> >
> > then org-self-insert-cluster-for-undo collapses the undo changesets for
> > these two changes into one. Undoing then reverts both sets of changes at
> > once, even though those changes might be so far apart that they aren't
> > both visible at the same time in the buffer.
> >
> > That seems very undesirable to me.
>
> Having been involved in org-mode's collapsing code I am interested in
> this, but I cannot reproduce your problem. I used a very large org-mode
> file, inserted some text, moved down some pages and inserted some text
> again (3 chars each). Undoing was split between both parts, exactly as
> desired. Could you provide more details please?
Sure. The following steps produce the effect I described, at least for
me. This is on a fairly recent (a couple of weeks old) bzr build of
Emacs, and a similarly recent git build of org-mode:
1. $ emacs -Q
2. C-x C-f test.org
3. M-x org-mode [not really necessary since already in org-mode]
5. C-u 50 M-x newline
6. M-<
7. type "a"
8. M->
9. type "bc"
buffer-undo-list now contains:
(nil (52 . 54) (1 . 2) nil (1 . 51) (t . -1))
Note the lack of undo boundary between (52 . 54) and (1 . 2), which means
that undoing once (C-/) deletes both "bc" *and* "a" in one step.
HTH,
Toby
--
Dr T. S. Cubitt
Mathematics and Quantum Information group
Department of Mathematics
Complutense University
Madrid, Spain
email: tsc25@cantab.net
web: www.dr-qubit.org
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] <20120703095729.GA6651@c3po>
@ 2012-07-03 15:18 ` Martin Pohlack
[not found] ` <4FF30D50.8010009@os.inf.tu-dresden.de>
1 sibling, 0 replies; 15+ messages in thread
From: Martin Pohlack @ 2012-07-03 15:18 UTC (permalink / raw)
To: Toby Cubitt; +Cc: Bastien, 11774
On 03.07.2012 11:57, Toby Cubitt wrote:
> On Mon, Jul 02, 2012 at 08:51:48AM +0200, Martin Pohlack wrote:
>>> I'm still not entirely convinced that the boundary discarding logic in
>>> org-self-insert-command is correct. For example, if I do the following:
>>>
>>> 1. Type some text at some location in an org-mode buffer
>>> 2. Move to another location very far away
>>> (without invoking any commands other than point motion)
>>> 3. Type some more text
>>>
>>> then org-self-insert-cluster-for-undo collapses the undo changesets for
>>> these two changes into one. Undoing then reverts both sets of changes at
>>> once, even though those changes might be so far apart that they aren't
>>> both visible at the same time in the buffer.
>>>
>>> That seems very undesirable to me.
>>
>> Having been involved in org-mode's collapsing code I am interested in
>> this, but I cannot reproduce your problem. I used a very large org-mode
>> file, inserted some text, moved down some pages and inserted some text
>> again (3 chars each). Undoing was split between both parts, exactly as
>> desired. Could you provide more details please?
>
>
> Sure. The following steps produce the effect I described, at least for
> me. This is on a fairly recent (a couple of weeks old) bzr build of
> Emacs, and a similarly recent git build of org-mode:
>
> 1. $ emacs -Q
> 2. C-x C-f test.org
> 3. M-x org-mode [not really necessary since already in org-mode]
> 5. C-u 50 M-x newline
> 6. M-<
> 7. type "a"
> 8. M->
> 9. type "bc"
>
> buffer-undo-list now contains:
>
> (nil (52 . 54) (1 . 2) nil (1 . 51) (t . -1))
>
> Note the lack of undo boundary between (52 . 54) and (1 . 2), which means
> that undoing once (C-/) deletes both "bc" *and* "a" in one step.
Understood. I tried exactly the same thing with an older emacs (GNU
Emacs 23.2.1 (x86_64-pc-linux-gnu, GTK+ Version 2.24.4) of 2011-04-04 on
crested, modified by Debian) and org-mode (6.33x and 7.6) and have this
result:
(nil (53 . 54) (52 . 53) nil (1 . 2) nil (1 . 51) (t 65535 . 65535))
Which is what one wants. Someone seems to be merging the self-insert
commands in your situation. Probably the native merging code has
changed in recent emacs itself.
If this is confirmed, we could modify org-mode's merging code to only
merge undo entries that span one character.
Martin
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <4FF30D50.8010009@os.inf.tu-dresden.de>
@ 2012-07-03 17:29 ` Stefan Monnier
2012-07-03 18:13 ` bug#11774: " Samuel Wales
[not found] ` <CAJcAo8t4wj-8mje2=QEKY275QXyxwkotBCftZmOVQZAsMAt7Hg@mail.gmail.com>
0 siblings, 2 replies; 15+ messages in thread
From: Stefan Monnier @ 2012-07-03 17:29 UTC (permalink / raw)
To: Martin Pohlack; +Cc: Bastien, Toby Cubitt, 11774
> Which is what one wants. Someone seems to be merging the self-insert
> commands in your situation. Probably the native merging code has
> changed in recent Emacs itself.
Indeed, self-insert-command used to be treated specially by the
read-eval-loop and the merging was performed there. Now this command is
handled like any other, and self-insert-command does the merging itself.
In most cases the result is the same, but the behavior is not quite
identical in the details.
Stefan
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: bug#11774: org-mode causes undo boundaries to be lost
2012-07-03 17:29 ` Stefan Monnier
@ 2012-07-03 18:13 ` Samuel Wales
[not found] ` <CAJcAo8t4wj-8mje2=QEKY275QXyxwkotBCftZmOVQZAsMAt7Hg@mail.gmail.com>
1 sibling, 0 replies; 15+ messages in thread
From: Samuel Wales @ 2012-07-03 18:13 UTC (permalink / raw)
To: Stefan Monnier; +Cc: Bastien, Martin Pohlack, Toby Cubitt, 11774
On 7/3/12, Stefan Monnier <monnier@iro.umontreal.ca> wrote:
> Indeed, self-insert-command used to be treated specially by the
> read-eval-loop and the merging was performed there. Now this command is
> handled like any other, and self-insert-command does the merging itself.
> In most cases the result is the same, but the behavior is not quite
> identical in the details.
Here is the way I understand it:
There are two problems with self-insert-command now, while before
there was only one.
The first is that it hardcodes the clustering by 20. As it happens, I
strongly prefer clustering by 1. That is, I do not want undo to jump
around or type more than necessary. I just want to autorepeat undo
(C-/) until I get to where I need to be. Otherwise it is far too
jerky and unpredictable and you have to type more either to delete (if
you didn't undo far back enough) or add (if you undid too far).
This was possible to work around before Emacs 24. You could advise
self-insert-command or wrap it. This is why Org was able to control
this with a variable to support clustering or not clustering.
What is new in Emacs is that self-insert-command now destroys
undo-boundary. If you wrap it, it destroys all of your effort on the
next call to it. This causes subtle issues such as Org and undo-tree
are dealing with.
It is not reasonable to work around this because of the extra
functionality you need to implement (especially if you want Org to do
speed commands, table operations, and tag padding, which, who
doesn't?).
Unlike before, changing a hardcoded number or undo-boundary and then
recompiling Emacs is necessary if you want to fix it. :(
The loss of this ability to configure the cluster amount, and the
subtle bug introduced, IMO merit a reversion or a fix to Emacs
self-insert-command. Even just turning that magic 20 number into a
variable would help.
At least that's my understanding. I am just a user and I am not
familiar with the internals.
Samuel
--
The Kafka Pandemic: http://thekafkapandemic.blogspot.com
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <20120625113529.GA15913@c3po.home>
2012-07-02 6:51 ` Martin Pohlack
@ 2012-07-03 18:33 ` Martin Pohlack
1 sibling, 0 replies; 15+ messages in thread
From: Martin Pohlack @ 2012-07-03 18:33 UTC (permalink / raw)
To: Toby Cubitt; +Cc: Bastien, 11774
On 25.06.2012 13:35, Toby Cubitt wrote:
> On Sun, Jun 24, 2012 at 11:52:41PM +0200, Toby Cubitt wrote:
>> On Sun, Jun 24, 2012 at 11:39:08PM +0200, Bastien wrote:
>>> Hi Toby,
>>>
>>> Toby Cubitt <tsc25@cantab.net> writes:
>>>
>>>> For some unknown reason, org-mode is causing the undo boundary between
>>>> the (2 . 4) and (1 . 2) entries to be removed from `buffer-undo-list'.
>>>
>>> Can you try again with
>>>
>>> (setq org-self-insert-cluster-for-undo nil)
>>>
>>> and report?
>>
>> Yup, that fixes the problem.
>>
>> I don't fully understand the purpose of
>> `org-self-insert-cluster-for-undo', given that the Emacs command loop
>> already groups consecutive undo entries together, but presumably it
>> enables a more aggressive form of clustering.
Just to clarify this little piece here: I originally introduces this
clustering code to mimic emacs' behavior in text mode. Org-mode's
aggressive interception seemed to prevent that and undoing in org-mode
felt unnatural compared to vanilla text mode. It was never meant to be
*more* aggressive than emacs' original behavior.
The grouping did not happen at the time. The original thread is here:
http://lists.gnu.org/archive/html/emacs-orgmode/2009-02/msg00691.html
Martin
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <CAJcAo8t4wj-8mje2=QEKY275QXyxwkotBCftZmOVQZAsMAt7Hg@mail.gmail.com>
@ 2012-07-03 22:57 ` Stefan Monnier
[not found] ` <jwvfw984ftk.fsf-monnier+emacs@gnu.org>
1 sibling, 0 replies; 15+ messages in thread
From: Stefan Monnier @ 2012-07-03 22:57 UTC (permalink / raw)
To: Samuel Wales; +Cc: Bastien, Martin Pohlack, Toby Cubitt, 11774
> The first is that it hardcodes the clustering by 20.
I guess that's the problem which is not new.
> This was possible to work around before Emacs 24. You could advise
> self-insert-command or wrap it. This is why Org was able to control
> this with a variable to support clustering or not clustering.
IIUC Org's clustering was only introduced because self-insert-command's
clustering only worked when it was handled by the read-eval-loop, so it
was not done to "avoid" the clustering, but to make it work in more
cases. So it might be unneeded in Emacs-24.
> What is new in Emacs is that self-insert-command now destroys
> undo-boundary. If you wrap it, it destroys all of your effort on the
> next call to it.
I don't have it fresh in my memory but if you can post some sample code
showing what you're doing, and how self-insert-command's behavior makes
it difficult, maybe we can make it work better.
> self-insert-command. Even just turning that magic 20 number into a
> variable would help.
Providing it as a variable would be very easy, indeed.
Stefan
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <jwvfw984ftk.fsf-monnier+emacs@gnu.org>
@ 2012-07-04 0:18 ` Samuel Wales
[not found] ` <CAJcAo8ujDHZU2xiPh8hnaXgO1m_-cf2tcA6B_LWj-3YczJRzAA@mail.gmail.com>
1 sibling, 0 replies; 15+ messages in thread
From: Samuel Wales @ 2012-07-04 0:18 UTC (permalink / raw)
To: Stefan Monnier; +Cc: Bastien, Martin Pohlack, Toby Cubitt, 11774
On 7/3/12, Stefan Monnier <monnier@iro.umontreal.ca> wrote:
>> self-insert-command. Even just turning that magic 20 number into a
>> variable would help.
>
> Providing it as a variable would be very easy, indeed.
Hi Stefan,
To clarify, that is actually the only thing that I need as a user for
self-insert-command. It would make an enormous difference in my
use of Emacs. Huge.
So I don't need undo-boundary to work in any particular way -- IF
I have the ability to cluster self-insert-command by 1 instead of that
hardcoded 20 throughout Emacs (including Org of course).
My need for undo-boundary to work the way it did
before is only so that I could call undo-boundary
after every invocation of self-insert-command.
Therefore, IF we have that variable, then undo-boundary considerations
should be simply to DTRT for undo-tree, org-self-insert-command,
and other code, in such a way that subtle bugs are prevented.
Maybe the user should be able to set undo boundaries and
have them work after self-insert-command? Dunno, I'm
not familiar with internals enough to opine.
Hope that clarifies. I will follow the discussion as long as I'm
CC'ed as I am now.
Thanks.
Samuel
--
The Kafka Pandemic: http://thekafkapandemic.blogspot.com
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <CAJcAo8ujDHZU2xiPh8hnaXgO1m_-cf2tcA6B_LWj-3YczJRzAA@mail.gmail.com>
@ 2012-07-04 0:24 ` Samuel Wales
2012-07-04 9:40 ` Toby Cubitt
2012-07-18 13:21 ` Stefan Monnier
2 siblings, 0 replies; 15+ messages in thread
From: Samuel Wales @ 2012-07-04 0:24 UTC (permalink / raw)
To: Stefan Monnier; +Cc: Bastien, Martin Pohlack, Toby Cubitt, 11774
On 7/3/12, Samuel Wales <samologist@gmail.com> wrote:
> My need for undo-boundary to work the way it did
That should read, "My need for self-insert-command to work
the way it did".
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <CAJcAo8ujDHZU2xiPh8hnaXgO1m_-cf2tcA6B_LWj-3YczJRzAA@mail.gmail.com>
2012-07-04 0:24 ` bug#11774: " Samuel Wales
@ 2012-07-04 9:40 ` Toby Cubitt
2012-07-18 13:21 ` Stefan Monnier
2 siblings, 0 replies; 15+ messages in thread
From: Toby Cubitt @ 2012-07-04 9:40 UTC (permalink / raw)
To: Samuel Wales; +Cc: Bastien, Martin Pohlack, Stefan Monnier, 11774
On Tue, Jul 03, 2012 at 05:18:50PM -0700, Samuel Wales wrote:
> On 7/3/12, Stefan Monnier <monnier@iro.umontreal.ca> wrote:
> >> self-insert-command. Even just turning that magic 20 number into a
> >> variable would help.
> >
> > Providing it as a variable would be very easy, indeed.
>
> Therefore, IF we have that variable, then undo-boundary considerations
> should be simply to DTRT for undo-tree, org-self-insert-command,
> and other code, in such a way that subtle bugs are prevented.
Just to clarify the situation with undo-tree: it doesn't care how or when
undo boundaries are inserted, and never did. The problem was only that
undo boundaries that had nothing to do with self-insert-command were
being *deleted*, due to the subtle interaction between the new Emacs-24
self-insert-command and org-mode's org-self-insert-cluster-for-undo
feature.
I've already pushed a change to the git version of undo-tree to make it
work even if something else deletes undo boundaries that it shouldn't
have touched (e.g. org-mode + Emacs-24). Deleting boundaries that have
nothing to do with self-insert-command is still a bug, in my opinion, but
it's a bug that no longer has catastrophic consequences in
undo-tree-mode.
It sounds from the preceding discussion that the right solution is simply
to disable org-self-insert-cluster-for-undo in Emacs-24, since the
purpose of org-mode's clustering was to recover the normal clustering
behaviour and the standard self-insert-command clustering now works in
org-mode with Emacs-24.
The question of how to customize the clustering granularity seems to me
to be a separate question (which can presumably be solved by making the
hard-coded 20 into a variable).
Toby
--
Dr T. S. Cubitt
Mathematics and Quantum Information group
Department of Mathematics
Complutense University
Madrid, Spain
email: tsc25@cantab.net
web: www.dr-qubit.org
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <CAJcAo8ujDHZU2xiPh8hnaXgO1m_-cf2tcA6B_LWj-3YczJRzAA@mail.gmail.com>
2012-07-04 0:24 ` bug#11774: " Samuel Wales
2012-07-04 9:40 ` Toby Cubitt
@ 2012-07-18 13:21 ` Stefan Monnier
2012-08-01 14:26 ` Bastien
[not found] ` <CAJcAo8ux9Dw5Nu6x0jm59mWFaLWFG6SSeMs9dju-Jgy5nWkUcA@mail.gmail.com>
2 siblings, 2 replies; 15+ messages in thread
From: Stefan Monnier @ 2012-07-18 13:21 UTC (permalink / raw)
To: Samuel Wales; +Cc: Bastien, 11774-done, Martin Pohlack, Toby Cubitt
>>> self-insert-command. Even just turning that magic 20 number into a
>>> variable would help.
>> Providing it as a variable would be very easy, indeed.
> Maybe the user should be able to set undo boundaries and
> have them work after self-insert-command? Dunno, I'm
> not familiar with internals enough to opine.
I installed the patch below which makes self-insert-command more careful
to only remove undo boundaries that were auto-added.
So (add-hook 'post-self-insert-hook #'undo-boundary 'append) should give you
pretty much the behavior you were looking for.
Stefan
=== modified file 'src/ChangeLog'
--- src/ChangeLog 2012-07-18 05:44:36 +0000
+++ src/ChangeLog 2012-07-18 13:17:22 +0000
@@ -1,3 +1,10 @@
+2012-07-18 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * lisp.h (last_undo_boundary): Declare new var.
+ * keyboard.c (command_loop_1): Set it.
+ * cmds.c (Fself_insert_command): Use it to only remove boundaries that
+ were auto-added by the command loop (bug#11774).
+
2012-07-18 Dmitry Antipov <dmantipov@yandex.ru>
Return more descriptive data from Fgarbage_collect.
=== modified file 'src/cmds.c'
--- src/cmds.c 2012-06-16 12:24:15 +0000
+++ src/cmds.c 2012-07-18 13:08:43 +0000
@@ -296,7 +296,10 @@
if (remove_boundary
&& CONSP (BVAR (current_buffer, undo_list))
- && NILP (XCAR (BVAR (current_buffer, undo_list))))
+ && NILP (XCAR (BVAR (current_buffer, undo_list)))
+ /* Only remove auto-added boundaries, not boundaries
+ added be explicit calls to undo-boundary. */
+ && EQ (BVAR (current_buffer, undo_list), last_undo_boundary))
/* Remove the undo_boundary that was just pushed. */
BVAR (current_buffer, undo_list) = XCDR (BVAR (current_buffer, undo_list));
=== modified file 'src/keyboard.c'
--- src/keyboard.c 2012-07-12 03:45:46 +0000
+++ src/keyboard.c 2012-07-18 13:13:31 +0000
@@ -1318,6 +1318,9 @@
}
#endif
+/* The last boundary auto-added to buffer-undo-list. */
+Lisp_Object last_undo_boundary;
+
/* FIXME: This is wrong rather than test window-system, we should call
a new set-selection, which will then dispatch to x-set-selection, or
tty-set-selection, or w32-set-selection, ... */
@@ -1565,7 +1568,13 @@
#endif
if (NILP (KVAR (current_kboard, Vprefix_arg))) /* FIXME: Why? --Stef */
+ {
+ Lisp_Object undo = BVAR (current_buffer, undo_list);
Fundo_boundary ();
+ last_undo_boundary
+ = (EQ (undo, BVAR (current_buffer, undo_list))
+ ? Qnil : BVAR (current_buffer, undo_list));
+ }
Fcommand_execute (Vthis_command, Qnil, Qnil, Qnil);
#ifdef HAVE_WINDOW_SYSTEM
=== modified file 'src/lisp.h'
--- src/lisp.h 2012-07-18 05:44:36 +0000
+++ src/lisp.h 2012-07-18 13:05:33 +0000
@@ -2921,7 +2921,7 @@
extern void syms_of_search (void);
extern void clear_regexp_cache (void);
-/* Defined in minibuf.c */
+/* Defined in minibuf.c. */
extern Lisp_Object Qcompletion_ignore_case;
extern Lisp_Object Vminibuffer_list;
@@ -2930,25 +2930,25 @@
extern void init_minibuf_once (void);
extern void syms_of_minibuf (void);
-/* Defined in callint.c */
+/* Defined in callint.c. */
extern Lisp_Object Qminus, Qplus;
extern Lisp_Object Qwhen;
extern Lisp_Object Qcall_interactively, Qmouse_leave_buffer_hook;
extern void syms_of_callint (void);
-/* Defined in casefiddle.c */
+/* Defined in casefiddle.c. */
extern Lisp_Object Qidentity;
extern void syms_of_casefiddle (void);
extern void keys_of_casefiddle (void);
-/* Defined in casetab.c */
+/* Defined in casetab.c. */
extern void init_casetab_once (void);
extern void syms_of_casetab (void);
-/* Defined in keyboard.c */
+/* Defined in keyboard.c. */
extern Lisp_Object echo_message_buffer;
extern struct kboard *echo_kboard;
@@ -2956,6 +2956,7 @@
extern Lisp_Object Qdisabled, QCfilter;
extern Lisp_Object Qup, Qdown, Qbottom;
extern Lisp_Object Qtop;
+extern Lisp_Object last_undo_boundary;
extern int input_pending;
extern Lisp_Object menu_bar_items (Lisp_Object);
extern Lisp_Object tool_bar_items (Lisp_Object, int *);
@@ -2976,13 +2977,13 @@
extern void syms_of_keyboard (void);
extern void keys_of_keyboard (void);
-/* Defined in indent.c */
+/* Defined in indent.c. */
extern ptrdiff_t current_column (void);
extern void invalidate_current_column (void);
extern int indented_beyond_p (ptrdiff_t, ptrdiff_t, EMACS_INT);
extern void syms_of_indent (void);
-/* Defined in frame.c */
+/* Defined in frame.c. */
extern Lisp_Object Qonly;
extern Lisp_Object Qvisible;
extern void store_frame_param (struct frame *, Lisp_Object, Lisp_Object);
@@ -2995,7 +2996,7 @@
extern void frames_discard_buffer (Lisp_Object);
extern void syms_of_frame (void);
-/* Defined in emacs.c */
+/* Defined in emacs.c. */
extern char **initial_argv;
extern int initial_argc;
#if defined (HAVE_X_WINDOWS) || defined (HAVE_NS)
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: bug#11774: org-mode causes undo boundaries to be lost
2012-07-18 13:21 ` Stefan Monnier
@ 2012-08-01 14:26 ` Bastien
[not found] ` <CAJcAo8ux9Dw5Nu6x0jm59mWFaLWFG6SSeMs9dju-Jgy5nWkUcA@mail.gmail.com>
1 sibling, 0 replies; 15+ messages in thread
From: Bastien @ 2012-08-01 14:26 UTC (permalink / raw)
To: 11774; +Cc: monnier
Stefan Monnier <monnier@IRO.UMontreal.CA> writes:
>>>> self-insert-command. Even just turning that magic 20 number into a
>>>> variable would help.
>>> Providing it as a variable would be very easy, indeed.
>> Maybe the user should be able to set undo boundaries and
>> have them work after self-insert-command? Dunno, I'm
>> not familiar with internals enough to opine.
>
> I installed the patch below which makes self-insert-command more careful
> to only remove undo boundaries that were auto-added.
> So (add-hook 'post-self-insert-hook #'undo-boundary 'append) should give you
> pretty much the behavior you were looking for.
On Org's side, `org-self-insert-cluster-for-undo' now defaults to nil
for Emacs >=24.1, t otherwise.
Thanks,
--
Bastien
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: bug#11774: bug#11774: org-mode causes undo boundaries to be lost
[not found] ` <CAJcAo8ux9Dw5Nu6x0jm59mWFaLWFG6SSeMs9dju-Jgy5nWkUcA@mail.gmail.com>
@ 2014-11-03 14:35 ` Stefan Monnier
0 siblings, 0 replies; 15+ messages in thread
From: Stefan Monnier @ 2014-11-03 14:35 UTC (permalink / raw)
To: Samuel Wales; +Cc: Bastien, 11774-done, Martin Pohlack, Toby Cubitt
> There is one possible bug. I have undo-boundary on self-insert-hook.
> If I do newline-and-indent, for some reason both the newline and the
> indent get undo boundaries. My expectation is that typing RET should
> only have one undo boundary.
> I don't know if that is user expectation error, but seems worth mentioning.
Maybe the issue is simply that you need to be careful to put your
undo-boundary "late" on the post-self-insert-hook (i.e. to use the
`append' argument of add-hook).
If not, then please post a new bug-report about it, so we can see
on which side it should be solved.
Stefan
^ permalink raw reply [flat|nested] 15+ messages in thread
* bug#11774: Emacs 24.3: newline-and-indent has two undo boundaries
[not found] <20120624212755.GA14501@c3po.home>
` (2 preceding siblings ...)
[not found] ` <20120625113529.GA15913@c3po.home>
@ 2014-11-03 19:25 ` Samuel Wales
3 siblings, 0 replies; 15+ messages in thread
From: Samuel Wales @ 2014-11-03 19:25 UTC (permalink / raw)
To: 11774, monnier; +Cc: Bastien, 11774-done, Martin Pohlack, Toby Cubitt
Reporting as suggested by Stefan.
In order to bunch up undos by 1 instead of the hardcoded 20, I do this:
(add-hook 'post-self-insert-hook #'undo-boundary 'append)
This or advice used to work, then around Emacs 24.1 it stopped
working. Stefan patched it in 24.3. It now works in most cases. The
history is in this Debian bug:
Re: [O] bug#11774: bug#11774: org-mode causes undo boundaries to be lost
I use undo-tree 0.6.6. The bug also occurs with it turned off.
When I press RET when it is bound to newline-and-indent, the newline
and the indentation are undone separately. I expected the RET to be
undone.
This is a minor issue for me, but might point to other cases.
Thanks.
Samuel
^ permalink raw reply [flat|nested] 15+ messages in thread
end of thread, other threads:[~2014-11-03 19:26 UTC | newest]
Thread overview: 15+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
[not found] <20120703095729.GA6651@c3po>
2012-07-03 15:18 ` bug#11774: bug#11774: org-mode causes undo boundaries to be lost Martin Pohlack
[not found] ` <4FF30D50.8010009@os.inf.tu-dresden.de>
2012-07-03 17:29 ` Stefan Monnier
2012-07-03 18:13 ` bug#11774: " Samuel Wales
[not found] ` <CAJcAo8t4wj-8mje2=QEKY275QXyxwkotBCftZmOVQZAsMAt7Hg@mail.gmail.com>
2012-07-03 22:57 ` Stefan Monnier
[not found] ` <jwvfw984ftk.fsf-monnier+emacs@gnu.org>
2012-07-04 0:18 ` Samuel Wales
[not found] ` <CAJcAo8ujDHZU2xiPh8hnaXgO1m_-cf2tcA6B_LWj-3YczJRzAA@mail.gmail.com>
2012-07-04 0:24 ` bug#11774: " Samuel Wales
2012-07-04 9:40 ` Toby Cubitt
2012-07-18 13:21 ` Stefan Monnier
2012-08-01 14:26 ` Bastien
[not found] ` <CAJcAo8ux9Dw5Nu6x0jm59mWFaLWFG6SSeMs9dju-Jgy5nWkUcA@mail.gmail.com>
2014-11-03 14:35 ` Stefan Monnier
[not found] <20120624212755.GA14501@c3po.home>
[not found] ` <20120624215241.GA6205@c3po.home>
2012-06-25 11:35 ` Toby Cubitt
[not found] ` <4FF14504.10609@os.inf.tu-dresden.de>
2012-07-03 9:57 ` bug#11774: " Toby Cubitt
[not found] ` <20120625113529.GA15913@c3po.home>
2012-07-02 6:51 ` Martin Pohlack
2012-07-03 18:33 ` Martin Pohlack
2014-11-03 19:25 ` bug#11774: Emacs 24.3: newline-and-indent has two undo boundaries Samuel Wales
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).