/[gcl]/gcl/o/unixfsys.c
ViewVC logotype

Diff of /gcl/o/unixfsys.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.21 by camm, Wed May 4 17:40:51 2005 UTC revision 1.22 by camm, Thu May 5 13:38:32 2005 UTC
# Line 247  truename(object pathname) Line 247  truename(object pathname)
247                  return(file_error("Symlink broken at ~S.",pathname));                  return(file_error("Symlink broken at ~S.",pathname));
248              for (p = filename, q = 0;  *p != '\0';  p++)              for (p = filename, q = 0;  *p != '\0';  p++)
249                      if (*p == '/') q = p;                      if (*p == '/') q = p;
250              if (q == 0)              if (q == 0 || *newname == '/')
251                  q = filename;                  q = filename;
252              else              else
253                  q++;                  q++;

Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26