Simplify cat-port.

* cat.scm (cat-port): Use optional arguments instead of case-lambda
  since all it's currently doing is supplying default arguments.