diff options
| author | sabetts <sabetts> | 2004-09-27 23:23:50 +0000 |
|---|---|---|
| committer | sabetts <sabetts> | 2004-09-27 23:23:50 +0000 |
| commit | 6206d6ac617f244700cebb319fd9e53636cfbd83 (patch) | |
| tree | e3b235198a0f621ae93a5d7533608714d558f66c /contrib | |
| parent | 176f17a6b5630b65b37ed09f6b23d5f8c4c8f7a3 (diff) | |
| download | ratpoison-6206d6ac617f244700cebb319fd9e53636cfbd83.zip | |
(ratpoison-command): use call-process.
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/ratpoison.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/contrib/ratpoison.el b/contrib/ratpoison.el index cc63ada..83955c1 100644 --- a/contrib/ratpoison.el +++ b/contrib/ratpoison.el @@ -6,7 +6,7 @@ ;; Maintainer: Gergely Nagy <algernon@debian.org> ;; Version: 0.2 ;; Keywords: faces, ratpoison, X -;; CVS Id: $Id: ratpoison.el,v 1.2 2003/10/24 23:52:45 rcyeske Exp $ +;; CVS Id: $Id: ratpoison.el,v 1.3 2004/09/27 23:23:52 sabetts Exp $ ;; Last updated: <2001/10/05 17:58:38 algernon> ;; This file is NOT part of GNU Emacs. @@ -167,8 +167,7 @@ ; Command stuff (defun ratpoison-command (command) (interactive "sRP Command: ") - (shell-command (concat ratpoison-program " -c \"" command - "\""))) + (call-process ratpoison-program nil nil nil "-c" command)) (defun ratpoison-command-on-region (start end) (interactive "r") |