From 914e81a2886eca1838ba4c9419234d74533f53d3 Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 27 Sep 1994 01:18:46 +0000
Subject: [PATCH] (sys_subshell): Use type test macros.

---
 src/sysdep.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/sysdep.c b/src/sysdep.c
index 95398fa500..3b2b2f613b 100644
--- a/src/sysdep.c
+++ b/src/sysdep.c
@@ -667,7 +667,7 @@ sys_subshell ()
   if (XFASTINT (Fboundp (dir)) == XFASTINT (Qnil))
     goto xyzzy;
   dir = Fsymbol_value (dir);
-  if (XTYPE (dir) != Lisp_String)
+  if (!STRINGP (dir))
     goto xyzzy;
 
   dir = expand_and_dir_to_file (Funhandled_file_name_directory (dir), Qnil);
-- 
2.20.1