package and shadow prob

[swood@zip.eecs.umich.edu]

I'm trying to modify an OPS5 package to run under 2.0, but am confused
as to the proper way to use the package and shadow functions.  Currently,
the file is set up as:

 ; -*- Mode: Lisp; Package: Ops -*-
 (cl:defpackage ops)
 (cl:in-package :ops)

 ...

 (shadow '(remove write) (find-package 'ops))

 (defmacro remove (&body z)
  `(ops-remove ',z))

 ...

It compiles ok with a few unrelated warnings, but when entering 

 (require :ops)    from the listener, I get redefine warnings.
Can someone enlighten me as to the correct way to do this?  Thanks.

swood@z.eecs.umich.edu