Customize fringes

Still to think about: changing the `fringe' face.  Do I want it another color?
Do I even need any buffer boundaries?  Hm....

1 files changed, 26 insertions, 0 deletions

@@ -206,6 +206,32 @@ Prompt only if there are unsaved changes."
     (run-at-time sunset-time (* 60 60 24) sunset-command)
     (run-at-time "12:00am" (* 60 60 24) sunset-command)))
 
+(defun acdw/setup-fringes ()
+  "Set up fringes how I likes 'em."
+  (define-fringe-bitmap 'left-curly-arrow
+    [#b01100000
+     #b00110000
+     #b00011000
+     #b00001100]
+    4 8 'center)
+  (define-fringe-bitmap 'right-curly-arrow
+    [#b00000011
+     #b00000110
+     #b00001100
+     #b00011000]
+    4 8 'center)
+  (define-fringe-bitmap 'left-arrow
+    [#b01100000
+     #b01010000]
+    2 8 '(top t))
+  (define-fringe-bitmap 'right-arrow
+    [#b00000011
+     #b00000101]
+    2 8 '(top t))
+  (setq-local indicate-empty-lines nil
+              indicate-buffer-boundaries '((top . right)
+                                           (bottom . right))))
+
 
 ;;; Keymaps