如果不立即向上移动,Emacs 26.3滚动条将拒绝向上移动

如果不立即向上移动,Emacs 26.3滚动条将拒绝向上移动,emacs,emacs26,Emacs,Emacs26,在Fedora第31版。在Windows7上使用Xming作为X服务器编辑:也可以使用MobaXterm 12.2 4204在RHEL7上运行Emacs 24.3,无论是否处于-Q模式 我看到的滚动条是一个中黑色的矩形(滚动条“电梯”),在浅灰色的垂直区域(滚动条“轨道”)有圆形的左角和方形的右角。当我将鼠标移到矩形上时,它将切换为深灰色 当我点击它时,它会变成蓝色。大约1/2秒后,如果不移动,它会在右侧缩小约2个像素[编辑:在24.3/RHEL7/MobaXterm设置中,两侧缩小],并拒绝移

在Fedora第31版。在Windows7上使用Xming作为X服务器编辑:也可以使用MobaXterm 12.2 4204在RHEL7上运行Emacs 24.3,无论是否处于-Q模式

我看到的滚动条是一个中黑色的矩形(滚动条“电梯”),在浅灰色的垂直区域(滚动条“轨道”)有圆形的左角和方形的右角。当我将鼠标移到矩形上时,它将切换为深灰色

当我点击它时,它会变成蓝色。大约1/2秒后,如果不移动,它会在右侧缩小约2个像素[编辑:在24.3/RHEL7/MobaXterm设置中,两侧缩小],并拒绝移动。移动鼠标有时会显示一个窗口内容滚动条,有时则不会

如果我点击它并在1/2秒内轻轻移动它,它会移动,即使我保持静止一段时间,它也会继续移动。但我必须移动它(在2000行文件中,似乎至少是它高度的一半),否则它将冻结在1/2秒的标记处

这是我当前的
.emacs
文件:

(defun switch-to-next-buffer-frank ()
  (interactive)
  (switch-to-buffer (other-buffer)))

(defun switch-to-prev-window ()
  (interactive)
  (other-window -1))

(defun scroll-one-line-up (&optional arg)
  "Scroll the selected window up (forward in the text) one line (or N lines)."
  (interactive "p")
  (scroll-up (or arg 1)))

(defun scroll-one-line-down (&optional arg)
  "Scroll the selected window down (backward in the text) one line (or N)."
  (interactive "p")
  (scroll-down (or arg 1)))

(global-set-key [(control ?z)]                'scroll-one-line-up)
(global-set-key [(meta ?z)]                   'scroll-one-line-down)
(global-set-key [(meta ?g)]                   'goto-line)
(global-set-key [(control ?x)(k)]             'kill-this-buffer)
(global-set-key [(control meta ?l)]           'switch-to-next-buffer)
(global-set-key [(control shift meta ?l)]     'switch-to-prev-buffer)
(global-set-key [(control tab)]               'other-window)
(global-set-key [(control shift iso-lefttab)] 'switch-to-prev-window)

(modify-syntax-entry ?_ "w")

(setq scroll-bar-mode 'left)
(setq scroll-bar-adjust-thumb-portion nil)





(setq gutter-buffers-tab-visible-p nil)
(setq inhibit-startup-screen t)
(setq mouse-yank-at-point t)
(setq inhibit-startup-buffer-menu t)
(tool-bar-mode -1)
(delete-selection-mode 1)
;(setq inhibit-splash-screen t)
;(setq inhibit-startup-message t)
;(setq initial-scratch-message nil)



;(delete-selection-mode 1)
;
;(defun ask-user-about-supersession-threat (fn)
;  "blatantly ignore files that changed on disk"
;  )





(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(ansi-color-faces-vector
   [default default default italic underline success warning error])
 '(ansi-color-names-vector
   ["#3F3F3F" "#CC9393" "#7F9F7F" "#F0DFAF" "#8CD0D3" "#DC8CC3" "#93E0E3" "#DCDCCC"])
 '(background-color "#000000")
 '(background-mode dark)
 '(company-quickhelp-color-background "#4F4F4F")
 '(company-quickhelp-color-foreground "#DCDCCC")
 '(cursor-color "#ffffff")
 '(custom-enabled-themes (quote (manoj-dark)))
 '(custom-safe-themes
   (quote
    ("54f2d1fcc9bcadedd50398697618f7c34aceb9966a6cbaa99829eb64c0c1f3ca" "4138944fbed88c047c9973f68908b36b4153646a045648a22083bd622d1e636d" "8885761700542f5d0ea63436874bf3f9e279211707d4b1ca9ed6f53522f21934" "59e82a683db7129c0142b4b5a35dbbeaf8e01a4b81588f8c163bd255b76f4d21" default)))
 '(fci-rule-color "#383838")
 '(font-use-system-font t)
 '(foreground-color "#00ff00")
 '(gutter-buffers-tab-visible-p nil t)
 '(indent-tabs-mode nil)
 '(nrepl-message-colors
   (quote
    ("#CC9393" "#DFAF8F" "#F0DFAF" "#7F9F7F" "#BFEBBF" "#93E0E3" "#94BFF3" "#DC8CC3")))
 '(pdf-view-midnight-colors (quote ("#DCDCCC" . "#383838")))
 '(query-user-mail-address nil)
 '(tool-bar-mode nil)
 '(user-mail-address "fsheeran@gmail.com")
 '(vc-annotate-background "#2B2B2B")
 '(vc-annotate-color-map
   (quote
    ((20 . "#BC8383")
     (40 . "#CC9393")
     (60 . "#DFAF8F")
     (80 . "#D0BF8F")
     (100 . "#E0CF9F")
     (120 . "#F0DFAF")
     (140 . "#5F7F5F")
     (160 . "#7F9F7F")
     (180 . "#8FB28F")
     (200 . "#9FC59F")
     (220 . "#AFD8AF")
     (240 . "#BFEBBF")
     (260 . "#93E0E3")
     (280 . "#6CA0A3")
     (300 . "#7CB8BB")
     (320 . "#8CD0D3")
     (340 . "#94BFF3")
     (360 . "#DC8CC3"))))
 '(vc-annotate-very-old-color "#DC8CC3"))
(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(default ((t (:foreground "#00ff00" :background "#000000" :size "10pt" :family "DejaVu Sans Mono" :foundry "PfEd" :slant normal :weight normal :height 144 :width normal))))
 '(font-lock-builtin-face ((t (:foreground "#00ccff"))))
 '(font-lock-comment-delimiter-face ((t (:foreground "#ffff00" :slant normal))))
 '(font-lock-comment-face ((t (:foreground "#ffff00" :slant normal))))
 '(font-lock-constant-face ((t (:foreground "#00ff99" :weight normal))))
 '(font-lock-function-name-face ((t (:foreground "#00ff00" :weight normal :height 1.0))))
 '(font-lock-preprocessor-face ((t (:foreground "#ff4040"))))
 '(font-lock-string-face ((t (:foreground "#00ffee"))))
 '(font-lock-type-face ((t (:foreground "#33ccff"))))
 '(font-lock-variable-name-face ((t (:foreground "#66ff00"))))
 '(italic ((t nil)))
 '(mode-line ((t (:background "#445555" :foreground "#ffffff" :box (:line-width 2 :color "#445555") :height 1.0))))
 '(mode-line-buffer-id ((t (:background "#445555" :foreground "#55ff55" :weight normal :height 1.0))))
 '(mode-line-emphasis ((t (:weight normal))))
 '(mode-line-highlight ((t (:box (:line-width 2 :color "#445555")))))
 '(mode-line-inactive ((t (:background "#445555" :foreground "#ffffff" :box (:line-width 2 :color "#445555") :weight normal :height 1.0))))
 '(scroll-bar ((t (:background "#334444" :foreground "#ddffff")))))
以下是一个屏幕截图:emacs-Q 24.3/RHEL7/MobaXterm:


然后,在我点击了下一个滚动条后,在同一个窗口中保持了大约1秒,而不是移动:

如果你运行Emacs用<代码> Emacs -Q,也会发生同样的事情吗?考虑向问题添加屏幕截图。是的,emacs-Q同样不能滚动,而且电梯在停止滚动的同时缩小了几个像素,这种奇怪的事情对它没有帮助。一部电影可能会有帮助,但为什么不读我写的东西,然后在你的脑海里想象它呢?更少的带宽:-我仍然认为屏幕截图可能会有所帮助(例如,类似系统的其他用户可以立即看到“缩小”是否正常)。我的系统上没有这样的滚动条,所以我无法在脑海中描绘它。