--- loncom/interface/lonaboutme.pm	2009/03/21 22:18:29	1.116
+++ loncom/interface/lonaboutme.pm	2009/03/27 04:59:30	1.117
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Personal Information Page
 #
-# $Id: lonaboutme.pm,v 1.116 2009/03/21 22:18:29 bisitz Exp $
+# $Id: lonaboutme.pm,v 1.117 2009/03/27 04:59:30 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -255,6 +255,12 @@ if  ($target ne 'tex') {
 				&Apache::lontemplate::print_functions_content($r,&Apache::loncommon::track_student_link('View recent activity by this student',
 			  	 	$cnum,$cdom).(' 'x2));
 	    		}
+                        if (&Apache::lonnet::allowed('vgr', $env{'request.course.id'}) || 
+                            &Apache::lonnet::allowed('vgr', $env{'request.course.id'}.'/'.
+                                                     $env{'request.course.sec'})) {
+                            &Apache::lontemplate::print_functions_content($r,&Apache::loncommon::slot_reservations_link('Slot reservation history',
+                                        $cnum,$cdom).(' 'x2));
+                        }
 	    		&Apache::lontemplate::print_functions_content($r,&Apache::loncommon::noteswrapper(&mt('Add Records'),$cnum,$cdom));
 		}
 	&Apache::lontemplate::print_end_page_functions($r);