|
From: | Kevin Rodgers |
Subject: | Re: Scroll down *Schell Command Output* buffer when output arrives |
Date: | Tue, 04 Mar 2003 15:28:30 -0700 |
User-agent: | Mozilla/5.0 (X11; U; SunOS i86pc; en-US; rv:0.9.4.1) Gecko/20020406 Netscape6/6.2.2 |
Jens Persson wrote:
(defun csound-compile-curr-osc-sco () (interactive) (shell-command (concat "csound -A -d -o test.aif " (file-name-sans-extension (buffer-name)) ".orc " (file-name-sans-extension (buffer-name)) ".sco")) )
That won't work if you happen to be visiting 2 files with the same name but in different directories, which usually results in buffers named e.g. foo.bar and foo.bar<2>. I would write that as: (let* ((file (file-name-nondirectory buffer-file-name)) (sound (file-name-sans-extension file))) (shell-command (format "csound -A -d -o test.aif %s.orc %s.sco" sound sound))) -- <a href="mailto:<kevin.rodgers@ihs.com>">Kevin Rodgers</a>
[Prev in Thread] | Current Thread | [Next in Thread] |