From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: "Bob Floyd" Newsgroups: gmane.emacs.bugs Subject: bug#45617: loses the edit region. Works in 23.3, broke in 26.3 Date: Sun, 24 Jan 2021 12:40:35 -0800 Message-ID: <006101d6f291$2b537dc0$81fa7940$@net> References: <000001d6e16c$984bcb70$c8e36250$@net> <83turycc18.fsf@gnu.org> <87ble4ob6v.fsf@mail.linkov.net> <000601d6e2ea$8f6601e0$ae3205a0$@net> <877dorkznt.fsf@mail.linkov.net> <002701d6e39b$4ac35680$e04a0380$@net> <8735ze9e09.fsf@mail.linkov.net> <83mtxm0vzd.fsf@gnu.org> <002d01d6e478$ca50cdf0$5ef269d0$@net> <87k0sgirr0.fsf@mail.linkov.net> <002101d6eadc$e816a070$b843e150$@net> <87k0sezj07.fsf@mail.linkov.net> <000c01d6eb68$f3f675f0$dbe361d0$@net> <877do8eull.fsf@mail.linkov.net> <000401d6ef83$32407e50$96c17af0$@net> <87czxyy5sz.fsf@mail.linkov.net> <009c01d6f0e4$7cdaeba0$7690c2e0$@net> <874kj7d1kd.fsf@mail.linkov.net> <002e01d6f1b2$1f2290c0$5d67b240$@net> <87eeiba4jo.fsf@mail.linkov.net> Mime-Version: 1.0 Content-Type: text/plain; charset="utf-8" Content-Transfer-Encoding: quoted-printable Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="23928"; mail-complaints-to="usenet@ciao.gmane.io" Cc: 45617@debbugs.gnu.org To: "'Juri Linkov'" Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Sun Jan 24 21:41:15 2021 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1l3mC9-00065T-87 for geb-bug-gnu-emacs@m.gmane-mx.org; Sun, 24 Jan 2021 21:41:13 +0100 Original-Received: from localhost ([::1]:59060 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1l3mC7-0000w0-TS for geb-bug-gnu-emacs@m.gmane-mx.org; Sun, 24 Jan 2021 15:41:11 -0500 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:44992) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1l3mBy-0000vL-Ro for bug-gnu-emacs@gnu.org; Sun, 24 Jan 2021 15:41:02 -0500 Original-Received: from debbugs.gnu.org ([209.51.188.43]:54090) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1l3mBy-0001Nm-Ke for bug-gnu-emacs@gnu.org; Sun, 24 Jan 2021 15:41:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1l3mBy-0004Zd-Dq for bug-gnu-emacs@gnu.org; Sun, 24 Jan 2021 15:41:02 -0500 X-Loop: help-debbugs@gnu.org Resent-From: "Bob Floyd" Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 24 Jan 2021 20:41:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 45617 X-GNU-PR-Package: emacs Original-Received: via spool by 45617-submit@debbugs.gnu.org id=B45617.161152084917549 (code B ref 45617); Sun, 24 Jan 2021 20:41:02 +0000 Original-Received: (at 45617) by debbugs.gnu.org; 24 Jan 2021 20:40:49 +0000 Original-Received: from localhost ([127.0.0.1]:37403 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1l3mBh-0004Ys-2Z for submit@debbugs.gnu.org; Sun, 24 Jan 2021 15:40:49 -0500 Original-Received: from resqmta-po-08v.sys.comcast.net ([96.114.154.167]:37421) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1l3mBe-0004Yc-8V for 45617@debbugs.gnu.org; Sun, 24 Jan 2021 15:40:43 -0500 Original-Received: from resomta-po-09v.sys.comcast.net ([96.114.154.233]) by resqmta-po-08v.sys.comcast.net with ESMTP id 3lm1llYO4XAgT3mBYlYnj8; Sun, 24 Jan 2021 20:40:36 +0000 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=comcast.net; s=20190202a; t=1611520836; bh=oMknededse0gOdleqcooi+1yu6RrNVfUq2JEEv86mEE=; h=Received:Received:From:To:Subject:Date:Message-ID:MIME-Version: Content-Type; b=JX8waM0NlU5pljEmuIIiZA/CK3mZ3oAzneL+HJi1ojJYCKpwKDxo6YGL56yfN7/x/ JE/1fNcjYbYDbt9e2bHeL0veJV1Xh7INz83RNWYTAVfEEnAhYDhrMDtGGUgD0zUO3l tS+quwBeJGVT6+rttYKtxeZSS17jFR1pnPfRG8REsm1XvQfECUn2Y80LAZm0Ih/rUD jq3j9KNIyGPQesVUBqhBOxqPB59xTxo9LQhkBLnZSv9kJBd1deH92JCWTp5ZYG/F3k 58HTizithCjWASEz3wNkSxpGh8iVfMYZrquPDuzH4R4NZ+oF3jtYW2zcF1tytusRag YJiIYPhE1uuRA== Original-Received: from Cache ([IPv6:2601:647:6100:1480::a080]) by resomta-po-09v.sys.comcast.net with ESMTPA id 3mBWlmoQ6DxZc3mBXlbRO6; Sun, 24 Jan 2021 20:40:35 +0000 X-Xfinity-VMeta: sc=-100.00;st=legit In-Reply-To: <87eeiba4jo.fsf@mail.linkov.net> X-Mailer: Microsoft Office Outlook 12.0 Content-Language: en-us Thread-Index: Adbxt1a0oO7q5Nc3QHCbiTQEgBs6NAA2QnEw X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.io gmane.emacs.bugs:198528 Archived-At: I'm embarrassed to include my .emacs file - it's an accumulation over = time of a lot of stuff from unix and windows not cleaned up. Here it is: = Maybe something in it causing the issue/ maybe not. -------------------------------------------------------------------------= ----------------------------------------------------- ; To see ^M or write the file without ^M ; M-X set-variable ; inhibit-eol-conversion ; t ;(set-face-font default "Lucida Console") ;(set-default-font "Lucida Console") ;; Added by Package.el. This must come before configurations of ;; installed packages. Don't delete this line. If you don't want it, ;; just comment it out by adding a semicolon to the start of the line. ;; You may delete these explanatory comments. (package-initialize) (setenv "PATH" (concat "c:/cygwin/bin;" (getenv "PATH"))) (setq exec-path (cons "c:/cygwin/bin/" exec-path)) ; Set emacs path in ".bashrc" ; emacs 22.3 & 23.1 complains ;(require 'cygwin-mount) ;(cygwin-mount-activate) ;;; Without this env var setting, Cygwin causes `ediff-buffers', at = least, ;; to raise an error. ;;; Making this setting here might have no effect, as the env var is = checked ;; only by the first Cygwin process ;;; invoked during your Windows session. For best results, set this env ;; var globally, in Windows itself. ;;; An alternative might be to use `cygpath' to change from MS Windows = file ;; names to POSIX. ;(setenv "CYGWIN" "nodosfilewarning") ; Replace DOS shell with Cygwin Bash Shell=20 ; see https://www.emacswiki.org/emacs/setup-cygwin.el (add-hook 'comint-output-filter-functions 'shell-strip-ctrl-m nil t) (add-hook 'comint-output-filter-functions 'comint-watch-for-password-prompt nil t) ; (setq explicit-shell-file-name "bash") (setq shell-file-name explicit-shell-file-name) (setq explicit-bash-args '("-i")) ;(setq explicit-bash-args '("--login" "-i")) ;(setq explicit-shell-file-name "bash.exe") ;; For subprocesses invoked via the shell ;; (e.g., "shell -c command") ;(setq shell-file-name explicit-shell-file-name) ; Key Binding for Previous Commands=20 ; Some people like to use the up and down arrow keys to traverse through = the previous commands. Here is the way to bind the keys.=20 (add-hook 'shell-mode-hook 'n-shell-mode-hook) (defun n-shell-mode-hook () "12Jan2002 - bob, shell mode customizations." (local-set-key '[up] 'comint-previous-input) (local-set-key '[down] 'comint-next-input) (local-set-key '[(shift tab)] 'comint-next-matching-input-from-input) ;; suspend shell, not emacs (local-set-key "\C-z" 'self-insert-command ) ) ; Gzip and Gunzip=20 ;When viewing files using the Emacs dired utility, press Z should = compress or uncompress a file. Since Cygwin is equiped with the gzip = utility, you should be able to get this function working on your Windows = Gnu Emacs. The lisp statement you need in your .emacs file is=20 (setq archive-zip-use-pkzip nil) ; ; make searches case sensitive ; (setq default-case-fold-search nil) (setq-default case-fold-search nil) ;(setq auto-mode-list '("\\.d$" . c-mode)) ; Enter c++ mode for .h files on windows - even though the file ends ; in .H emacs seems to think it's a little h and otherwise enters c mode (setq auto-mode-alist (cons '("\\.h$" . c++-mode) auto-mode-alist)) (setq auto-mode-alist (cons '("\\.HPP$" . c++-mode) auto-mode-alist)) (setq auto-mode-alist (cons '("\\.D$" . c++-mode) auto-mode-alist)) ; C customizing ; Note these constants enforce the location of {}'s and indentation. ; ; C-h i Indentation Functions (require 'cc-mode) (add-hook `c-mode-common-hook (lambda () (c-toggle-auto-state 1))) ;(add-hook `c-mode-common-hook (lambda () (c-toggle-hungry-state 1))) ; left '{' not indented (c-set-offset 'substatement-open 0) ; c-lineup-multi-inher (c-set-offset 'inher-cont 0) ; c-lineup-streamop (c-set-offset 'stream-op 0) ; c-lineup-arglist (c-set-offset 'arglist-cont-nonempty 0) ; c-lineup-arglist ;(c-set-offset 'arglist-intro 0) ;(c-set-offset 'arglist-close 0) ; c-lineup-math (c-set-offset 'statement-cont 0) ; does auto indentation, like C-n ;(define-key c-mode-base-map "\C-m" 'c-context-line-break) ; syntax coloring (global-font-lock-mode 1) ;(setq c-auto-newline t) (setq c-tab-always-indent nil) ;(setq c-indent-level 4) ;(setq c-continued-statement-offset 4) ;(setq c-brace-offset -4) ;(setq c-brace-imaginary-offset 0) ;(setq c-argdecl-indent 2) ;(setq c-label-offset -4) ;(setq comment-multi-line t) ;(setq comment-start-skip "/\\*+[ \\n\\t]*") ;(setq comment-start "/*") ;(setq comment-end "*/") ; Matching '{' '}' , '<' '>', '[' ']' are hilighted (show-paren-mode) ; ; compilation command ; ;(setq compile-command "make" ) ; ; prevent deletion of auto saved files when the file is written ; (setq delete-auto-save-files t) ; ; allow recursive use of minibuffers ; (setq enable-recursive-minibuffers t) ; ; establish search paths to look for for programs ; ;(setq exec-path '("." "/usr/local/bin" "/usr/ucb" "/usr/bin" "/bin" = "/mimi/devel/bin" "/mimi/emacs/etc")) ; ; establish the imagen printer as the one to default to ; ;(setq lpr-switches "-Pim") ; ; Regexp used by Newline command in shell mode to match subshell = prompts. ; ;(setq shell-prompt-pattern "^.\.[0-9]*[0-9]>") ; ; Let emacs know about my P and p macros ; ;(setq shell-pushd-regexp "pushd\\|p") ;(setq shell-popd-regexp "popd") ; ; ; Rebind ESC-r (move-to-window-line) to replace-string ; (global-unset-key "\er") (global-set-key "\er" 'replace-string) ; Get rid of the tool bar icons which take up screen space by toggleing (tool-bar-mode -1) ; Choose visible flicker instead of auditable bell rings ;(setq visible-bell t) ; Or just silence the bell entirely (set-message-beep 'silent) ; See http://www.emacswiki.org/emacs/PrintingPackage#toc5 ; See printing.el ; Printer must be shared on CACHE ;(setq printer-name "//CACHE/HP Photosmart C7200 series") ;(setq printer-name "D:/Bob/PrintFile.ps") ; print postscript to a file (require 'printing) ; load printing package (setq pr-gv-command "c:/Program Files/Ghostgum/gsview/gsview64.exe") (setq pr-gs-command "c:/Program Files/gs/gs8.64/bin/gswin32.exe") (setq pr-print-using-ghostscript t) ; C7280 is not a postscript printer (setq pr-faces-p t) ; print colors, fonts etc. (pr-update-menus t) ; update now printer and utility menus ; Default scrolling of 5 lines at a time is too much. This sets it to 1 = line (setq mouse-wheel-scroll-amount '(1 ((shift) . 1) ((control) . nil))) (setq mouse-wheel-progressive-speed nil) ; ; Bind 'goto-line' ; (global-unset-key "\C-x\C-l") (global-set-key "\C-x\C-l" 'goto-line) (global-set-key [f2] 'grep) (global-set-key [f3] 'tags-search) ; ; Bind 'query-replace-regexp' ; (global-unset-key "\e$") (global-set-key "\e$" 'query-replace-regexp) (global-unset-key "\ee") (global-set-key "\ee" 'replace-regexp) ; ; These re-maps are done to allow xon/xoff ; ;(global-unset-key "\C-s") ;(global-set-key "\es" 'isearch-forward) ;(global-unset-key "\C-q") ;(global-unset-key "\eq") ;(global-set-key "\eq" 'quoted-insert) ;(load-file "/usr/local/lib/emacs/19.19/lisp/hilit19.el") ; (cond (window-system ; (setq hilit-mode-enable-list '(not text-mode) ; hilit-auto-highlight-maxout 150000 ; hilit-background-mode 'light ; hilit-inhibit-hooks nil ; hilit-inhibit-rebinding nil) ;=20 ; (require 'hilit19) ; )) ;(setq explicit-shell-file-name "C:/Program Files/Hamilton = Shell/bin/csh.exe") ;(load-file "d:/src/cooksrc/database/emacs-setup.el") ;(global-set-key "\ep" 'cooksrc-file-preamble) ; ; Easy mark. ; ;(global-set-key "\C- " 'set-mark-command) ; ; Easy way to clear screen and enter shell command ; ;(global-set-key "\e\r" 'cr-top) ; ; cr-top and freeze screen ; ;(global-set-key "\C-x\r" 'cr-top-freeze) ;(transient-mark-mode nil) ;(setq vc-make-backup-files 1) ;(setq vc-mistrust-permissions nil) ; ; Region hilite when mark is active ; (transient-mark-mode t) ;(setq shell-file-name "c:/cygwin/bin/bash") ;(setq explicit-shell-file-name "c:/cygwin/bin/bash") (shell) ;(eshell) ;(eshell-command-result "rm -f BROWSE; ebrowse *.h *.cpp *.xml") ;(shell-command "rm -f BROWSE; ebrowse smt2/maxflowsttest.cpp *.y *.l = *.cpp *.xml") ;(rename-buffer "sh-cook") ;(shell-command "cd d:/bob") ;(shell) ;(rename-buffer "sh-endogLib") ;(shell-command "cd d:/endogLib; rm -f BROWSE; ebrowse */*.h") ;(shell-process-cd "d:/endogLib") ;(eshell) ;(rename-buffer "sh-endogLib") ;(make-frame-command) ;(find-file "BROWSE") ;(global-set-key "\C-x4." 'ebrowse-tags-find-definition-other-window) ;(global-set-key "\C-x." 'ebrowse-tags-find-definition) ;(global-set-key "=1B," 'ebrowse-tags-loop-continue) (put 'upcase-region 'disabled nil) (put 'downcase-region 'disabled nil) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;= ; gcc 4.3.4 does not understand greek variables, e.g. \alpha, coded in ; utf-8. Visual Studio 10 does. ;(prefer-coding-system 'utf-8) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;= ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;= ; http://iris.math.aegean.gr/~atsol/emacs-unicode/ ; This does not format tex - it only converts keyboard input sequences ; into special characters.=20 ; C-x RET C-\ TeX RET to enter TeX input method ; C-\ (toggle-input-method) toggles between latin and greek ; (describe-input-method) in TeX input method (mode line indicator:\) ; reveals the characters displayed and their LaTeX-like nmonic = sequences. ;(load-file "C:/Program Files = (x86)/Emacs-24.0.91/emacs-24.0.91/lisp/language/greek.el") ;(setq default-input-method "el_GR") ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;= ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;= (load "auctex.el" nil t t) ;; FIND THIS ;(load "preview-latex.el" nil t t) ; Refer to auctex.pdf Pp 54 ;(setq TeX-auto-save nil) ; Refer to auctex.pdf Pp 55 ;(setq TeX-parse-self t) ; Refer to auctex.pdf Pp 54 ;(setq-default TeX-master "~/AUCTeXmaster") (setq-default TeX-master t) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;= (setq TeX-electric-sub-and-superscript t) (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. '(display-mm-dimensions-alist (quote (("" 384 . 240)))) '(package-selected-packages (quote (auctex))) '(safe-local-variable-values (quote ((Base . 10) (Syntax . Common-Lisp) (Package . Maxima))))) (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. ) ;; recursive delete using "x" in Dired window without asking for each = directory (setq dired-recursive-deletes "t" ) ;; Like C "{" matching for verilog (eval-after-load 'verilog-mode=20 '(define-key verilog-mode-map (kbd "C-{") 'verilog-beg-of-defun)) (eval-after-load 'verilog-mode=20 '(define-key verilog-mode-map (kbd "C-}") 'verilog-end-of-defun)) (load-file "C:/Program = Files/Emacs-26.3/share/emacs/site-lisp/web-mode.el") ;;(require 'web-mode) (add-to-list 'auto-mode-alist '("\\.phtml\\'" . web-mode)) (add-to-list 'auto-mode-alist '("\\.tpl\\.php\\'" . web-mode)) (add-to-list 'auto-mode-alist '("\\.[agj]sp\\'" . web-mode)) (add-to-list 'auto-mode-alist '("\\.as[cp]x\\'" . web-mode)) (add-to-list 'auto-mode-alist '("\\.erb\\'" . web-mode)) (add-to-list 'auto-mode-alist '("\\.mustache\\'" . web-mode)) (add-to-list 'auto-mode-alist '("\\.djhtml\\'" . web-mode)) (add-to-list 'auto-mode-alist '("\\.html?\\'" . web-mode)) (setq web-mode-markup-indent-offset 2) (setq web-mode-css-indent-offset 2) (setq web-mode-code-indent-offset 2) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; emacs 25 changes behavior. Here we restore it. ;; emacs 25 etags uses xref that no longer opens files so we need this ;; = `https://stackoverflow.com/questions/7667888/how-to-find-the-files-in-tag= s-file-in-emacs` (load-file "C:/Program = Files/Emacs-26.3/share/emacs/site-lisp/tags-find-file.el") (global-set-key (read-kbd-macro "C-,") 'tags-extra-find-file) ;; copying from windows clipboard ;; emacs 25 no longer yanks clipboard ;; = `https://stackoverflow.com/questions/13036155/how-to-combine-emacs-primar= y-clipboard-copy-and-paste-behavior-on-ms-windows` (setq select-active-regions nil) (setq mouse-drag-copy-region t) (global-set-key [mouse-2] 'mouse-yank-at-click) ;;;;;;;;;;;; IGNORE THIS STUFF ON WINDOWS ;;;;;;;;;;;;;;;;;;;;;;; ;; See NEWS.24 "Selection changes" ;; Above changes + these: ;(setq x-select-enable-primary t) ;(setq x-select-enable-clipboard nil) ;(global-set-key (kbd "") 'clipboard-yank) ;;;;;;;;;;;; IGNORE THIS STUFF ON WINDOWS ;;;;;;;;;;;;;;;;;;;;;;; ; newline now does what C-j used to do and C-j does what newline did (global-unset-key "\C-j") (global-set-key "\C-j" 'newline) (global-unset-key "\C-M") (global-set-key "\C-M" 'electric-newline-and-maybe-indent) (global-unset-key "\M-,") (global-set-key "\M-," 'tags-loop-continue) ; Don't like shell opening in another buffer, in doing makes whatever = was in ; it go away. (push (cons "\\*shell\\*" display-buffer--same-window-action) = display-buffer-alist) (defun my-insert-file-name (filename &optional args) "Insert name of file FILENAME into buffer after point. =20 Prefixed with \\[universal-argument], expand the file name to its fully canocalized path. See `expand-file-name'. =20 Prefixed with \\[negative-argument], use relative path to file name from current directory, `default-directory'. See `file-relative-name'. =20 The default with no prefix is to insert the file name exactly as it appears in the minibuffer prompt." ;; Based on insert-file in Emacs -- ashawley 20080926 (interactive "*fInsert file name: \nP") (cond ((eq '- args) (insert (file-relative-name filename))) ((not (null args)) (insert (expand-file-name filename))) (t (insert filename)))) =20 (global-set-key "\M-n" 'my-insert-file-name) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; = https://stackoverflow.com/questions/13505113/how-to-open-the-native-cmd-e= xe-window-in-emacs ; M-x cmd opens a window running the windows developer cmd prompt in the ; directory of the emacs buffer. (defun cmd () (interactive) (let ((proc (start-process "cmd" nil "cmd.exe" "/C" "start" = "cmd.exe" "/K" "C:\\Program Files (x86)\\Microsoft Visual = Studio\\2019\\Professional\\Common7\\Tools\\VsDevCmd.bat"))) (set-process-query-on-exit-flag proc nil)) ) ; M-x fiex opens the windows File Explorer in the directory of the emacs = buffer. (defun fiex () (interactive) (let ((proc (start-process "cmd" nil "cmd.exe" "/K" "explorer = ."))) (set-process-query-on-exit-flag proc nil)) ) ;; -------------------------------------------------------------------------= ----------------------------------------------------- -----Original Message----- From: Juri Linkov [mailto:juri@linkov.net]=20 Sent: Saturday, January 23, 2021 10:31 AM To: Bob Floyd Cc: 'Eli Zaretskii'; 45617@debbugs.gnu.org Subject: Re: bug#45617: loses the edit region. Works in = 23.3, broke in 26.3 >>Do you mean that the region is deactivated after finishing = query-replace? >>That's how it's supposed to work. Please always select entire region >>before starting query-replace again. > > No, I always select the region, then begin . > > When I see the previous replacement in the command window: > Query replace in region (default _nmRoot ? _nmDolRoot): > Instead of: > Query replace: > > Then I get the bad behavior. Maybe you use own customization, not starting with 'emacs -Q'? This might explain that after middle mouse click your selection region changes to lines 1-4 and is never restored. Because with 'emacs -Q' I see that the selection is deactivated after middle mouse click, even when the previous replacement is: Query replace in region (default _nmRoot ? _nmDolRoot):.