[Nautilus-list] RE: [PATCH] Text view Patch

[Peter Snyder <kafer77a ameritech net>]

Ok, here is a proper one.

Pete

PS. if anyone doubted that this was my first submission, you no longet have any excuse 

--- nautilus-1.0.5/components/text/nautilus-text-view.c	Thu Oct  4 11:26:40 2001
+++ nautilus-1.0.5-devel/components/text/nautilus-text-view.c	Mon Oct 22 06:58:06 2001
@@ -148,6 +148,7 @@
 nautilus_text_view_initialize (NautilusTextView *text_view)
 {
 	GtkWidget *scrolled_window;
+	GtkWidget *disclamer;
 	
 	text_view->details = g_new0 (NautilusTextViewDetails, 1);
 
@@ -182,9 +183,18 @@
 			    text_view_load_location_callback, 
 			    text_view);
 			    	
+
 	/* allocate a vbox to contain the text widget */
 	text_view->details->container = gtk_vbox_new (FALSE, 0);
 	gtk_container_set_border_width (GTK_CONTAINER (text_view->details->container), 0);
+	
+	/* Create label and place it in frame if user level is set to "Beginner"*/
+		
+	disclamer = gtk_label_new("This text is read only\n  To edit it, choose an option from the sidebar");
+	eel_gtk_label_make_larger (GTK_LABEL(disclamer), 3);
+	eel_gtk_label_make_bold (GTK_LABEL(disclamer));
+	gtk_box_pack_start (GTK_BOX (text_view->details->container), GTK_WIDGET (disclamer), FALSE, FALSE, FALSE);
+	
 	gtk_container_add (GTK_CONTAINER (text_view->details->event_box), GTK_WIDGET (text_view->details->container));
 	
 	/* allocate the text object */