blob 9a33661bec7aa45879af0a3eab142ca7310237c8 3236 bytes (raw)
name: testing/examples/header_test.org # note: path name is non-authoritative(*)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
| | #+TITLE: Header tests
#+PROPERTY: header-args :tangle /tmp/default_tangle.txt
The text contents in each block are tested against the output of
=(assoc <prop> (nth 2 (org-babel-get-src-block-info)))=
Multiple header properties can be tested by separating each property
output with a **newline followed by exactly two spaces**.
* Inherit tangle header from document
:PROPERTIES:
:ID: a41c3238-f457-4769-b10b-8d50e9d386a1
:END:
#+begin_src conf
(:tangle . /tmp/default_tangle.txt)
#+end_src
* Inherit tangle header but use local sync action
:PROPERTIES:
:ID: debf7bf8-e5eb-412d-9127-57950a27c390
:END:
#+begin_src conf :tangle skip
(:tangle . /tmp/default_tangle.txt skip)
#+end_src
* Use local tangle file and sync action
:PROPERTIES:
:ID: 1ca658c1-0dfd-42a5-bbe3-305582deeb00
:END:
+ Ignore document header completely.
#+begin_src conf :tangle randomfile sync
(:tangle . randomfile sync)
#+end_src
* Use local tangle file and sync action 2
:PROPERTIES:
:header-args: :tangle "newfile.txt" import
:END:
** Subheading
:PROPERTIES:
:ID: 602503b8-6657-49c6-9cac-7edac396f725
:END:
+ Ignore document header and parent header completely.
#+begin_src conf :tangle randomfile sync
(:tangle . randomfile sync)
#+end_src
* Test tangle and results param together
:PROPERTIES:
:ID: 4fb9938c-aec0-479f-bbc6-6b7a4228d9c2
:END:
#+begin_src conf :tangle randomfile
(:tangle . randomfile)
(:results . replace)
#+end_src
* Inherit the tangle file name, take the last sync action
:PROPERTIES:
:ID: 7a98b56d-e59f-426d-bd58-f93bb22cf57b
:END:
+ Ignores import
#+begin_src conf :tangle import export
(:tangle . /tmp/default_tangle.txt export)
#+end_src
* Take the last local tangle file name and the last sync action
:PROPERTIES:
:ID: cd85e03a-1a4c-45d5-ac33-90d96999b665
:END:
+ Ignores fname1 and sync
#+begin_src conf :tangle fname1 fname2 sync export
(:tangle . fname2 export)
#+end_src
* Merge document results param and local results param
:PROPERTIES:
:ID: f4e4e422-029b-4ef7-b594-cd70cff2d943
:END:
#+begin_src sh :results file wrap
(:results . wrap file replace)
(:exports . code)
#+end_src
* All tangle headers should be ignored (ITS FAILING HERE)
:PROPERTIES:
:ID: 9715d355-009c-4188-8b97-bcbebaeee86f
:END:
#+begin_src conf :tangle no
(:tangle . no)
#+end_src
* Tangle filename ignores document and heading args, inherits heading exports
:PROPERTIES:
:ID: 1a3b5565-27b5-450e-a2c5-7f95a8142f3b
:header-args: :tangle no :exports verbatim
:END:
#+begin_src conf :tangle "foo.txt" :comments link
(:tangle . foo.txt)
(:exports . verbatim code)
(:comments . link)
#+end_src
* Heading tangle parameter is not overwritten by local "yes"
:PROPERTIES:
:ID: fe54b2be-d9f1-40b4-83df-49501e69d083
:header-args: :tangle "foo.txt"
:END:
#+begin_src :tangle yes
(:tangle . foo.txt)
#+end_src
** Local tangle filename with spaces overwrites parent foo.txt
:PROPERTIES:
:ID: ab8af294-c586-4ec8-9f45-3c3baaeb184d
:END:
+ The expected hierarchy is =/tmp/default_tangle.txt= is supplanted by
=foo.txt= which is supplanted by =file with spaces.txt=
#+begin_src :tangle "file with spaces.txt"
(:tangle . "file with spaces.txt")
#+end_src
|
debug log:
solving 9a33661be ...
found 9a33661be in https://yhetil.org/orgmode/87a5y3vzpe.fsf@gmail.com/
applying [1/1] https://yhetil.org/orgmode/87a5y3vzpe.fsf@gmail.com/
diff --git a/testing/examples/header_test.org b/testing/examples/header_test.org
new file mode 100644
index 000000000..9a33661be
Checking patch testing/examples/header_test.org...
Applied patch testing/examples/header_test.org cleanly.
index at:
100644 9a33661bec7aa45879af0a3eab142ca7310237c8 testing/examples/header_test.org
(*) Git path names are given by the tree(s) the blob belongs to.
Blobs themselves have no identifier aside from the hash of its contents.^
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).