(sh-get-indent-info):

Don't move point back if at bob.

diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index e63dda1..a23dc0a 100644 (file)
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -2052,7 +2052,8 @@ STRING         This is ignored for the purposes of calculating
                    (progn
                      (setq result (append result val))
                      (setq align-point (point))))
-               (forward-char -1)
+               (or (bobp)
+                   (forward-char -1))
                (skip-chars-forward "[a-z0-9]*?")
                )
               ((string-match "[])}]" x)