diff options
| author | kr.angelov <kr.angelov@gmail.com> | 2011-11-04 16:20:41 +0000 |
|---|---|---|
| committer | kr.angelov <kr.angelov@gmail.com> | 2011-11-04 16:20:41 +0000 |
| commit | 0d04d5624139c4c166ef57c28c33fabca43fed5d (patch) | |
| tree | 8120ea9daba4d4ba7a7ced538675e365c97f54f6 | |
| parent | 98741f3fbf7b1aaf461bc33a5676a8b547797d86 (diff) | |
qualified names in the tags file
| -rw-r--r-- | src/compiler/GFTags.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GFTags.hs b/src/compiler/GFTags.hs index fd75710e3..1fad82b99 100644 --- a/src/compiler/GFTags.hs +++ b/src/compiler/GFTags.hs @@ -17,7 +17,7 @@ mainTags opts files = do ioeIO (writeFile "tags" (unlines ((Set.toList . Set.fromList) tags))) getTags x (m,mi) = - [showIdent i ++ "\t" ++ k ++ "\t" ++ l ++ "\t" ++ t + [showIdent m ++ "." ++ showIdent i ++ "\t" ++ k ++ "\t" ++ l ++ "\t" ++ t | (i,jment) <- Map.toList (jments mi), (k,l,t) <- getLocations jment] ++ x where |