summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--contrib/ratpoison.el5
2 files changed, 6 insertions, 3 deletions
diff --git a/ChangeLog b/ChangeLog
index 083f216..fad7cf6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2004-09-27 Shawn Betts <sabetts@vcn.bc.ca>
+
+ * contrib/ratpoison.el (ratpoison-command): use call-process.
+
2004-06-13 Shawn Betts <sabetts@vcn.bc.ca>
* src/main.c (init_defaults): set default for window list style to
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")