diff --git a/lib/getenv.c b/lib/getenv.c
index 6bd0e07ba..21cc42f34 100644
--- a/lib/getenv.c
+++ b/lib/getenv.c
@@ -53,7 +53,7 @@ char *GetEnv(const char *variable)
   char *env = getenv(variable);
 #ifdef VMS
   if(env && strcmp("HOME",variable) == 0)
-    env = decc$translate_vms(env);
+    env = decc_translate_vms(env);
 #endif
   return (env && env[0])?strdup(env):NULL;
 #endif
diff --git a/lib/netrc.c b/lib/netrc.c
index ac6b5402b..d7c7fd108 100644
--- a/lib/netrc.c
+++ b/lib/netrc.c
@@ -117,7 +117,7 @@ int Curl_parsenetrc(const char *host,
       pw= getpwuid(geteuid());
       if(pw) {
 #ifdef  VMS
-        home = decc$translate_vms(pw->pw_dir);
+        home = decc_translate_vms(pw->pw_dir);
 #else
         home = pw->pw_dir;
 #endif
diff --git a/packages/vms/config-vms.h b/packages/vms/config-vms.h
index e19a0b4d3..ae72e17b1 100644
--- a/packages/vms/config-vms.h
+++ b/packages/vms/config-vms.h
@@ -355,3 +355,6 @@
 /* Define to the function return type for send. */
 #define SEND_TYPE_RETV int
 
+/* Define to hide dollar sign from compilers in strict ansi mode. */
+#define decc_translate_vms(__s) decc$translate_vms(__s)
+
diff --git a/src/homedir.c b/src/homedir.c
index d9bc39fe5..e8392f192 100644
--- a/src/homedir.c
+++ b/src/homedir.c
@@ -71,7 +71,7 @@ char *GetEnv(const char *variable, char do_expand)
 #ifdef  VMS
   env = getenv(variable);
   if (env && strcmp("HOME",variable) == 0) {
-        env = decc$translate_vms(env);
+        env = decc_translate_vms(env);
   }
 #else
   /* no length control */
@@ -100,7 +100,7 @@ char *homedir(void)
 
    if (pw) {
 #ifdef VMS
-     home = decc$translate_vms(pw->pw_dir);
+     home = decc_translate_vms(pw->pw_dir);
 #else
      home = pw->pw_dir;
 #endif