changed POD formatting

lib/WebGUI/Operation/Page.pm

@@ -69,14 +69,10 @@ sub _changeWobjectPrivileges {
 This private function set an entire subtree with $page as root to the same privilege and/or 
 style settings. These properties are set to be a duplicate of those in page.
 
-=over
-
-=item page
+=head3 page
 
 This is the page whose ancestors should be changed. This must be an WebGUI::Page instance.
 
-=back
-
 =cut
 # This combines _recusivelyChangePrivileges and _recusivelyChangeStyle, since there's no use in walking down a tree twice.
 sub _recursivelyChangeProperties {
@@ -179,18 +175,14 @@ sub _selectPositions {
 Walks down the page tree from page with id pageId and returns an indented list of the pages it
 walks over. Also prints edit/delete/move buttons.
 
-=item pageId
+=head3 pageId
 
 The id of the page you want to start from
 
-=item initialDepth
+=head3 initialDepth
 
 The depth the tree should start with. Defaults to zero.
 
-=over
-
-=back
-
 =cut
 sub _traversePageTree {
         my (%wobject, $output, $spacer, $page, $currentPage, $options, $currentPageId, $currentUrlizedTitle, $wobjects);
@@ -232,8 +224,6 @@ sub _traversePageTree {
 This will cut the page defined by $session{page}{pageId} (ie. the current page) and all it's
 children from the pagetree and place it on the clipboard.
 
-=back
-
 =cut
 sub www_cutPage {
 	my ($page);
@@ -256,8 +246,6 @@ sub www_cutPage {
 
 This function returns an 'Are you sure' page for moving the page to the trash.
 
-=back
-
 =cut
 sub www_deletePage {
 	my ($output);
@@ -282,8 +270,6 @@ sub www_deletePage {
 
 Actually transfers the page to the trash.
 
-=back 
-
 =cut
 sub www_deletePageConfirm {
         if ($session{page}{isSystem}) {
@@ -303,8 +289,6 @@ sub www_deletePageConfirm {
 
 Displays the properties for a page.
 
-=back
-
 =cut
 sub www_editPage {
         my ($f, $endDate, $output, $subtext, $childCount, %hash, %page);
@@ -550,8 +534,6 @@ sub www_editPage {
 
 Stores the data from www_editPage to the database and tree cache.
 
-=back
-
 =cut
 sub www_editPageSave {
         my ($pageId, $currentPage, $page);
@@ -619,8 +601,6 @@ sub www_editPageSave {
 
 Displays the export page administrative interface
 
-=back
-
 =cut
 
 sub www_exportPage {
@@ -672,8 +652,6 @@ sub www_exportPage {
 
 Displays the export status page
 
-=back
-
 =cut
 
 
@@ -705,8 +683,6 @@ sub www_exportPageStatus {
 Executes the export process and displays real time status. This operation is displayed
 by exportPageStatus in an IFRAME.
 
-=back
-
 =cut
 
 
@@ -800,8 +776,6 @@ sub _checkExportPath {
 
 Moves page down in the context of it's sisters.
 
-=back
-
 =cut
 sub www_movePageDown {
   if (WebGUI::Page::canEdit($session{page}{pageId})) {
@@ -818,8 +792,6 @@ sub www_movePageDown {
 
 Moves page up in the context of it's sisters.
 
-=back
-
 =cut
 sub www_movePageUp {
   if (WebGUI::Page::canEdit($session{page}{pageId})) {
@@ -836,8 +808,6 @@ sub www_movePageUp {
 
 Same as www_movePageUp wit this difference that this module returns the www_viewPageTree method.
 
-=back
-
 =cut
 sub www_moveTreePageUp {
   if (WebGUI::Page::canEdit($session{form}{pageId})) {
@@ -853,8 +823,6 @@ sub www_moveTreePageUp {
 
 Same as www_movePageDown with this difference that this module returns the www_viewPageTree method.
 
-=back
-
 =cut
 sub www_moveTreePageDown {
   if (WebGUI::Page::canEdit($session{form}{pageId})) {
@@ -871,8 +839,6 @@ sub www_moveTreePageDown {
 Move the page one level left in the tree. In other words, the page is moved up one place in the hierarchy.
 Another way to look at is that the mother of the current page becomes the elder sister of the current page.
 
-=back
-
 =cut
 sub www_moveTreePageLeft {
   if (WebGUI::Page::canEdit($session{form}{pageId})) {
@@ -935,8 +901,6 @@ sub www_rearrangeWobjects {
 
 Returns a HTML formatted indented pagetree complete with edit/delete/cut/move buttons
 
-=back
-
 =cut
 sub www_viewPageTree {
 	my ($output);

lib/WebGUI/Operation/Profile.pm

@@ -86,14 +86,10 @@ sub getRequiredProfileFields {
  Checks the value of the email address passed in to see if it is duplicated in the system.  Returns true of false.  Will return false if the email address passed in is
  same as the email address of the current user.
  
-=over
-
-=item email
+=head3 email
    
    email address to check for duplication
 
-=back
-
 =cut
 
 sub isDuplicateEmail {