Browse Source

* How about we show the full line that is being processed as well in an ERROR loading.

svn: 530
Bryan Drewery 22 years ago
parent
commit
2161b6c619
1 changed files with 1 additions and 0 deletions
  1. 1 0
      src/users.c

+ 1 - 0
src/users.c

@@ -815,6 +815,7 @@ int readuserfile(char *file, struct userrec **ret)
          if (s[0] && lasthand[0] == '*' && lasthand[1] == CHANS_NAME[1]) {
           if (Tcl_Eval(interp, s) != TCL_OK) {
            putlog(LOG_MISC, "*", "Tcl error in userfile on line %d", line);
+           putlog(LOG_MISC, "*", "Line: %s", s);
            putlog(LOG_MISC, "*", "%s", Tcl_GetVar(interp, "errorInfo", TCL_GLOBAL_ONLY));
            return 1;
           }