Bug: minor issue with C-c C-c on babel block [7.4 (release_7.4.25.geb0d)]

[Tomas Hlavaty <tom@logand.com>]

Hi all,

If I move cursor to <<allinone>> line in the Balance section and press
C-c C-c, an extra empty line is appended behind the result.  By pressing
C-c C-c multiple times, multiple empty lines are inserted.

Only seems to be an issue with the <<>> label, C-c C-c on the first
babel block does behave fine, i.e. it doesn't insert extra new lines.

The org file is at the end of this email.

Thank you,

Tomas


Remember to cover the basics, that is, what you expected to happen and
what in fact did happen.  You don't know how to make a good report?  See

     http://orgmode.org/manual/Feedback.html#Feedback

Your bug report will be posted to the Org-mode mailing list.
------------------------------------------------------------------------

Emacs  : GNU Emacs 23.1.50.1 (x86_64-pc-linux-gnu, GTK+ Version 2.18.0)
 of 2009-09-27 on crested, modified by Debian
Package: Org-mode version 7.4 (release_7.4.25.geb0d)

current state:
==============
(setq
 org-log-done t
 org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-vars)
 org-speed-command-hook '(org-speed-command-default-hook org-babel-speed-command-hook)
 org-agenda-files ...
 org-babel-load-languages '((ledger . t))
 org-metaup-hook '(org-babel-load-in-session-maybe)
 org-after-todo-state-change-hook '(org-clock-out-if-current)
 org-export-blocks-postblock-hook '(org-exp-res/src-name-cleanup)
 org-export-html-title-format ""
 org-publish-use-timestamps-flag nil
 org-export-latex-format-toc-function 'org-export-latex-format-toc-default
 org-tab-first-hook '(org-hide-block-toggle-maybe org-src-native-tab-command-maybe
                      org-babel-hide-result-toggle-maybe)
 org-src-mode-hook '(org-src-babel-configure-edit-buffer
                     org-src-mode-configure-edit-buffer)
 org-confirm-shell-link-function 'yes-or-no-p
 org-export-first-hook '(org-beamer-initialize-open-trackers)
 org-agenda-before-write-hook '(org-agenda-add-entry-text)
 org-default-notes-file "~/org/notes.org"
 org-export-docbook-xslt-proc-command "xsltproc -o '%s' '%s'"
 org-export-html-toplevel-hlevel 1
 org-babel-pre-tangle-hook '(save-buffer)
 org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-drawers
                  org-cycle-show-empty-lines
                  org-optimize-window-after-visibility-change)
 org-publish-project-alist ...
 org-export-preprocess-before-normalizing-links-hook '(org-remove-file-link-modifiers)
 org-mode-hook '((lambda nil
                  (org-add-hook (quote change-major-mode-hook)
                   (quote org-show-block-all) (quote append) (quote local))
                  )
                 #[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-return-follows-link t
 org-confirm-elisp-link-function 'yes-or-no-p
 org-export-interblocks '((lob org-babel-exp-lob-one-liners)
                          (src org-babel-exp-inline-src-blocks))
 org-occur-hook '(org-first-headline-recenter)
 org-export-preprocess-before-selecting-backend-code-hook '(org-beamer-select-beamer-code)
 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-metadown-hook '(org-babel-pop-to-session-maybe)
 org-export-blocks '((src org-babel-exp-src-blocks nil)
                     (comment org-export-blocks-format-comment t)
                     (ditaa org-export-blocks-format-ditaa nil)
                     (dot org-export-blocks-format-dot nil))
 )

=== the org file starts here

#+options: creator:nil author:nil

minor issue with C-c C-c on babel block

* Bug

If I move cursor to =<<allinone>>= line in the Balance section and
press =C-c C-c=, an extra empty line is appended behind the result.
By pressing =C-c C-c= multiple times, multiple empty lines are
inserted.

* Summary

#+srcname: allinone
#+begin_src ledger :exports results
2010/01/01 * Starting balance
  assets:bank:savings  £1300.00
  income:starting balances
2010/07/22 * Got paid
  assets:bank:chequing  £1000.00
  income:salary
2010/07/23 Rent
  expenses:rent  £500.00
  assets:bank:chequing
2010/07/24 Food
  expenses:food  £150.00
  assets:bank:chequing
2010/07/31 * Interest on bank savings
  assets:bank:savings  £3.53
  income:interest
2010/07/31 * Transfer savings
  assets:bank:savings  £250.00
  assets:bank:chequing
2010/08/01 got paid again
  assets:bank:chequing  £1000.00
  income:salary
#+end_src
#+results: allinone
:            £2653.53  assets
:             £650.00  expenses
:           £-3303.53  income

* Balance

#+srcname: balance
#+begin_src ledger :cmdline -s bal :noweb yes :exports results
<<allinone>>
#+end_src
#+results: balance
#+begin_example
           £2653.53  assets:bank
           £1100.00    chequing
           £1553.53    savings
            £650.00  expenses
            £150.00    food
            £500.00    rent
          £-3303.53  income
             £-3.53    interest
          £-2000.00    salary
          £-1300.00    starting balances
#+end_example

* Monthly register

etc.