anchor.diff:  
   
   
  -handle_info(I,{author,Author})->
  +pdf_handle_info(I,{author,Author})->
       I#info{author=Author};
  -handle_info(I,{title,Title}) ->
  +pdf_handle_info(I,{title,Title}) ->
       I#info{title=Title};
  -handle_info(I,{subject,Subject}) ->
  +pdf_handle_info(I,{subject,Subject}) ->
       I#info{subject=Subject};
  -handle_info(I,{date,{Year,Month,Day}})->
  +pdf_handle_info(I,{date,{Year,Month,Day}})->
       I#info{creationDate={Year,Month,Day}};
  -handle_info(I,{keywords,Keywords}) ->
  +pdf_handle_info(I,{keywords,Keywords}) ->
       I#info{keywords=Keywords}.
   
   
  
positive.code: pagesize(Width, Height) -> {0,0,Width,Height}.
  
  set_pagesize(PID, Size)-> 
      PID ! {mediabox, pagesize(Size) }.
  
  set_pagesize(PID, Width, Height) -> 
      PID ! {mediabox, pagesize(Width, Height)} .
  
  %% -- Fonts --
  
  set_font(PID, Fontname, Size)->
      PID ! {font, {set, Fontname, Size}}.
  
  ensure_font_gets_loaded(PID, FontName) ->
      PID ! {ensure_font, FontName}.
  
  
  %% -- This function is a bit expensive, but will stick to the public interface.
  
negative.code: %% Note page 1 is already created  by default and  current page set 
  %% to it after creation of PDF context.
  new_page(PID)->
     case gen_server:call( PID, {get_new_page}, infinity) of
      	{page,PageNo}->
      	    PageNo;
      	{'EXIT', PID, Reason} ->
      	    exit(Reason)
      end.
  
  
  
  page_script(PID, Script) ->
      gen_server:cast(PID, {page_script, Script}).
  
  
  %% Go to a page already created.    
  set_page(PID, PageNo)->
      gen_server:cast(PID, {page,{set, PageNo}}).
  
  %% Useful for page numbering functions etc.
  get_page_no(PID)->
     case gen_server:call( PID, {get_page_no}, infinity) of
      	{page,PageNo}->
      	    PageNo;
      	{'EXIT', PID, Reason} ->
      	    exit(Reason)
      end.
      
  %% --- Info -----
  
  set_author(PID,Author)->
        gen_server:call(PID, {info, {author, Author}}, infinity).
  
  set_title(PID,Title)->
      gen_server:call(PID, {info, {title, Title}}, infinity).
  
  set_subject(PID,Subject)->
      gen_server:call(PID, {info, {subject, Subject}}, infinity).
      
  set_date(PID,Year,Month,Day)->
      gen_server:call(PID, {date, {Year,Month,Day}}, infinity).
      
  set_keywords(PID, Keywords)->
      gen_server:call(PID, {keywords, Keywords}, infinity).
  
  
  
  %% --- Page ---
  