[nongnu] elpa/macrostep 2390cec 075/110: slime-sexp-at-point may return nil, deal with it

[ELPA Syncer]

branch: elpa/macrostep
commit 2390cec66667f56313cf71bed1e3a17f73af0247
Author: Luís Oliveira <loliveira@common-lisp.net>
Commit: Luís Oliveira <loliveira@common-lisp.net>

    slime-sexp-at-point may return nil, deal with it
    
    (in macrostep-slime-macro-form-p)
---
 macrostep.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/macrostep.el b/macrostep.el
index ebf01d4..5bb1830 100644
--- a/macrostep.el
+++ b/macrostep.el
@@ -985,9 +985,10 @@ sub-forms.  See also `macrostep-sexp-at-point'."
                                  'macrostep-compiler-macro-face)))))))
 
 (defun macrostep-slime-macro-form-p (string)
-  (slime-eval
-   `(swank-macrostep:macro-form-p
-     ,string nil ,macrostep-expand-compiler-macros)))
+  (when string
+    (slime-eval
+     `(swank-macrostep:macro-form-p
+       ,string nil ,macrostep-expand-compiler-macros))))
 
 (defun macrostep-slime-environment-at-point ()
   (save-excursion