diff --git a/iolib.c b/iolib.c
index 43adfd6e..c5d40318 100644
--- a/iolib.c
+++ b/iolib.c
@@ -247,7 +247,7 @@ static void lua_printstack (FILE *f)
       case 'g':
         fprintf(f, "function %s", name);
         break;
-      case 'f':
+      case 't':
         fprintf(f, "`%s' tag method", name);
         break;
       default: {
diff --git a/table.c b/table.c
index b8b2ced7..1ca0b0ec 100644
--- a/table.c
+++ b/table.c
@@ -3,7 +3,7 @@
 ** Module to control static tables
 */
 
-char *rcs_table="$Id: table.c,v 2.70 1997/05/26 14:42:51 roberto Exp roberto $";
+char *rcs_table="$Id: table.c,v 2.71 1997/06/09 17:28:14 roberto Exp roberto $";
 
 #include "luamem.h"
 #include "auxlib.h"
@@ -258,7 +258,7 @@ char *lua_getobjname (lua_Object o, char **name)
 { /* try to find a name for given function */
   functofind = luaI_Address(o);
   if ((*name = luaI_travfallbacks(checkfunc)) != NULL)
-    return "fallback";
+    return "tag-method";
   else if ((*name = lua_travsymbol(checkfunc)) != NULL)
     return "global";
   else return "";