Fix off-by-one error in clang-format's emacs integration.

git-svn-id: https://llvm.org/svn/llvm-project/cfe/trunk@182395 91177308-0d34-0410-b5e6-96231b3b80d8

diff --git a/tools/clang-format/clang-format.el b/tools/clang-format/clang-format.el
index af69118aa2d5c0a630b392ec08181cccabdfc3dd..48fe36f2e5635a7c758b682e8d18502c8f54656c 100644 (file)
--- a/tools/clang-format/clang-format.el
+++ b/tools/clang-format/clang-format.el
@@ -40,14 +40,14 @@
         (call-process-region (point-min) (point-max) clang-format-binary t t nil
                              "-offset" (number-to-string (1- begin))
                              "-length" (number-to-string (- end begin))
-                             "-cursor" (number-to-string (point))
+                             "-cursor" (number-to-string (1- (point)))
                              "-style" style)
       (goto-char (point-min))
       (let ((json-output (json-read-from-string
                            (buffer-substring-no-properties
                              (point-min) (line-beginning-position 2)))))
         (delete-region (point-min) (line-beginning-position 2))
-        (goto-char (cdr (assoc 'Cursor json-output)))
+        (goto-char (1+ (cdr (assoc 'Cursor json-output))))
         (dotimes (index (length orig-windows))
           (set-window-start (nth index orig-windows)
                             (nth index orig-window-starts)))))))