--recursivePath may handle dots correctly now
This commit is contained in:
parent
36accda8aa
commit
c9f4ad0613
2 changed files with 5 additions and 3 deletions
|
|
@ -279,8 +279,10 @@ proc addPath(path: string, info: TLineInfo) =
|
|||
lists.PrependStr(options.searchPaths, path)
|
||||
|
||||
proc addPathRec(dir: string, info: TLineInfo) =
|
||||
var pos = dir.len-1
|
||||
if dir[pos] == '/': inc(pos)
|
||||
for k,p in os.walkDir(dir):
|
||||
if k == pcDir and '.' notin p:
|
||||
if k == pcDir and p[pos] != '.':
|
||||
addPathRec(p, info)
|
||||
if not contains(options.searchPaths, p):
|
||||
liMessage(info, hintPath, p)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue