X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fselect.el;h=b185dea27388e587421a9d364dc7407e1aa8e280;hb=e41b671ad8ef8f9d0464058e49a3a1ff9a5e4d4d;hp=d654ea7fa36446dc72642953b6d8c8f4fbe09bcd;hpb=042cabb13b0419d8aa5cfac9e087d78730d1dbc7;p=chise%2Fxemacs-chise.git.1 diff --git a/lisp/select.el b/lisp/select.el index d654ea7..b185dea 100644 --- a/lisp/select.el +++ b/lisp/select.el @@ -210,8 +210,9 @@ See `interprogram-cut-function' for more information." (own-selection string 'CLIPBOARD)) (defun disown-selection (&optional secondary-p) - "Assuming we own the selection, disown it. With an argument, discard the -secondary selection instead of the primary selection." + "Assuming we own the selection, disown it. +With an argument, discard the secondary selection instead of the +primary selection." (disown-selection-internal (if secondary-p 'SECONDARY 'PRIMARY)) (when (and selection-sets-clipboard (or (not secondary-p)