Allow bitmap width only up to 16 (#49)

diff --git a/README.md b/README.md
index 0f9fe6481ab4b0a6f1830fa6284846c4786fc97a..a0d5168a53d56e4abdfbf3da18c67f1fab59717f 100644 (file)
--- a/README.md
+++ b/README.md
@@ -63,6 +63,9 @@ Notes
 \r
 * Frame-local and buffer-local values of `line-spacing` are not supported.\r
 \r
+* Fringe width up to 16 works best (because we can't define a bitmap\r
+  with width above that number).\r
+\r
 * [emacs-git-gutter](https://github.com/syohex/emacs-git-gutter) shows\r
   indicators in the margin by default, allows you to customize how the\r
   indicators look more easily, and has a "stage hunk" command.\r

diff --git a/diff-hl.el b/diff-hl.el
index 17106c11f05d5813254c58e1e7092e1455a7ea34..5b6510d557c62e9f398350f928889094ecf69ec2 100644 (file)
--- a/diff-hl.el
+++ b/diff-hl.el
@@ -140,7 +140,8 @@
                (if (floatp spacing)
                    (truncate (* (frame-char-height) spacing))
                  spacing)))
-         (w (frame-parameter nil (intern (format "%s-fringe" diff-hl-side))))
+         (w (min (frame-parameter nil (intern (format "%s-fringe" diff-hl-side)))
+                 16))
          (middle (make-vector h (expt 2 (1- w))))
          (ones (1- (expt 2 w)))
          (top (copy-sequence middle))