anchor.diff:    not filelib:is_dir(TryDir).
   
   % Give back: {Type, InlineCSS}
  -process_styles({Type, Sheets}, AST, Options) ->
  -  {Type, []}.
  +process_styles({Type, Sheets}, AST, _Options) ->
  +  case [remove_unused_css(zss:compile(ZSSF), AST, []) || ZSSF <- Sheets] of
  +    [] ->
  +      empty;
  +    ZSSTrees ->
  +      {Type, zss:output_css(zss_parser:combine_dups(lists:flatten(ZSSTrees)))}
  +  end.
   
   find_magic_file(SourceName, Options) ->
     BaseName = filename:rootname(filename:basename(SourceName)),
     case find_file(BaseName, ".zss", zml:get_search_paths(Options)) of
  -    {ok, FullName} -> [FullName];
  +    {ok, FullName} -> FullName;
       _ -> none
     end.
   
  
positive.code: process(_ID, Attr, _Children, AST, Options) ->
    DeclaredZSS = get_declared_zss(Attr, Options),
    % DEBUG
    io:format("~n~p~n~n", [DeclaredZSS]),
    Processed = lists:map(fun(Styles) ->
          process_styles(Styles, AST, Options)
      end, DeclaredZSS),
    AST.
  
  get_declared_zss(Attr, Options) ->
  
negative.code:       FName = filename:join([Dir, Type ++ ".zss"]),
        case filelib:is_file(FName) of
          true ->
            zml:append_attr(Acc, {Type, [FName]});
          false ->
            Acc
        end
  