]>
Commit | Line | Data |
---|---|---|
f7074328 JR |
1 | --- fpc/fpcsrc/rtl/unix/ttyname.inc~ 2005-02-14 18:13:31.000000000 +0100 |
2 | +++ fpc/fpcsrc/rtl/unix/ttyname.inc 2006-10-13 18:56:54.686466592 +0200 | |
12e41632 JR |
3 | @@ -44,8 +44,7 @@ |
4 | if fpstat(name,st)=0 then | |
5 | begin | |
6 | if (fpS_ISDIR(st.st_mode)) and { if it is a directory } | |
7 | - (strpas(@(d^.d_name))<>'.') and { but not ., .. and fd subdirs } | |
8 | - (strpas(@(d^.d_name))<>'..') and | |
9 | + (strpas(@(d^.d_name))[1]<>'.') and { but not ., .. and fd subdirs } | |
10 | (strpas(@(d^.d_name))<>'') and | |
11 | (strpas(@(d^.d_name))<>'fd') then | |
12 | begin {we found a directory, search inside it} |