From e127c8c462b3320ac0b78f867e2c6f183197ac72 Mon Sep 17 00:00:00 2001
From: Peter Stephenson <pws@users.sourceforge.net>
Date: Wed, 23 Apr 2003 18:12:58 +0000
Subject: IKEGAMI Tsutomu: sf bug 722366: metafy pwd when read from $PWD

---
 Src/init.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Src')

diff --git a/Src/init.c b/Src/init.c
index 645897982..d2f8ec591 100644
--- a/Src/init.c
+++ b/Src/init.c
@@ -753,7 +753,8 @@ setupvals(void)
      * initialize `PWD' from `HOME'      */
     if (ispwd(home))
 	pwd = ztrdup(home);
-    else if ((ptr = zgetenv("PWD")) && ispwd(ptr))
+    else if ((ptr = zgetenv("PWD")) && (strlen(ptr) < PATH_MAX) &&
+	     (ptr = metafy(ptr, -1, META_STATIC), ispwd(ptr)))
 	pwd = ztrdup(ptr);
     else
 	pwd = metafy(zgetcwd(), -1, META_DUP);
-- 
cgit 1.4.1