move button to cont-utils

contrib/cont-responder/cont-utils.factor

@@ -62,3 +62,7 @@ USE: stack
   <table> [
     <tr valign= "top" tr> [ [ <td> [ call ] </td> ] each ] </tr>
   ] </table> ;
+
+: button ( label -- )
+  #! Output an HTML submit button with the given label.
+  <input type= "submit" value= input/> ;

contrib/cont-responder/todo-example.factor

@@ -70,10 +70,6 @@ USE: todo
   #! specified name.
   <input type= "password" size= "20" name= input/> ;
 
-: button ( label -- )
-  #! Output an HTML submit button with the given label.
-  <input type= "submit" value= input/> ;
-
 : form ( action quot  -- )
   #! Call quot with any output appearing inside an HTML form.
   #! The form is a POST form where the action is as specified.