Toggle lines-tail in whitespace-style in whitespace-mode

toggle-lines-tail.el

(require 'whitespace)
(defun toggle-lines-tail ()
  (interactive)
  (let ((vic (member 'lines-tail whitespace-style)))
    (progn
      (if vic
          (setq whitespace-style (delete 'lines-tail whitespace-style))
        (add-to-list 'whitespace-style 'lines-tail))
      (message "%s" whitespace-style))))