followup
This commit is contained in:
parent
3416cd8148
commit
35446d3c3a
2 changed files with 10 additions and 1 deletions
|
@ -14,6 +14,7 @@ module Annex.DirHashes (
|
||||||
dirHashes,
|
dirHashes,
|
||||||
hashDirMixed,
|
hashDirMixed,
|
||||||
hashDirLower,
|
hashDirLower,
|
||||||
|
display_32bits_as_dir
|
||||||
) where
|
) where
|
||||||
|
|
||||||
import Data.Bits
|
import Data.Bits
|
||||||
|
@ -74,7 +75,7 @@ hashDirLower n k = hashDirs n 3 $ take 6 $ md5s $ md5FilePath $ key2file $ nonCh
|
||||||
-}
|
-}
|
||||||
display_32bits_as_dir :: Word32 -> String
|
display_32bits_as_dir :: Word32 -> String
|
||||||
display_32bits_as_dir w = trim $ swap_pairs cs
|
display_32bits_as_dir w = trim $ swap_pairs cs
|
||||||
where
|
where
|
||||||
-- Need 32 characters to use. To avoid inaverdently making
|
-- Need 32 characters to use. To avoid inaverdently making
|
||||||
-- a real word, use letters that appear less frequently.
|
-- a real word, use letters that appear less frequently.
|
||||||
chars = ['0'..'9'] ++ "zqjxkmvwgpfZQJXKMVWGPF"
|
chars = ['0'..'9'] ++ "zqjxkmvwgpfZQJXKMVWGPF"
|
||||||
|
|
|
@ -0,0 +1,8 @@
|
||||||
|
[[!comment format=mdwn
|
||||||
|
username="joey"
|
||||||
|
subject="""comment 3"""
|
||||||
|
date="2016-09-29T15:33:00Z"
|
||||||
|
content="""
|
||||||
|
Had another report of this, and there NFS seemed to be involved in the
|
||||||
|
circumstances of the crash.
|
||||||
|
"""]]
|
Loading…
Add table
Add a link
Reference in a new issue