(var_is_valid_name) Fix three msg() bugs found by -Wformat.

diff --git a/src/ChangeLog b/src/ChangeLog
index 7dec878d3b7f9163dab04156b6a36783f2960843..cd4f47b97a05586e6c8675c627d0aae38a40231a 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+Sat Jul 30 23:05:33 2005  Ben Pfaff  <blp@gnu.org>
+
+       * vars-atr.c: (var_is_valid_name) Fix three msg() bugs found by
+       -Wformat.
+
 Sat Jul 30 22:58:33 2005  Ben Pfaff  <blp@gnu.org>
 
        * rank.q: (parse_rank_function) Fix msg() bug found by -Wformat.

diff --git a/src/vars-atr.c b/src/vars-atr.c
index 356f51a46afef3843b8311ddb29e24e005c96a43..70669837590a3accc7e99c65581b13d9d39b90e6 100644 (file)
--- a/src/vars-atr.c
+++ b/src/vars-atr.c
@@ -263,7 +263,7 @@ var_is_valid_name (const char *name, bool issue_error)
     {
       if (issue_error)
         msg (SE, _("Variable name %s exceeds %d-character limit."),
-             (int) LONG_NAME_LEN);
+             name, (int) LONG_NAME_LEN);
       return false;
     }
 
@@ -273,7 +273,7 @@ var_is_valid_name (const char *name, bool issue_error)
         if (issue_error)
           msg (SE, _("Character `%c' (in %s) may not appear in "
                      "a variable name."),
-               name);
+               name[i], name);
         return false;
       }
         
@@ -281,7 +281,8 @@ var_is_valid_name (const char *name, bool issue_error)
     {
       if (issue_error)
         msg (SE, _("Character `%c' (in %s), may not appear "
-                   "as the first character in a variable name."), name);
+                   "as the first character in a variable name."),
+             name[0], name);
       return false;
     }