diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2024-05-10 16:36:50 +0100 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2024-05-10 16:36:56 +0100 |
| commit | 8a150fc566fe188bd46f4acfe959a610f45b2094 (patch) | |
| tree | 1fb4184db5bdf9cb64376facd39638407409020e /.emacs.d/init.el | |
| parent | c79eb3edc2c7a0ffa644cd0cbf14412764b7ee80 (diff) | |
| download | dotfiles-8a150fc566fe188bd46f4acfe959a610f45b2094.tar.gz | |
try having C-c e / C-c j work from point
Can type M-a first to obtain the old behaviour.
Diffstat (limited to '.emacs.d/init.el')
| -rw-r--r-- | .emacs.d/init.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 84476a3e..06e572c6 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -2700,7 +2700,7 @@ Called by '~/src/dotfiles/bin/emacsclient --spw/update-environment'." (interactive) (let ((string (ignore-errors (cdr (bounds-of-thing-at-point 'string))))) (fill-region-as-paragraph - (car (bounds-of-thing-at-point 'sentence)) + (point) (cond (string (min string (cdr (bounds-of-thing-at-point 'paragraph)))) ((cl-fifth (syntax-ppss)) (min (cdr (bounds-of-thing-at-point 'paragraph)) |