If the first char of the path passed to _fullpath is ~, expand to the current value of $HOME

src/xpdev/dirwrap.c

@@ -761,14 +761,26 @@ char * DLLCALL _fullpath(char *target, const char *path, size_t size)  {
 	*out=0;
 
 	if(*path != '/')  {
-		p=getcwd(target,size);
+		if(*path == '~') {
+			p=getenv("HOME");
 			if(p==NULL || strlen(p)+strlen(path)>=size)
 				return(NULL);
+			strcpy(target,p);
+			out=strrchr(target,'\0');
+			path++;
+		}
+		else {
+			p=getcwd(NULL,size);
+			if(p==NULL || strlen(p)+strlen(path)>=size)
+				return(NULL);
+			strcpy(target,p);
+			free(p);
 			out=strrchr(target,'\0');
 			*(out++)='/';
 			*out=0;
 			out--;
 		}
+	}
 	strncat(target,path,size-1);
 	
 /*	if(stat(target,&sb))