diff --git a/lisp/init-elisp.el b/lisp/init-elisp.el
index 8a09492..ed5b7fd 100644
--- a/lisp/init-elisp.el
+++ b/lisp/init-elisp.el
@@ -47,7 +47,13 @@
   (interactive)
   (progn
     (if mark-active
-        (eval-region)
+        (progn
+          (let ((beg (mark))
+                (end (point)))
+            (when (> beg end) ;; point and mark are reversed
+              (setq beg (point)
+                    end (mark)))
+            (eval-region beg end)))
       (eval-buffer))))
 
 (defun ff ()