;;; -*- lexical-binding: t -*-
;;
;; -----------------------------------------------------------------------

(require 'luki-lisp)

;; -----------------------------------------------------------------------

(-> 'simple)

;; -----------------------------------------------------------------------

(setq yank-excluded-properties t)

;; -----------------------------------------------------------------------

(defun yank-pop-back (&optional n)
  (interactive "p")
  (or n (setq n 1))
  (yank-pop (* n -1)))

;; -----------------------------------------------------------------------

(<- 'll-yank)