Я создаю кадр Emacs с (make-frame)
и загружаю в него изображение.Когда я запускаю Emacs с параметром -q
и запускаю свой сценарий, Emacs создает кадр и заполняет весь кадр изображением.
Однако, когда я запускаю это из моего обычного сеанса Emacs (emacsclient
), Emacs вставляет 1
слева от изображения и создает столбец по всей высоте кадра слева от изображения.:
Снимок экрана
Ниже приведен мой код для создания рамки и вставки изображения:
(defvar bckgimg "~/a.jpg" "Image used for desktop background")
(progn
(setq backgr-frame
(make-frame
`((name . "background-frame")
(width . ,(display-pixel-width))
(height . ,(display-pixel-height))
(undecorated . t)
(fringe . nil)
(below . t)
(left-fringe . 0)
(right-fringe . 0)
(tool-bar-lines . 0)
(menu-bar-lines . 0)
(unsplittable . t)
(mode-line . nil)
(buffer-predicate . (lambda (x) nil))
(internal-border-width . 0)
(z-group . below)
(visibility . nil)
(skip-taskbar . t)
(minibuffer . nil)
(top . 0)
(left . 0))))
(with-selected-frame backgr-frame
(toggle-frame-maximized)
(lower-frame backgr-frame)
(make-frame-visible backgr-frame)
(with-output-to-temp-buffer "backgr"
(switch-to-buffer "backgr")
(setq mode-line-format nil)
(if (fboundp 'display-line-numbers-mode)
(display-line-numbers-mode -1))
(if (fboundp 'linnum-mode)
(linnum-mode -1))
(insert-image (create-image bckgimg
'jpeg nil
:width 3840)))))
Я смотрю в документы и ищувокруг, но я не могу найти, как это исправить.Каким будет код для отображения изображения без этого лишнего столбца слева (зеленый на скриншоте)?