anchor.diff:  		       true -> MaxAcc
   		   end
   	   end,
  -    ?line case lists:foldl(Fun2, 0, Data1) of
  +    case lists:foldl(Fun2, 0, Data1) of
   	      Max when Max<100 ->
   		  Threshold3 = Max+1,
  -		  ?line ok =
  -		      disksup:set_almost_full_threshold(Threshold3/100),
  -		  ?line disksup ! timeout, % force a disk check
  -		  ?line Data3 = disksup:get_disk_data(),
  -		  ?line Over3 = over_threshold(Data3, Threshold3),
  -		  ?line Alarms3 = get_alarms(),
  +		  ok = disksup:set_almost_full_threshold(Threshold3/100),
  +		  disksup ! timeout, % force a disk check
  +		  Data3   = disksup:get_disk_data(),
  +		  Over3   = over_threshold(Data3, Threshold3),
  +		  Alarms3 = get_alarms(),
   		  if
   		      Over3==0, length(Alarms3)==0 ->
  -			  ?line ok;
  +			  ok;
   		      true ->
   			  dump_info(),
  -			  ?line ?t:fail({bad_alarms, Threshold3, Data3, Alarms3})
  +			  ?t:fail({bad_alarms, Threshold3, Data3, Alarms3})
   		  end;
   	      100 ->
  -		  ?line ignore
  +		  ignore
   	  end,
   
       %% Reset threshold
  -    ?line ok = disksup:set_almost_full_threshold(Threshold1/100),
  -
  +    ok = disksup:set_almost_full_threshold(Threshold1/100),
       ok.
   
   over_threshold(Data, Threshold) ->
       Data2 = remove_duplicated_disks(lists:keysort(1, Data)),
  -    lists:foldl(fun({_Id, _Kbyte, Cap}, N) when Cap>=Threshold ->
  -			N+1;
  -		   (_DiskData, N) ->
  -			N
  -		end,
  -		0,
  -		Data2).
  +    lists:foldl(fun
  +	    ({_Id, _Kbyte, Cap}, N) when Cap>=Threshold -> N+1;
  +	    (_DiskData, N) -> N
  +	end, 0, Data2).
   
   %% On some platforms (for example MontaVista) data for one disk can be
   %% "duplicated":
  
positive.code: 		       true -> false
  		   end
  	   end,
      ?line case until(Fun1, Data1) of
  	      {_, _, Cap1} ->
  		  Threshold2 = Cap1-1,
  		  ?line ok =
  		      disksup:set_almost_full_threshold(Threshold2/100),
  		  ?line disksup ! timeout, % force a disk check
  		  ?line Data2 = disksup:get_disk_data(),
  		  ?line Over2 = over_threshold(Data2, Threshold2),
  		  ?line Alarms2 = get_alarms(),
  		  if
  		      Over2==length(Alarms2), Over2>Over1 ->
  			  ?line true;
  		      true ->
  			  dump_info(),
  			  ?line ?t:fail({bad_alarms, Threshold2, Data2, Alarms2})
  		  end;
  	      false ->
  		  ?line ignore
  	  end,
  
      %% Find out the highest space usage among all disks
  
negative.code: -define(default_timeout, ?t:minutes(1)).
  
  init_per_suite(Config) when is_list(Config) ->
      ok = application:start(os_mon),
      Config.
  
  end_per_suite(Config) when is_list(Config) ->
      ok = application:stop(os_mon),
      Config.
  
  init_per_testcase(unavailable, Config) ->
  