Don't compare arguments that can be nil

copy-region-as-kill can be called passing nil as `beg' and
`end'. Magit does that, which caused an error when this advice was in
effect.

* lisp/ses.el (ses--advice-copy-region-as-kill): avoid comparison
  unless `beg' and `end' are non-nil.

diff --git a/lisp/ses.el b/lisp/ses.el
index 4c19c70c5da3ace5149a4433353eab7d53c0dd3d..188992c78fbabc6d0eb96bbbedc8f804fb377628 100644 (file)
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -3051,7 +3051,7 @@ We'll assume copying front-sticky properties doesn't make sense, either.
 
 This advice also includes some SES-specific code because otherwise it's too
 hard to override how mouse-1 works."
-  (when (> beg end)
+  (when (and beg end (> beg end))
     (let ((temp beg))
       (setq beg end
            end temp)))