[O] Bug: org-babel inserts a spurious comma

[Elias Pipping]

Hi,

please consider the following file:

<<SNIP
#+begin_src c++
  int
  main()
  {
    f(a,
      *b);
  }
#+end_src
<<SNAP

Calling `org-edit-src-code' on the code block shows it as follows:

<<SNIP
int
main()
{
  f(a,
    *b);
}
<<SNAP

Exiting that mode again (through `org-edit-src-exit`) changes the file
into

<<SNIP
#+begin_src c++
  int
  main()
  {
    f(a,
      ,*b);
  }
#+end_src
<<SNAP

Note how there's now a comma that shouldn't be there. That comma is
never displayed in the mode that is entered through `org-edit-src-code`,
though.

This didn't happen with org-7.9.1.


Regards,

Elias Pipping


Emacs  : GNU Emacs 24.2.1 (x86_64-pc-linux-gnu)
 of 2012-09-04 on bogus
Package: Org-mode version git-869e0fa73d074459a75ed6072899572c045f7930
 of 2012-11-01

current state:
==============
(setq
 org-export-preprocess-before-selecting-backend-code-hook 
'(org-beamer-select-beamer-code)
 org-tab-first-hook '(org-hide-block-toggle-maybe 
org-src-native-tab-command-maybe
                      org-babel-hide-result-toggle-maybe 
org-babel-header-arg-expand)
 org-speed-command-hook '(org-speed-command-default-hook 
org-babel-speed-command-hook)
 org-occur-hook '(org-first-headline-recenter)
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-export-preprocess-before-normalizing-links-hook 
'(org-remove-file-link-modifiers)
 org-confirm-shell-link-function 'yes-or-no-p
 org-export-latex-final-hook '(org-beamer-amend-header org-beamer-fix-toc
                               org-beamer-auto-fragile-frames
                               org-beamer-place-default-actions-for-lists)
 org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
                     org-src-mode-configure-edit-buffer)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-babel-pre-tangle-hook '(save-buffer)
 org-mode-hook '(#[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook org-show-block-all 
append
                    local]
                   5]
                 #[nil "\300\301\302\303\304$\207"
                   [org-add-hook change-major-mode-hook 
org-babel-show-result-all
                    append local]
                   5]
                 org-babel-result-hide-spec org-babel-hide-all-hashes)
 org-ctrl-c-ctrl-c-hook '(org-babel-hash-at-point 
org-babel-execute-safely-maybe)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
                  org-cycle-hide-inline-tasks org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-export-latex-format-toc-function 'org-export-latex-format-toc-default
 org-export-first-hook '(org-beamer-initialize-open-trackers)
 org-confirm-elisp-link-function 'yes-or-no-p
 org-metadown-hook '(org-babel-pop-to-session-maybe)
 org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
 )