--- loncom/interface/loncommon.pm	2012/08/03 17:35:32	1.1075.2.12
+++ loncom/interface/loncommon.pm	2012/08/07 13:15:28	1.1075.2.13
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.1075.2.12 2012/08/03 17:35:32 raeburn Exp $
+# $Id: loncommon.pm,v 1.1075.2.13 2012/08/07 13:15:28 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -5052,12 +5052,13 @@ sub bodytag {
     $role = '<span class="LC_nobreak">('.$role.')</span>' if $role;
     &get_unprocessed_cgi($ENV{'QUERY_STRING'}, ['inhibitmenu']);
 
-    unless ($env{'environment.remote'} eq 'on') {
-        if ($no_nav_bar || $env{'form.inhibitmenu'} eq 'yes') { 
-            return $bodytag; 
-        } 
+    if ($no_nav_bar || $env{'form.inhibitmenu'} eq 'yes') { 
+        return $bodytag; 
+    }
 
-        if ($env{'request.state'} eq 'construct') { $forcereg=1; }
+    if ($env{'request.state'} eq 'construct') { $forcereg=1; }
+
+    unless ($env{'environment.remote'} eq 'on') {
 
         #    if ($env{'request.state'} eq 'construct') {
         #        $titleinfo = &CSTR_pageheader(); #FIXME: Will be removed once all scripts have their own calls
@@ -5135,6 +5136,18 @@ sub bodytag {
                        <li>$menu</li>
                        </ol><div id="LC_realm"> $realm $dc_info</div>|;
     }
+    my $funclist;
+    if ($env{'request.state'} eq 'construct') {
+        if (!$public){
+            if ($env{'request.state'} eq 'construct') {
+                $funclist = &Apache::lonhtmlcommon::scripttag(
+                                &Apache::lonmenu::utilityfunctions(), 'start').
+                            &Apache::lonhtmlcommon::scripttag('','end').
+                            &Apache::lonmenu::innerregister($forcereg,
+                                                            $args->{'bread_crumbs'});
+            }
+        }
+    }
     return(<<ENDBODY);
 $bodytag
 <table id="LC_title_bar" class="LC_with_remote">
@@ -5144,6 +5157,7 @@ $bodytag
 <tr><td>$titleinfo $dc_info $menu</td>
 </tr>
 </table>
+$funclist
 ENDBODY
 }