John Forkosh
2023-03-23 04:00:56 UTC
I recently installed slackware64-current with emacs version 28.2,
versus my previous install with version 27.2. And like you already
guessed, they're behaving a little differently. My ~/.emacs file
has, among other things (the entire 64-line file is reproduced
below, just in case there's some "interaction" causing the problem),
(setq blink-matching-paren nil)
to turn off blinking matching (xxx)'s and {xxx}'s, etc.
And that had been working fine under 27.2. But now, under 28.2,
they all blink, though the other setq's seem to be continuing
to work as intended (i.e., emacs is reading my ~/.emacs file).
Also, as a further test, since my earlier slackware is still
intact on another partition, I cp'ed all its /usr/bin/emacs,
/usr/share/emacs/27.2/ and /usr/libexec/emacs/27.2/ stuff
over to my new /usr directory, and flipped the /usr/bin/emacs
symlink to emacs-27.2-with-x11. And that >>doesn't<< blink,
just like I want.
So why's version 28.2 blinking, and how can I stop it???
I tried (blink-cursor-mode 0) in ~/.emacs, but no luck.
Below's my entire 64-line (now 65 with that additional
blink-cursor-mode 0) ~/.emacs file, which pretty much just
turns off everything. I basically just found it somewhere
on the web, but don't recall where, and don't really
understand it very well (just what's easy to infer from
the syntax)...
(setq major-mode 'text-mode)
(setq auto-mode-alist '(("." . text-mode)))
(setq make-backup-files nil) ;;; no backup files
(setq auto-save-default nil) ;;; no auto saving
(setq scroll-step 1)
(setq scroll-margin 0)
(setq scroll-preserve-screen-position 't) ;;; scroll without moving cursor
(setq scroll-conservatively 10000) ;;; (0 or 10000 seems same)
(setq auto-window-vscroll nil)
(setq scroll-up nil)
(setq scroll-down nil)
(setq scroll-up-aggressively nil) ;;; used to be .01
(setq scroll-down-aggressively nil) ;;; used to be .01
;;; (setq track-eol nil) ;;; cursor doesn't track end-of-line
(setq next-screen-context-lines 0)
(mouse-wheel-mode 't) ;;; mouse-wheel enabled
;;; (setq mouse-wheel-scroll-amount '(1 ((shift) . 1))) ;;; 1 line at a time
(setq mouse-wheel-scroll-amount '(1 ((shift) . 1) ((control) . nil)))
;;; (setq mouse-wheel-progressive-speed nil)
(setq mouse-wheel-follow-mouse 't) ;;; scroll window under mouse
;;;;; -- <mouse-4> and <mouse-5> commented to permit line-by-line scrolling
;; (global-set-key (kbd "<mouse-4>") 'scroll-down-command)
;; (global-set-key (kbd "<mouse-5>") 'scroll-up-command)
;;; (scroll-bar-mode -1) ;;; no scroll bar displayed at all
(setq indent-tabs-mode nil)
;;; see http://emacs.stackexchange.com/questions/
;;; 14297/completely-disable-all-auto-indentation
(global-set-key "\C-j" 'newline) ;;; disable auto-indent? emacs <=24.3
(electric-indent-mode 0) ;;; disable auto-indent? emacs >=24.4
(setq blink-matching-paren nil)
(blink-cursor-mode 0)
(setq column-number-mode 't)
(setq size-indication-mode 't)
;;; open with single window
(setq inhibit-startup-screen 't)
(add-hook 'emacs-startup-hook 'delete-other-windows)
;;; initial frame width,height,position
(set-frame-width (selected-frame) 80) ; #chars wide
(set-frame-height (selected-frame) 52) ; #lines ling
(set-frame-position (selected-frame) 10 10 ) ; x y from upper-left
;;; insert tab character
(defun insert-tab ()
(interactive)
(insert "\t"))
;;; (insert " "))
(global-unset-key [tab])
(global-set-key (kbd "TAB") 'insert-tab)
;;; --- end-of-file ---
(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.
'(column-number-mode t)
'(size-indication-mode t))
(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 (:family "DejaVu Sans Mono" :foundry "unknown" :slant normal :weight normal :height 120 :width normal)))))
versus my previous install with version 27.2. And like you already
guessed, they're behaving a little differently. My ~/.emacs file
has, among other things (the entire 64-line file is reproduced
below, just in case there's some "interaction" causing the problem),
(setq blink-matching-paren nil)
to turn off blinking matching (xxx)'s and {xxx}'s, etc.
And that had been working fine under 27.2. But now, under 28.2,
they all blink, though the other setq's seem to be continuing
to work as intended (i.e., emacs is reading my ~/.emacs file).
Also, as a further test, since my earlier slackware is still
intact on another partition, I cp'ed all its /usr/bin/emacs,
/usr/share/emacs/27.2/ and /usr/libexec/emacs/27.2/ stuff
over to my new /usr directory, and flipped the /usr/bin/emacs
symlink to emacs-27.2-with-x11. And that >>doesn't<< blink,
just like I want.
So why's version 28.2 blinking, and how can I stop it???
I tried (blink-cursor-mode 0) in ~/.emacs, but no luck.
Below's my entire 64-line (now 65 with that additional
blink-cursor-mode 0) ~/.emacs file, which pretty much just
turns off everything. I basically just found it somewhere
on the web, but don't recall where, and don't really
understand it very well (just what's easy to infer from
the syntax)...
(setq major-mode 'text-mode)
(setq auto-mode-alist '(("." . text-mode)))
(setq make-backup-files nil) ;;; no backup files
(setq auto-save-default nil) ;;; no auto saving
(setq scroll-step 1)
(setq scroll-margin 0)
(setq scroll-preserve-screen-position 't) ;;; scroll without moving cursor
(setq scroll-conservatively 10000) ;;; (0 or 10000 seems same)
(setq auto-window-vscroll nil)
(setq scroll-up nil)
(setq scroll-down nil)
(setq scroll-up-aggressively nil) ;;; used to be .01
(setq scroll-down-aggressively nil) ;;; used to be .01
;;; (setq track-eol nil) ;;; cursor doesn't track end-of-line
(setq next-screen-context-lines 0)
(mouse-wheel-mode 't) ;;; mouse-wheel enabled
;;; (setq mouse-wheel-scroll-amount '(1 ((shift) . 1))) ;;; 1 line at a time
(setq mouse-wheel-scroll-amount '(1 ((shift) . 1) ((control) . nil)))
;;; (setq mouse-wheel-progressive-speed nil)
(setq mouse-wheel-follow-mouse 't) ;;; scroll window under mouse
;;;;; -- <mouse-4> and <mouse-5> commented to permit line-by-line scrolling
;; (global-set-key (kbd "<mouse-4>") 'scroll-down-command)
;; (global-set-key (kbd "<mouse-5>") 'scroll-up-command)
;;; (scroll-bar-mode -1) ;;; no scroll bar displayed at all
(setq indent-tabs-mode nil)
;;; see http://emacs.stackexchange.com/questions/
;;; 14297/completely-disable-all-auto-indentation
(global-set-key "\C-j" 'newline) ;;; disable auto-indent? emacs <=24.3
(electric-indent-mode 0) ;;; disable auto-indent? emacs >=24.4
(setq blink-matching-paren nil)
(blink-cursor-mode 0)
(setq column-number-mode 't)
(setq size-indication-mode 't)
;;; open with single window
(setq inhibit-startup-screen 't)
(add-hook 'emacs-startup-hook 'delete-other-windows)
;;; initial frame width,height,position
(set-frame-width (selected-frame) 80) ; #chars wide
(set-frame-height (selected-frame) 52) ; #lines ling
(set-frame-position (selected-frame) 10 10 ) ; x y from upper-left
;;; insert tab character
(defun insert-tab ()
(interactive)
(insert "\t"))
;;; (insert " "))
(global-unset-key [tab])
(global-set-key (kbd "TAB") 'insert-tab)
;;; --- end-of-file ---
(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.
'(column-number-mode t)
'(size-indication-mode t))
(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 (:family "DejaVu Sans Mono" :foundry "unknown" :slant normal :weight normal :height 120 :width normal)))))
--
John Forkosh ( mailto: ***@f.com where j=john and f=forkosh )
John Forkosh ( mailto: ***@f.com where j=john and f=forkosh )