* [babel] using tramp when tangling
@ 2010-03-17 18:39 Maurizio Vitale
2010-03-17 19:57 ` Rémi Vanicat
2010-03-17 20:06 ` Dan Davison
0 siblings, 2 replies; 4+ messages in thread
From: Maurizio Vitale @ 2010-03-17 18:39 UTC (permalink / raw)
To: emacs-orgmode
I'd find useful to use tramp syntax in the :tangle specification.
In my case it would be to specify sudo when tangling config files that
are supposed to go to areas not writable by the user running Emacs.
Something like:
#+begin_src sh :tangle /sudo::/etc/my_config_file
...
#+end_src
other people might be interested in remote access to tangle targets.
Is there a way to achieve the above?
If I try to tangle the above, I get something along the lines that
"tramp cannot append to file". Would it be possible to have org-babel to
(optionally) tangle to a buffer and then save to file in one go?
Thanks a lot for the excellent addition to org-mode.
Maurizio
^ permalink raw reply [flat|nested] 4+ messages in thread
* Re: [babel] using tramp when tangling
2010-03-17 18:39 [babel] using tramp when tangling Maurizio Vitale
@ 2010-03-17 19:57 ` Rémi Vanicat
2010-03-18 1:08 ` Dan Davison
2010-03-17 20:06 ` Dan Davison
1 sibling, 1 reply; 4+ messages in thread
From: Rémi Vanicat @ 2010-03-17 19:57 UTC (permalink / raw)
To: emacs-orgmode
Maurizio Vitale <mav@cuma.i-did-not-set--mail-host-address--so-tickle-me> writes:
> I'd find useful to use tramp syntax in the :tangle specification.
> In my case it would be to specify sudo when tangling config files that
> are supposed to go to areas not writable by the user running Emacs.
> Something like:
>
> #+begin_src sh :tangle /sudo::/etc/my_config_file
> ...
> #+end_src
>
> other people might be interested in remote access to tangle targets.
>
> Is there a way to achieve the above?
>
> If I try to tangle the above, I get something along the lines that
> "tramp cannot append to file". Would it be possible to have org-babel to
> (optionally) tangle to a buffer and then save to file in one go?
It's a bug of append-file. We could not use it: (code by Alexey Voinov,
stolen from magit):
--8<---------------cut here---------------start------------->8---
diff --git a/contrib/babel/lisp/org-babel-tangle.el b/contrib/babel/lisp/org-babel-tangle.el
index dd76195..c4ea0d8 100644
--- a/contrib/babel/lisp/org-babel-tangle.el
+++ b/contrib/babel/lisp/org-babel-tangle.el
@@ -127,7 +127,12 @@ exported source code blocks by language."
(insert (concat she-bang "\n"))
(setq she-banged (cons file-name she-banged)))
(org-babel-spec-to-string spec)
- (append-to-file nil nil file-name))
+ (let ((content (buffer-string)))
+ (with-temp-buffer
+ (insert-file-contents file-name)
+ (goto-char (point-max))
+ (insert content)
+ (write-region nil nil ignore-file))))
;; update counter
(setq block-counter (+ 1 block-counter))
(add-to-list 'path-collector file-name)))))
--8<---------------cut here---------------end--------------->8---
--
Rémi Vanicat
^ permalink raw reply related [flat|nested] 4+ messages in thread
* Re: [babel] using tramp when tangling
2010-03-17 18:39 [babel] using tramp when tangling Maurizio Vitale
2010-03-17 19:57 ` Rémi Vanicat
@ 2010-03-17 20:06 ` Dan Davison
1 sibling, 0 replies; 4+ messages in thread
From: Dan Davison @ 2010-03-17 20:06 UTC (permalink / raw)
To: maurizio.vitale; +Cc: emacs-orgmode
Maurizio Vitale
<mav@cuma.i-did-not-set--mail-host-address--so-tickle-me> writes:
> I'd find useful to use tramp syntax in the :tangle specification.
> In my case it would be to specify sudo when tangling config files that
> are supposed to go to areas not writable by the user running Emacs.
> Something like:
>
> #+begin_src sh :tangle /sudo::/etc/my_config_file
> ...
> #+end_src
>
> other people might be interested in remote access to tangle targets.
>
> Is there a way to achieve the above?
>
> If I try to tangle the above, I get something along the lines that
> "tramp cannot append to file". Would it be possible to have org-babel to
> (optionally) tangle to a buffer and then save to file in one go?
I would like this to be possible. As you suggest, the change would
involve not using append-to-file; it shouldn't be that hard. I've added
it to the org-babel TODO list, but if you or anyone else would like to
have a go that would be great.
Dan
>
> Thanks a lot for the excellent addition to org-mode.
>
> Maurizio
>
>
>
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
^ permalink raw reply [flat|nested] 4+ messages in thread
* Re: Re: [babel] using tramp when tangling
2010-03-17 19:57 ` Rémi Vanicat
@ 2010-03-18 1:08 ` Dan Davison
0 siblings, 0 replies; 4+ messages in thread
From: Dan Davison @ 2010-03-18 1:08 UTC (permalink / raw)
To: Rémi Vanicat; +Cc: emacs-orgmode
vanicat@debian.org (Rémi Vanicat) writes:
> Maurizio Vitale <mav@cuma.i-did-not-set--mail-host-address--so-tickle-me> writes:
>
>> I'd find useful to use tramp syntax in the :tangle specification.
>> In my case it would be to specify sudo when tangling config files that
>> are supposed to go to areas not writable by the user running Emacs.
>> Something like:
>>
>> #+begin_src sh :tangle /sudo::/etc/my_config_file
>> ...
>> #+end_src
>>
>> other people might be interested in remote access to tangle targets.
>>
>> Is there a way to achieve the above?
>>
>> If I try to tangle the above, I get something along the lines that
>> "tramp cannot append to file". Would it be possible to have org-babel to
>> (optionally) tangle to a buffer and then save to file in one go?
>
> It's a bug of append-file. We could not use it: (code by Alexey Voinov,
> stolen from magit):
Well that was solved quickly. Thanks Rémi, I've applied that with a
couple of minor changes.
Dan
>
> diff --git a/contrib/babel/lisp/org-babel-tangle.el b/contrib/babel/lisp/org-babel-tangle.el
> index dd76195..c4ea0d8 100644
> --- a/contrib/babel/lisp/org-babel-tangle.el
> +++ b/contrib/babel/lisp/org-babel-tangle.el
> @@ -127,7 +127,12 @@ exported source code blocks by language."
> (insert (concat she-bang "\n"))
> (setq she-banged (cons file-name she-banged)))
> (org-babel-spec-to-string spec)
> - (append-to-file nil nil file-name))
> + (let ((content (buffer-string)))
> + (with-temp-buffer
> + (insert-file-contents file-name)
> + (goto-char (point-max))
> + (insert content)
> + (write-region nil nil ignore-file))))
> ;; update counter
> (setq block-counter (+ 1 block-counter))
> (add-to-list 'path-collector file-name)))))
^ permalink raw reply [flat|nested] 4+ messages in thread
end of thread, other threads:[~2010-03-18 1:09 UTC | newest]
Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2010-03-17 18:39 [babel] using tramp when tangling Maurizio Vitale
2010-03-17 19:57 ` Rémi Vanicat
2010-03-18 1:08 ` Dan Davison
2010-03-17 20:06 ` Dan Davison
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.