diff options
| author |  Tom Willemse | 2015-06-29 13:16:38 +0200 |
|---|---|---|
| committer | Tom Willemse | 2015-06-29 13:16:38 +0200 |
| commit | eb0dd101266b038be18f0811e606f32fcc428e2e (patch) | |
| tree | 0960437ef20fedffec8d40c5ff4b10e87c61d267 /emacs/.emacs.d/init.org | |
| parent | 61976703e70731f8d5a83b5cf9a33b32e00e1fc1 (diff) | |
| download | dotfiles-eb0dd101266b038be18f0811e606f32fcc428e2e.tar.gz dotfiles-eb0dd101266b038be18f0811e606f32fcc428e2e.zip | |
Fix warning about `in-string-p'
Diffstat (limited to 'emacs/.emacs.d/init.org')
| -rw-r--r-- | emacs/.emacs.d/init.org | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/emacs/.emacs.d/init.org b/emacs/.emacs.d/init.org index 2c7fa7a..a7c2248 100644 --- a/emacs/.emacs.d/init.org +++ b/emacs/.emacs.d/init.org @@ -939,11 +939,11 @@ (defun oni:delete-string-contents () (interactive) - (unless (in-string-p) + (unless (nth 3 (syntax-ppss)) (error "You must be in a string for this command to work")) (save-excursion - (while (in-string-p) (forward-char -1)) + (while (nth 3 (syntax-ppss)) (forward-char -1)) (let ((bos (point))) (forward-sexp) |