aboutsummaryrefslogtreecommitdiffstats
path: root/test/automated/python-tests.el
diff options
context:
space:
mode:
authorFabián Ezequiel Gallina2014-12-27 17:22:29 -0300
committerFabián Ezequiel Gallina2014-12-27 17:22:29 -0300
commit433af0a06089885f5a57ef0f3e7d6283e8d51bd5 (patch)
tree982766b3e0d415584d1d06c08b5cebb1bc16dd47 /test/automated/python-tests.el
parenta5f38fa1cc8eafe13f2073ebfaa8205b5e919d17 (diff)
downloademacs-433af0a06089885f5a57ef0f3e7d6283e8d51bd5.tar.gz
emacs-433af0a06089885f5a57ef0f3e7d6283e8d51bd5.zip
* lisp/progmodes/python.el (python-shell-buffer-substring): Handle
cornercase when region sent starts at point-min.
Diffstat (limited to 'test/automated/python-tests.el')
-rw-r--r--test/automated/python-tests.el21
1 files changed, 21 insertions, 0 deletions
diff --git a/test/automated/python-tests.el b/test/automated/python-tests.el
index 8fcda58e1e0..a4948571242 100644
--- a/test/automated/python-tests.el
+++ b/test/automated/python-tests.el
@@ -2651,6 +2651,27 @@ class Foo(models.Model):
2651 pass 2651 pass
2652")))) 2652"))))
2653 2653
2654(ert-deftest python-shell-buffer-substring-9 ()
2655 "Check substring starting from `point-min'."
2656 (python-tests-with-temp-buffer
2657 "# coding: utf-8
2658
2659class Foo(models.Model):
2660 pass
2661
2662class Bar(models.Model):
2663 pass
2664"
2665 (should (string= (python-shell-buffer-substring
2666 (point-min)
2667 (python-tests-look-at "class Bar(models.Model):"))
2668 "# coding: utf-8
2669
2670class Foo(models.Model):
2671 pass
2672
2673"))))
2674
2654 2675
2655;;; Shell completion 2676;;; Shell completion
2656 2677