--- loncom/interface/loncommon.pm	2013/07/22 11:46:23	1.1141
+++ loncom/interface/loncommon.pm	2013/07/22 20:50:01	1.1142
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.1141 2013/07/22 11:46:23 raeburn Exp $
+# $Id: loncommon.pm,v 1.1142 2013/07/22 20:50:01 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3074,6 +3074,8 @@ sub get_related_words {
 
 =pod
 
+=back
+
 =head1 Spell checking
 
 =over 4
@@ -3107,12 +3109,6 @@ Note: This sub assumes that aspell is in
 =cut
 
 
-=pod
-
-=back
-
-=cut
-
 sub check_spelling {
     my ($wordlist, $language) = @_;
     my @misspellings;
@@ -3328,7 +3324,7 @@ sub screenname {
 # ------------------------------------------------------------- Confirm Wrapper
 =pod
 
-=item confirmwrapper
+=item * &confirmwrapper($message)
 
 Wrap messages about completion of operation in box
 
@@ -8786,6 +8782,7 @@ Retrieves default quota assigned for sto
 given an (optional) user's institutional status.
 
 Incoming parameters:
+
 1. domain
 2. (Optional) institutional status(es).  This is a : separated list of 
    status types (e.g., faculty, staff, student etc.)
@@ -8796,6 +8793,7 @@ Incoming parameters:
    (if no quota name provided, defaults to portfolio).
 
 Returns:
+
 1. Default disk quota (in Mb) for user portfolios in the domain.
 2. (Optional) institutional type which determined the value of the
    default quota.
@@ -8809,8 +8807,6 @@ If the user's status includes multiple t
 the largest default quota which applies to the user determines the
 default quota returned.
 
-=back
-
 =cut
 
 ###############################################
@@ -8902,7 +8898,9 @@ Inputs: 6
 6. action being taken: copy or upload.
 
 Returns: 1 scalar: HTML to display containing warning if quota would be exceeded,
-         otherwise return null. 
+         otherwise return null.
+
+=back
 
 =cut