Revision becfd918

b/src/Ganeti/HsConstants.hs
3796 3796
-- * Auto-repair levels
3797 3797

  
3798 3798
autoRepairFailover :: String
3799
autoRepairFailover = "failover"
3799
autoRepairFailover = Types.autoRepairTypeToRaw ArFailover
3800 3800

  
3801 3801
autoRepairFixStorage :: String
3802
autoRepairFixStorage = "fix-storage"
3802
autoRepairFixStorage = Types.autoRepairTypeToRaw ArFixStorage
3803 3803

  
3804 3804
autoRepairMigrate :: String
3805
autoRepairMigrate = "migrate"
3805
autoRepairMigrate = Types.autoRepairTypeToRaw ArMigrate
3806 3806

  
3807 3807
autoRepairReinstall :: String
3808
autoRepairReinstall = "reinstall"
3808
autoRepairReinstall = Types.autoRepairTypeToRaw ArReinstall
3809 3809

  
3810 3810
autoRepairAllTypes :: FrozenSet String
3811 3811
autoRepairAllTypes =
......
3817 3817
-- * Auto-repair results
3818 3818

  
3819 3819
autoRepairEnoperm :: String
3820
autoRepairEnoperm = "enoperm"
3820
autoRepairEnoperm = Types.autoRepairResultToRaw ArEnoperm
3821 3821

  
3822 3822
autoRepairFailure :: String
3823
autoRepairFailure = "failure"
3823
autoRepairFailure = Types.autoRepairResultToRaw ArFailure
3824 3824

  
3825 3825
autoRepairSuccess :: String
3826
autoRepairSuccess = "success"
3826
autoRepairSuccess = Types.autoRepairResultToRaw ArSuccess
3827 3827

  
3828 3828
autoRepairAllResults :: FrozenSet String
3829 3829
autoRepairAllResults =

Also available in: Unified diff