anchor.diff:  
   replace_name(S, Name) ->
       case S of
  -        "[[[NAME]]]" ++ Rest -> 
  +        "[[[NAME]]]" ++ Rest ->
               [Name|replace_name(Rest, Name)];
           [H|T] ->
               [H|replace_name(T, Name)];
  
positive.code:     Filename = filename:join([".", "site", "src", Name ++ ".erl"]),
      Template = filename:join([".", "site", ".prototypes", "page.erl"]),
      case filelib:is_file(Filename) of
          true -> 
              io:format("File already exists: " ++ Filename ++ "!\n");
          false ->
              Contents = template(Template, Name),
              file:write_file(Filename, Contents),
              io:format("Created page: " ++ Filename ++ "\n"),
              io:format("Remember to recompile!~n")
      end;    
  
  command(["element", Name]) ->
      Filename = filename:join([".", "site", "src", "elements", "element_" ++ Name ++ ".erl"]),
      Template = filename:join([".", "site", ".prototypes", "element.erl"]),
      case filelib:is_file(Filename) of
          true -> 
              io:format("File already exists: " ++ Filename ++ "!\n");
          false ->
              Contents = template(Template, Name),
              file:write_file(Filename, Contents),
              io:format("Created element: " ++ Filename ++ "\n"),
              io:format("Remember to recompile!~n")
      end;    
  
  command(["action", Name]) ->
      Filename = filename:join([".", "site", "src", "actions", "action_" ++ Name ++ ".erl"]),
      Template = filename:join([".", "site", ".prototypes", "action.erl"]),
      case filelib:is_file(Filename) of
          true -> 
              io:format("File already exists: " ++ Filename ++ "!\n");
          false ->
              Contents = template(Template, Name),
              file:write_file(Filename, Contents),
              io:format("Created action: " ++ Filename ++ "\n"),
              io:format("Remember to recompile!~n")
      end;    
  
  command(["help"|_]) ->
      command([]);
  
negative.code:         "   ./bin/dev element <name>",
          "     - Create a new element with the specified name.",
          "   ",
          "   ./bin/dev plugin <name>",
          "     - Create a new plugin with the specified name.",
          "   ",
          "   ./bin/dev help",
          "     - This screen."
      ],
  