anchor.diff:          {aborted, Reason} ->
               lager:log(error, self(), "Error creating table: ~p", [Reason]),
               error
  +    end.
  +
  +get_os_env_list() ->
  +    case os:getenv("NODES") of
  +        false -> undefined;
  +        Value -> [list_to_atom(N) || N <- string:tokens(Value, ",")]
       end.
   
   has_tables() ->
  
positive.code: -define(WAIT_TIMEOUT, 60000).
  
  start() ->
      lager:log(info, self(), "Starting privpaste_mnesia"),
      mnesia:start(),
      maybe_initialize(),
      maybe_wait_for_tables().
  
  backup() ->
      lager:log(info, self(), "Backing up the existing database"),
      mnesia:backup("/var/lib/privatepaste/backup.bup").
  
  restore() ->
      lager:log(info, self(), "Restoring the database from a backup"),
      mnesia:restore("/var/lib/privatepaste/backup.bup", []).
  
  create_schema(Nodes) ->
      lager:log(info, self(), "Creating schema with nodes: ~p", [Nodes]),
      case mnesia:create_schema(Nodes) of
          ok -> ok;
          {error, Reason} -> lager:error("Error creating schema: ~p", [Reason])
  
negative.code: -export([start/0,
           backup/0,
           reset/0,
           restore/0,
           node_list/0]).
  
  -include("privpaste.hrl").
  
  