mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2025-01-29 20:35:02 +00:00
removing debugging statements from org-babel-tangle.el, and beefing up test-tangle.org
This commit is contained in:
parent
6518065f28
commit
e9c2c6a590
@ -74,7 +74,7 @@ file into their own source-specific files."
|
||||
blocks))))
|
||||
;; blocks should contain all source-blocks organized by language
|
||||
;; and session
|
||||
(message "blocks=%S" blocks) ;; debugging
|
||||
;; (message "blocks=%S" blocks) ;; debugging
|
||||
(mapc ;; for every language create a file
|
||||
(lambda (by-lang)
|
||||
(let* ((lang (car by-lang))
|
||||
|
@ -1,3 +1,6 @@
|
||||
#+TITLE: Testing Org-Babel Tangling
|
||||
#+OPTIONS: toc:2 ^:nil
|
||||
|
||||
* Some file
|
||||
|
||||
Some text here
|
||||
@ -9,6 +12,20 @@ echo "line 2"
|
||||
|
||||
more text
|
||||
|
||||
#+srcname: ruby-no-session
|
||||
#+begin_src ruby
|
||||
def hello
|
||||
puts "hello world"
|
||||
end
|
||||
#+end_src
|
||||
|
||||
|
||||
#+srcname: first-ruby-block
|
||||
#+begin_src ruby :session special
|
||||
:block_the_first
|
||||
#+end_src
|
||||
|
||||
|
||||
** Some subsection
|
||||
|
||||
#+BEGIN_SRC sh
|
||||
@ -38,3 +55,24 @@ foo foo bar baz
|
||||
echo "line 5"
|
||||
echo "line 6"
|
||||
#+END_SRC
|
||||
|
||||
|
||||
** Ruby blocks
|
||||
|
||||
#+srcname: another-ruby-block
|
||||
#+begin_src ruby :session special
|
||||
holder = 98
|
||||
#+end_src
|
||||
|
||||
|
||||
#+srcname: ruby-plus-2
|
||||
#+begin_src ruby :session special
|
||||
def plus_two(n)
|
||||
n + 2
|
||||
end
|
||||
#+end_src
|
||||
|
||||
#+srcname: final-ruby
|
||||
#+begin_src ruby :session special
|
||||
plus_two(holder)
|
||||
#+end_src
|
||||
|
Loading…
Reference in New Issue
Block a user