From df1abb8c0d0b5855af8bb78ecf87f3511807905d Mon Sep 17 00:00:00 2001
From: "Arnold D. Robbins" <arnold@skeeve.com>
Date: Wed, 14 Nov 2012 20:17:27 +0200
Subject: VMS updates. Should now build, pass some tests.

---
 io.c | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'io.c')

diff --git a/io.c b/io.c
index 2607b6cb..45725c5b 100644
--- a/io.c
+++ b/io.c
@@ -2523,7 +2523,9 @@ do_find_source(const char *src, struct stat *stb, int *errcode, path_info *pi)
 			return NULL;
 		}
 		erealloc(path, char *, strlen(path) + strlen(src) + 2, "do_find_source");
+#ifndef VMS
 		strcat(path, "/");
+#endif
 		strcat(path, src);
 		return path;
 	}
-- 
cgit v1.2.3