anchor.diff:                
               BlockValuesList = block_values(),
               
  +            Clean = fun(BlockValues) -> clean_block_values(BlockValues) end,
  +            
  +            CleanedBlockValuesList = lists:map(Clean, BlockValuesList),
  +            
               Format = fun(Term) -> io_lib:format("~tp.~n", [Term]) end,
  -            Text = lists:map(Format, BlockValuesList),
  +            Text = lists:map(Format, CleanedBlockValuesList),
               
               case file:write_file(FileName, Text) of
                   ok -> 
  
positive.code:             "get"       -> ui_get_values(Params);
              "set"       -> ui_set_value(Params);
              "link"      -> ui_link_blocks(Params);
              "status"    -> ui_status(Params);
              "types"     -> ui_block_types(Params);
              "load"      -> ui_load_blocks(Params);
  
negative.code:         _ -> io:format("Error: Too many parameters~n")
  	end.
  
  % Create blocks from a list of block values
  create_blocks([]) -> ok;
  
  create_blocks(BlockValuesList) ->
  