Revision 53753d20

b/src/Ganeti/DataCollectors/CLI.hs
40 40
  , oConfdAddr
41 41
  , oConfdPort
42 42
  , oInputFile
43
  , oInstances
43 44
  , genericOptions
44 45
  ) where
45 46

  
......
67 68
                                     -- connect to
68 69
  , optInputFile   :: Maybe FilePath -- ^ Path to the file containing the
69 70
                                     -- information to be parsed
71
  , optInstances   :: Maybe FilePath -- ^ Path to the file contained a
72
                                     -- serialized list of instances as in:
73
                                     -- ([Primary], [Secondary])
70 74
  } deriving Show
71 75

  
72 76
-- | Default values for the command line options.
......
81 85
  , optConfdAddr   = Nothing
82 86
  , optConfdPort   = Nothing
83 87
  , optInputFile   = Nothing
88
  , optInstances   = Nothing
84 89
  }
85 90

  
86 91
-- | Abbreviation for the option type.
......
138 143
      "the input FILE",
139 144
    OptComplFile)
140 145

  
146
oInstances :: OptType
147
oInstances =
148
  ( Option "i" ["instances"]
149
      (ReqArg (\ f o -> Ok o { optInstances = Just f}) "FILE")
150
      "the FILE containing serialized instances",
151
    OptComplFile)
152

  
141 153
-- | Generic options.
142 154
genericOptions :: [GenericOptType Options]
143 155
genericOptions =  [ oShowVer

Also available in: Unified diff