split out DiffTreeItem
This makes github-backup happier when it reuses this library.
This commit is contained in:
parent
8af447c01b
commit
db27ad26bf
3 changed files with 26 additions and 11 deletions
|
@ -16,25 +16,16 @@ module Git.DiffTree (
|
|||
) where
|
||||
|
||||
import Numeric
|
||||
import System.Posix.Types
|
||||
|
||||
import Common
|
||||
import Git
|
||||
import Git.Sha
|
||||
import Git.Command
|
||||
import Git.FilePath
|
||||
import Git.DiffTreeItem
|
||||
import qualified Git.Filename
|
||||
import qualified Git.Ref
|
||||
|
||||
data DiffTreeItem = DiffTreeItem
|
||||
{ srcmode :: FileMode
|
||||
, dstmode :: FileMode
|
||||
, srcsha :: Sha -- nullSha if file was added
|
||||
, dstsha :: Sha -- nullSha if file was deleted
|
||||
, status :: String
|
||||
, file :: TopFilePath
|
||||
} deriving Show
|
||||
|
||||
{- Checks if the DiffTreeItem modifies a file with a given name
|
||||
- or under a directory by that name. -}
|
||||
isDiffOf :: DiffTreeItem -> TopFilePath -> Bool
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue