Update tests to the new format.

master
Manager Bot 3 years ago
parent f406dd7b88
commit 1e41e2e50c
  1. 23
      Web/t/00_load.t
  2. 5
      Web/t/01_endpoints/01_admin/01_index.t
  3. 5
      Web/t/01_endpoints/01_admin/02_do_admin_become/01_anon_to_user.t
  4. 5
      Web/t/01_endpoints/01_admin/02_do_admin_become/02_user_to_user.t
  5. 5
      Web/t/01_endpoints/01_admin/02_do_admin_become/03_admin_to_user.t
  6. 5
      Web/t/01_endpoints/01_admin/02_do_admin_become/04_admin_to_user_blog.t
  7. 5
      Web/t/01_endpoints/01_admin/03_people.t
  8. 5
      Web/t/01_endpoints/01_admin/04_person.t
  9. 5
      Web/t/01_endpoints/01_admin/05_do_person_note.t
  10. 5
      Web/t/01_endpoints/01_admin/06_blogs.t
  11. 5
      Web/t/01_endpoints/01_admin/07_invites.t
  12. 5
      Web/t/01_endpoints/01_admin/08_do_invite.t
  13. 5
      Web/t/01_endpoints/01_admin/09_do_invite_remove.t
  14. 5
      Web/t/01_endpoints/01_admin/10_servers.t
  15. 5
      Web/t/01_endpoints/01_admin/11_do_server.t
  16. 5
      Web/t/01_endpoints/01_admin/12_do_server_remove.t
  17. 5
      Web/t/01_endpoints/01_admin/13_domains.t
  18. 5
      Web/t/01_endpoints/01_admin/14_do_domain.t
  19. 5
      Web/t/01_endpoints/01_admin/15_do_domain_remove.t
  20. 5
      Web/t/01_endpoints/01_admin/16_alerts.t
  21. 5
      Web/t/01_endpoints/01_admin/17_do_alert_read.t
  22. 5
      Web/t/01_endpoints/01_admin/18_do_alert_unread.t
  23. 5
      Web/t/01_endpoints/01_admin/19_do_alert_remove.t
  24. 5
      Web/t/01_endpoints/02_auth/01_register.t
  25. 5
      Web/t/01_endpoints/02_auth/02_register_open.t
  26. 5
      Web/t/01_endpoints/02_auth/03_do_register_open.t
  27. 5
      Web/t/01_endpoints/02_auth/04_register_invite.t
  28. 5
      Web/t/01_endpoints/02_auth/05_do_register_invite.t
  29. 5
      Web/t/01_endpoints/02_auth/06_login.t
  30. 5
      Web/t/01_endpoints/02_auth/07_do_login.t
  31. 5
      Web/t/01_endpoints/02_auth/08_do_logout.t
  32. 5
      Web/t/01_endpoints/02_auth/09_forgot.t
  33. 5
      Web/t/01_endpoints/02_auth/10_do_forgot.t
  34. 5
      Web/t/01_endpoints/02_auth/11_reset.t
  35. 5
      Web/t/01_endpoints/02_auth/12_do_reset.t
  36. 5
      Web/t/01_endpoints/03_blog/01_index.t
  37. 5
      Web/t/01_endpoints/03_blog/02_domain_hosted.t
  38. 5
      Web/t/01_endpoints/03_blog/03_domain_owned.t
  39. 5
      Web/t/01_endpoints/03_blog/04_do_domain/01_with_owned_domain.t
  40. 5
      Web/t/01_endpoints/03_blog/04_do_domain/02_with_hosted_domain.t
  41. 5
      Web/t/01_endpoints/03_blog/05_settings.t
  42. 5
      Web/t/01_endpoints/03_blog/06_do_settings.t
  43. 5
      Web/t/01_endpoints/04_dashboard/01_index.t
  44. 5
      Web/t/01_endpoints/04_dashboard/02_blog.t
  45. 5
      Web/t/01_endpoints/04_dashboard/03_blog_posts.t
  46. 5
      Web/t/01_endpoints/04_dashboard/04_blog_post.t
  47. 5
      Web/t/01_endpoints/04_dashboard/05_do_blog_post.t
  48. 5
      Web/t/01_endpoints/04_dashboard/06_blog_post_edit.t
  49. 5
      Web/t/01_endpoints/04_dashboard/07_do_blog_post_edit.t
  50. 5
      Web/t/01_endpoints/04_dashboard/08_blog_post_alter.t
  51. 5
      Web/t/01_endpoints/04_dashboard/09_do_blog_post_alter.t
  52. 5
      Web/t/01_endpoints/04_dashboard/10_do_blog_post_remove.t
  53. 5
      Web/t/01_endpoints/04_dashboard/11_blog_settings.t
  54. 5
      Web/t/01_endpoints/04_dashboard/12_do_blog_settings.t
  55. 5
      Web/t/01_endpoints/04_dashboard/13_blog_config.t
  56. 5
      Web/t/01_endpoints/04_dashboard/14_do_blog_config.t
  57. 5
      Web/t/01_endpoints/04_dashboard/15_jobs.t
  58. 5
      Web/t/01_endpoints/04_dashboard/16_blog_media.t
  59. 5
      Web/t/01_endpoints/04_dashboard/17_do_blog_media.t
  60. 5
      Web/t/01_endpoints/04_dashboard/18_do_blog_media_remove.t
  61. 5
      Web/t/01_endpoints/04_dashboard/19_blog_history.t
  62. 5
      Web/t/01_endpoints/04_dashboard/20_do_blog_history.t
  63. 5
      Web/t/01_endpoints/04_dashboard/21_blog_pages.t
  64. 5
      Web/t/01_endpoints/04_dashboard/22_blog_page.t
  65. 5
      Web/t/01_endpoints/04_dashboard/23_do_blog_page.t
  66. 5
      Web/t/01_endpoints/04_dashboard/24_blog_page_edit.t
  67. 5
      Web/t/01_endpoints/04_dashboard/25_do_blog_page_edit.t
  68. 5
      Web/t/01_endpoints/04_dashboard/26_do_blog_page_remove.t
  69. 5
      Web/t/01_endpoints/05_root/01_index.t
  70. 5
      Web/t/01_endpoints/05_root/02_about.t
  71. 5
      Web/t/01_endpoints/05_root/03_contact.t
  72. 5
      Web/t/01_endpoints/06_user_settings/01_profile.t
  73. 5
      Web/t/01_endpoints/06_user_settings/02_do_profile.t
  74. 5
      Web/t/01_endpoints/06_user_settings/03_change_password.t
  75. 5
      Web/t/01_endpoints/06_user_settings/04_do_change_password.t
  76. 5
      Web/t/01_endpoints/06_user_settings/05_subscription.t
  77. 5
      Web/t/01_endpoints/06_user_settings/06_do_subscription.t
  78. 5
      Web/t/01_endpoints/06_user_settings/07_do_subscription_manage.t

@ -0,0 +1,23 @@
#!/usr/bin/env perl
use warnings;
use strict;
use Test::More;
use File::Find;
my @NO_TEST = ( qw( ) );
find(
sub {
return unless $_ =~ /\.pm$/;
my $module = $File::Find::name;
$module =~ s/\.pm//;
$module =~ s/lib\///;
$module =~ s/\//::/g;
next if grep { $_ eq $module } @NO_TEST;
use_ok( $module );
}, 'lib'
);
done_testing();

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the admin index page works as expected. # This test file ensures that the admin index page works as expected.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that an anonymouse user may not use the # This test ensures that an anonymouse user may not use the
# admin become functionality. # admin become functionality.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a regular user cannot use the admin become functionality. # This test ensures that a regular user cannot use the admin become functionality.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test confirms that an admin can login to a user account through the # This test confirms that an admin can login to a user account through the
# admin become functionality. # admin become functionality.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test confirms that an admin can login to a user account through the # This test confirms that an admin can login to a user account through the
# admin become functionality. # admin become functionality.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that people panel can be seen by admins, but not # This test file ensures that people panel can be seen by admins, but not
# normal or anonymouse users. # normal or anonymouse users.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that person panel can be seen by admins, but not # This test file ensures that person panel can be seen by admins, but not
# normal or anonymouse users. # normal or anonymouse users.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that notes can be added to a user's account. # This test file ensures that notes can be added to a user's account.
#== #==

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This file tests to make sure that the admin blog page has the correct access # This file tests to make sure that the admin blog page has the correct access
# rights and that there is an arrayref for blogs in the stash. # rights and that there is an arrayref for blogs in the stash.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that invite codes panel can be seen by admins, but not # This test file ensures that invite codes panel can be seen by admins, but not
# normal users or anonymouse users. # normal users or anonymouse users.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that invite codes can be added through the admin panel. # This test file ensures that invite codes can be added through the admin panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that invite codes can be removed through the admin panel. # This test file ensures that invite codes can be removed through the admin panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the /admin/servers page has the correct permissions # This test file ensures that the /admin/servers page has the correct permissions
# and has a server array in the stash. # and has a server array in the stash.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that servers can be added through the admin panel. # This test file ensures that servers can be added through the admin panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that servers can be removed through the admin panel. # This test file ensures that servers can be removed through the admin panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the /admin/domains page displays domains. # This test file ensures that the /admin/domains page displays domains.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that domains can be added through the admin panel. # This test file ensures that domains can be added through the admin panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that domains can be removed through the admin panel. # This test file ensures that domains can be removed through the admin panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the /admin/alerts page displays alerts. # This test file ensures that the /admin/alerts page displays alerts.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that we can mark alerts as read. # This test ensures that we can mark alerts as read.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that we can mark alerts as unread. # This test ensures that we can mark alerts as unread.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that we can remove alerts. # This test ensures that we can remove alerts.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the open registration redirect system works as expected. # This test file ensures that the open registration redirect system works as expected.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the open registration system works as expected. # This test file ensures that the open registration system works as expected.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the open registration system works as expected. # This test file ensures that the open registration system works as expected.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the invite registration system works as expected. # This test file ensures that the invite registration system works as expected.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test file ensures that the invite registration system works as expected. # This test file ensures that the invite registration system works as expected.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
my $t = Test::Mojo::MJB->new('MJB::Web'); my $t = Test::Mojo::MJB->new('MJB::Web');
## ##

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that login works. # This test ensures that login works.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that logout works. # This test ensures that logout works.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
my $t = Test::Mojo::MJB->new('MJB::Web'); my $t = Test::Mojo::MJB->new('MJB::Web');
#== #==

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the forgot password controller works correctly. # This test ensures that the forgot password controller works correctly.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the reset password controller works correctly. # This test ensures that the reset password controller works correctly.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the forgot password controller works correctly. # This test ensures that the forgot password controller works correctly.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# Test to ensure that the blog index page redirects to the page for # Test to ensure that the blog index page redirects to the page for
# creating the blog on a hosted page. # creating the blog on a hosted page.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# Ensure that the route for creating a blog on a hosted domain behaves # Ensure that the route for creating a blog on a hosted domain behaves
# as expected. Anonymouse users should be dismissed to the login page. # as expected. Anonymouse users should be dismissed to the login page.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# Ensure that the route for creating a blog on an owned domain behaves # Ensure that the route for creating a blog on an owned domain behaves
# as expected. Anonymouse users should be dismissed to the login page. # as expected. Anonymouse users should be dismissed to the login page.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog can be created with an owned domain. # This test ensures that a blog can be created with an owned domain.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog can be created with a hosted domain. # This test ensures that a blog can be created with a hosted domain.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the settings setup page exists after a blog # This test ensures that the settings setup page exists after a blog
# is created and can be accessed. # is created and can be accessed.

@ -3,6 +3,11 @@ use MJB::Web::Test;
use Mojo::File; use Mojo::File;
use YAML::XS qw( Load ); use YAML::XS qw( Load );
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the settings for a blog will take effect as part # This test ensures that the settings for a blog will take effect as part
# of the blog setup. # of the blog setup.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the dashboard index page works as expected. # This test ensures that the dashboard index page works as expected.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the blog index (info tab) page loads, # This test ensures that the blog index (info tab) page loads,
# and that correct blog is loaded into the stash.. # and that correct blog is loaded into the stash..

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the blog posts panel for the blog can be viewed. # This test ensures that the blog posts panel for the blog can be viewed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog post can be created in the creator panel. # This test ensures that a blog post can be created in the creator panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog post can be created. # This test ensures that a blog post can be created.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog post can be edited in the editor panel # This test ensures that a blog post can be edited in the editor panel
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog post can be edited. # This test ensures that a blog post can be edited.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog post can be edited in the alter panel # This test ensures that a blog post can be edited in the alter panel
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog post can be edited in the alter panel. # This test ensures that a blog post can be edited in the alter panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog post can be deleted through the panel.. # This test ensures that a blog post can be deleted through the panel..
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the settings panel for the blog can be viewed. # This test ensures that the settings panel for the blog can be viewed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the settings panel for the blog can be viewed. # This test ensures that the settings panel for the blog can be viewed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the config panel for the blog can be viewed. # This test ensures that the config panel for the blog can be viewed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the config panel for the blog can be used to # This test ensures that the config panel for the blog can be used to
# change the config/settings. # change the config/settings.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the jobs panel for the blog can be viewed. # This test ensures that the jobs panel for the blog can be viewed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the media panel for the blog can be viewed. # This test ensures that the media panel for the blog can be viewed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the media panel for the blog can be used # This test ensures that the media panel for the blog can be used
# to upload files. # to upload files.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the media panel for the blog can be used # This test ensures that the media panel for the blog can be used
# to remove upload files. # to remove upload files.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the blog history panel for the blog can be viewed. # This test ensures that the blog history panel for the blog can be viewed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the blog history panel for the blog can be used to # This test ensures that the blog history panel for the blog can be used to
# restore the state of an old commit. # restore the state of an old commit.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the blog pages panel for the blog can be viewed. # This test ensures that the blog pages panel for the blog can be viewed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog page creator panel can be viewed.. # This test ensures that a blog page creator panel can be viewed..
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog page can be created. # This test ensures that a blog page can be created.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog page can be opened in the editor panel. # This test ensures that a blog page can be opened in the editor panel.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog page can be edited. # This test ensures that a blog page can be edited.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that a blog page can be removed. # This test ensures that a blog page can be removed.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
my $t = Test::Mojo::MJB->new('MJB::Web'); my $t = Test::Mojo::MJB->new('MJB::Web');
# Home Page Exists # Home Page Exists

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
my $t = Test::Mojo::MJB->new('MJB::Web'); my $t = Test::Mojo::MJB->new('MJB::Web');
# About Page Exists # About Page Exists

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
my $t = Test::Mojo::MJB->new('MJB::Web'); my $t = Test::Mojo::MJB->new('MJB::Web');
# Contact Page Exists # Contact Page Exists

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the profile page displays the user's name and email # This test ensures that the profile page displays the user's name and email
# address. # address.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the profile page displays the user's name and email # This test ensures that the profile page displays the user's name and email
# address. # address.

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the password change page exists. # This test ensures that the password change page exists.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the password change page works as expected. # This test ensures that the password change page works as expected.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# This test ensures that the subscription page works. # This test ensures that the subscription page works.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# Ensure the handler exists for do_subscription. # Ensure the handler exists for do_subscription.
# #

@ -1,6 +1,11 @@
#!/usr/bin/env perl #!/usr/bin/env perl
use MJB::Web::Test; use MJB::Web::Test;
#==
# Initialize Testing Database
#==
MJB::Web::Test::enable_testing_database();
#== #==
# Ensure the handler exists for do_subscription_manage. # Ensure the handler exists for do_subscription_manage.
# #

Loading…
Cancel
Save