fix a bug in (jda-kill-ring-save)

* does not work well in emacs 22.1.1
* to resolve that, if (use-region-p) does not exist,
  use (kill-ring-save)