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

(require 'cl-lib)
(cl-pushnew  "." load-path :test #'string=)
(require 'luki-lisp)

(defun fullscreen (&optional vrb) (i)
  (when (gfx)
    (setq frame-resize-pixelwise t)
    (fringe-mode -1)
    (set-frame-width  nil 1280 nil t)
    (set-frame-height nil  720 nil t)
    (set-frame-parameter nil 'fullscreen 'fullboth)
    (& vrb ($ "[ %dx%d pxls ]" (frame-pixel-width) (frame-pixel-height)))))

(<- 'll-frame)