<%
  # API
  my $api = gitprep_api;
  
  # Paramters
  my $user = param('user');
  my $project = param('project');
  my $current_user = session('user');
  
  # Can fork?
  unless ($api->logined) {
    $self->redirect_to('/');
    return;
  }
  
  # Repository is already exists
  if (app->manager->exists_project($current_user, $project)) {
    $self->redirect_to("/$current_user/$project");
    return;
  }
  # Fork
  else {
    eval { app->manager->fork_project($current_user, $user, $project) };
    if (my $e = $@) {
      $self->reply->exception('Internal Error');
      app->log->error(url_for . ": $e");
    }
    else {
      flash(message => "Repository is forked from /$user/$project.");
      $self->redirect_to("/$current_user/$project");
    }
    return;
  }
%>