babel: can now tangle files without extensions
This commit is contained in:
parent
04057e2195
commit
21849af58b
|
@ -102,8 +102,9 @@ exported source code blocks by language."
|
|||
((> (length tangle) 0) tangle))
|
||||
target-file))
|
||||
(file-name (when base-name
|
||||
(if (string= base-name
|
||||
(file-name-sans-extension base-name))
|
||||
(if (and ext
|
||||
(string= base-name
|
||||
(file-name-sans-extension base-name)))
|
||||
(concat base-name "." ext) base-name))))
|
||||
;; ;; debugging
|
||||
;; (message "tangle=%S base-name=%S file-name=%S"
|
||||
|
|
Loading…
Reference in New Issue