[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/smalltalk-mode a7e8c36 14/34: fix smalltalk-scope-begin
From: |
Stefan Monnier |
Subject: |
[elpa] externals/smalltalk-mode a7e8c36 14/34: fix smalltalk-scope-begin-of-defun |
Date: |
Tue, 9 Apr 2019 22:30:43 -0400 (EDT) |
branch: externals/smalltalk-mode
commit a7e8c36f2b34685b9e3b03e776d46111264c2f50
Author: Mathieu Suen <address@hidden>
Commit: Paolo Bonzini <address@hidden>
fix smalltalk-scope-begin-of-defun
---
smalltalk-mode.el | 17 ++++++++++++++---
1 file changed, 14 insertions(+), 3 deletions(-)
diff --git a/smalltalk-mode.el b/smalltalk-mode.el
index 20c9fa7..2e84435 100644
--- a/smalltalk-mode.el
+++ b/smalltalk-mode.el
@@ -261,9 +261,20 @@
(forward-sexp 1))
(error t))
(if prev
- (progn (goto-char prev)
- (beginning-of-line)
- (skip-chars-forward " \t"))
+ (progn
+ (goto-char prev)
+ (condition-case nil
+ (progn
+ (forward-sexp 1)
+ (if (and (< (point) here)
+ (= (char-before) ?]))
+ (progn
+ (skip-syntax-forward " \t")
+ (setq prev (point)))))
+ (error t))
+ (goto-char prev)
+ (beginning-of-line)
+ (skip-chars-forward " \t"))
(goto-char start))))))
(defun smalltalk-begin-of-defun ()
- [elpa] branch externals/smalltalk-mode created (now 453b7f5), Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 381d6ed 02/34: update FSF address, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode c39c42b 07/34: set comint-use-prompt-regexp, patch from Nick Gasson, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 71cd97f 11/34: update copyright years, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 6a18dea 23/34: change defun* to defun, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 2633e7a 18/34: recognize class declaration with explicit namespace in the superclass, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode a7e8c36 14/34: fix smalltalk-scope-begin-of-defun,
Stefan Monnier <=
- [elpa] externals/smalltalk-mode 0448eaa 08/34: merge from stephen, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 320dcae 15/34: fix indent and smalltalk-at-begin-of-{defun|scope}, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode fb9072e 04/34: add gst-prog-name, patch from Stephen Compall, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode c8ce0e0 16/34: disable generational GC on sparc, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 4a29da5 31/34: Highlight ^ as a keyword, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 27c9a1a 09/34: update copyright from 2.3.6 release, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode c95682c 24/34: correct defun* -> defun patch, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 57c7cfa 20/34: fix smalltalk-mode.el to work in emacs 22, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 4160554 12/34: simplify installation of Emacs modes, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 90f07e6 32/34: Move smalltalk-mode autoloads to smalltalk-mode, Stefan Monnier, 2019/04/09