--- loncom/interface/loncommon.pm	2023/05/22 21:10:55	1.1405
+++ loncom/interface/loncommon.pm	2023/06/10 23:55:36	1.1406
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.1405 2023/05/22 21:10:55 raeburn Exp $
+# $Id: loncommon.pm,v 1.1406 2023/06/10 23:55:36 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -6376,7 +6376,7 @@ Returns: HTML div with CSTR path and rec
 =cut
 
 sub CSTR_pageheader {
-    my ($trailfile,$frameset) = @_;
+    my ($trailfile,$frameset,$title,$diraction) = @_;
     if ($trailfile eq '') {
         $trailfile = $env{'request.filename'};
     }
@@ -6399,13 +6399,15 @@ sub CSTR_pageheader {
         $lastitem = $thisdisfn;
     }
 
-    my ($crsauthor,$title);
+    my $crsauthor;
     if (($env{'request.course.id'}) &&
         ($env{'course.'.$env{'request.course.id'}.'.num'} eq $uname) &&
         ($env{'course.'.$env{'request.course.id'}.'.domain'} eq $udom)) {
         $crsauthor = 1;
-        $title = &mt('Course Authoring Space');
-    } else {
+        if ($title eq '') {
+            $title = &mt('Course Authoring Space');
+        }
+    } elsif ($title eq '') {
         $title = &mt('Authoring Space');
     }
 
@@ -6422,7 +6424,7 @@ sub CSTR_pageheader {
     }
 
     my $output =
-         '<div>'
+         '<div style="display:inline-block">'
         .&Apache::loncommon::help_open_menu('','',3,'Authoring') #FIXME: Broken? Where is it?
         .'<b>'.$title.'</b> '
         .'<form name="dirs" method="post" action="'.$formaction.'"'.$target.'>'
@@ -6445,7 +6447,7 @@ sub CSTR_pageheader {
             .'</form>'
             .&Apache::lonmenu::constspaceform($frameset);
     }
-    $output .= '</div>';
+    $output .= '</div>'.$diraction;
 
     return $output;
 }