                           ((>= fill-column 120) 70)))
   (whitespace-mode -1)
   (whitespace-mode))
+
+(defconst me:powerline-separators #'( alternate arrow arrow-fade bar box brace butt chamfer contour curve rounded roundstub wave zigzag utf-8))
+(defvar me:current-powerline-separator-index 12)               ; current powerline separator index
+
+;; rotate the powerline seperator style
+(defun me:next-powerline-separator ()
+  (interactive)
+  (if (not me:current-powerline-separator-index)
+      (setq me:current-powerline-separator-index 0))
+  (setq me:current-powerline-separator-index (% (+ me:current-powerline-separator-index 1) (length me:powerline-separators)))
+  (setq powerline-default-separator (nth me:current-powerline-separator-index me:powerline-separators))
+  (message "%s" powerline-default-separator)
+  (spaceline-compile))
 
 
 ;; configuration I haven't figured out how to wedge into

      :defer 2
      :init
      (setq font-lock-maximum-decoration (quote ((dired-mode . nil) (t . t)))   ; turn off barf colors
            diredp-hide-details-initially_flag t
            diredp-image-preview-in-tooltip 400
            diredp-auto-focus-frame-for-thumbnail-tooltip-flag t)))
  :ensure nil)

;; n.b. buffer-face-mode screws up completion popups
;; may be fixed in 25.1 or so
(use-package adoc-mode
  :defines (company-dabbrev-downcase company-dabbrev-ignore-case)
  :init
  (progn
    (defun me:adoc-mode-flyspell-verify ()
