Keep number of rows on phrase canvas in sync with the number of patterns.

src/gui/ui.fl

@@ -1168,6 +1168,10 @@ else
 if ( ! g )
 	return;
 	
+g->viewport.y = 0;
+g->viewport.h = pattern::patterns();
+phrase_c->resize_grid();
+phrase_c->changed_mapping();
 phrase_number_spinner->value( g->number() );
 phrase_name_field->value( g->name() );
 phrase_solo_button->value( g->mode() == SOLO );

src/pattern.C

@@ -34,7 +34,6 @@ signal <void> pattern::signal_create_destroy;
 
 pattern::pattern ( void )
 {
-
     viewport.h = 32;
     viewport.w = 32;
 

src/phrase.C

@@ -28,7 +28,6 @@ signal <void> phrase::signal_create_destroy;
 
 phrase::phrase ( void )
 {
-
     viewport.h = 32;
     viewport.w = 32;
 
@@ -151,7 +150,7 @@ phrase::row_name ( int r ) const
 void
 phrase::draw_row_names ( Canvas *c ) const
 {
-    for ( int y = 128; y-- ; )
+    for ( int y = viewport.h; y--; )
     {
         pattern *p = pattern::pattern_by_number( y + 1 );