[O] org-babel-demarcate-block should preserve case of block declaration

[Alexander Baier]

Hello,

consider the following code block with point at X:

#+BEGIN_SRC emacs-lisp
  (defun test () nil)
X
  (defun another-test () nil)
#+END_SRC

Calling org-babel-demarcate-block (C-c C-v C-d normally) will produce
the following:

#+BEGIN_SRC emacs-lisp
  (defun test () nil)
#+end_src
X
#+begin_src emacs-lisp
  (defun another-test () nil)
#+END_SRC

I, however, would expect to see this:

#+BEGIN_SRC emacs-lisp
  (defun test () nil)
#+END_SRC
X
#+BEGIN_SRC emacs-lisp
  (defun another-test () nil)
#+END_SRC

Thus preserving the case of BEGIN/END_SRC. Is there any reason this is
always in lower case?

Org-mode version 8.2.6 (release_8.2.6 @
/home/delexi/.emacs.d/ext/org-mode/lisp/)

Regards,
-- 
Alexander Baier