X-Git-Url: http://gitweb.hugovil.com/?a=blobdiff_plain;f=src%2Fpgmwin.c;h=7bf0eb98af88bdd0b30bd4d6f6ca550e3f50f4cb;hb=bd7fa9a1fba21965467664b72772dddc5e9e0884;hp=cd4cfde88c20e775d830bccd6648a4d7a401b602;hpb=d75d156ebcb9015d2fb15698d94e9cb04fa7966f;p=emu8051.git

diff --git a/src/pgmwin.c b/src/pgmwin.c
index cd4cfde..7bf0eb9 100644
--- a/src/pgmwin.c
+++ b/src/pgmwin.c
@@ -80,22 +80,24 @@ pgmwin_ButtonPressEvent(GtkWidget *widget, GdkEvent *event, gpointer data)
 
 
 GtkWidget *
-pgmwin_init(int width, int height)
+pgmwin_init(void)
 {
 	int i;
-	GtkWidget *fixed_frame;
+	GtkWidget *scrollwin;
 
-	fixed_frame = gtk_frame_new(0);
-	gtk_frame_set_shadow_type(GTK_FRAME(fixed_frame),
-				  GTK_SHADOW_ETCHED_OUT);
-	gtk_widget_set_size_request(GTK_WIDGET(fixed_frame), width, height);
+	scrollwin = gtk_scrolled_window_new(NULL, NULL);
+	gtk_scrolled_window_set_shadow_type(GTK_SCROLLED_WINDOW(scrollwin),
+					    GTK_SHADOW_ETCHED_OUT);
+
+	/* Automatically add scrollbars when necessary. */
+	gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrollwin),
+				       GTK_POLICY_AUTOMATIC,
+				       GTK_POLICY_AUTOMATIC);
 
 	pgmclist = gtk_clist_new(1);
 	gtk_clist_set_selection_mode(GTK_CLIST(pgmclist), GTK_SELECTION_SINGLE);
-	gtk_widget_set_size_request(GTK_WIDGET(pgmclist), width, height);
 	gtk_clist_set_column_justification(GTK_CLIST(pgmclist), 0,
 					   GTK_JUSTIFY_LEFT);
-	gtk_clist_set_column_width(GTK_CLIST(pgmclist), 0, width-10);
 
 	PangoFontDescription *pango_font;
 	pango_font = pango_font_description_from_string(FIXED_FONT);
@@ -105,10 +107,10 @@ pgmwin_init(int width, int height)
 	for (i = 0; i < 24; i++)
 		gtk_clist_append(GTK_CLIST(pgmclist), pgmdummy);
 
-	gtk_container_add(GTK_CONTAINER(fixed_frame), pgmclist);
+	gtk_container_add(GTK_CONTAINER(scrollwin), pgmclist);
 
 	gtk_signal_connect(GTK_OBJECT(pgmclist), "button-press-event",
 			   GTK_SIGNAL_FUNC(pgmwin_ButtonPressEvent), NULL);
 
-	return fixed_frame;
+	return scrollwin;
 }