anchor.diff:  -module(zs_html_zss_images).
   
   -export([process/5]).
  +-include("zml_special_html.hrl").
   
   
   process(_ID, Attr, _Children, AST, Options) ->
  
positive.code:   AST.
  
  get_declared_zss(Attr, Options) ->
    zml:get_attr_vals(style,Attr) ++
    zml:get_attr_vals(styles,Attr) ++
    case proplists:get_value(source_filename, Options, none) of
      none -> [];
      SFN ->
        BaseName = filename:rootname(filename:basename(SFN)),
        MagicZSSName = BaseName ++ ".zss",
  
negative.code:       case file:path_open(SearchPaths, MagicZSSName, [read]) of
          {ok, IOD, FullName} ->
            file:close(IOD),
            zml:append_attr(Declared, {"style", [FullName]});
          _ ->
            Declared
        end
    end.
  
  
  