diff --git a/sequencer/src/phrase.C b/sequencer/src/phrase.C
index 1aa7424..2d5ba68 100644
--- a/sequencer/src/phrase.C
+++ b/sequencer/src/phrase.C
@@ -126,13 +126,8 @@ phrase::by_number ( int n ) const
 }
 
 void
-phrase::put ( int x, int y, tick_t l )
+phrase::put ( int x, int y, tick_t l, int velocity )
 {
-    // FIXME: fix insertion length to the length of the pattern
-    // referred to by this row.
-
-    l = 4;
-
     // FIXME: use translation here.
     pattern *p = pattern::pattern_by_number( y + 1 );
 
diff --git a/sequencer/src/phrase.H b/sequencer/src/phrase.H
index b2351ab..24cdd03 100644
--- a/sequencer/src/phrase.H
+++ b/sequencer/src/phrase.H
@@ -51,7 +51,7 @@ public:
     phrase *create ( void );
     phrase * by_number ( int n ) const;
 
-    void put ( int x, int y, tick_t l );
+    virtual void put ( int x, int y, tick_t l, int velocity = 64 );
     phrase * clone ( void );
     const char * row_name ( int r ) const;
     void draw_row_names ( Canvas *c ) const;