From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp0 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id WJudBfYNA1/NBgAA0tVLHw (envelope-from ) for ; Mon, 06 Jul 2020 11:41:42 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp0 with LMTPS id oEBaAfYNA1/OXQAA1q6Kng (envelope-from ) for ; Mon, 06 Jul 2020 11:41:42 +0000 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 759F9940391 for ; Mon, 6 Jul 2020 11:41:41 +0000 (UTC) Received: from localhost ([::1]:45612 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jsPVC-0001b6-Oy for larch@yhetil.org; Mon, 06 Jul 2020 07:41:38 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:46440) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1jsPUa-0001Xp-Hp for emacs-orgmode@gnu.org; Mon, 06 Jul 2020 07:41:00 -0400 Received: from [183.249.139.74] (port=10956 helo=localhost) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1jsPUX-00031u-D9 for emacs-orgmode@gnu.org; Mon, 06 Jul 2020 07:41:00 -0400 Received: by localhost (Postfix, from userid 1000) id 3BA972413EC; Mon, 6 Jul 2020 19:40:48 +0800 (CST) References: <87r1tpov50.fsf@gmail.com> <87zh8d2bvm.fsf@nicolasgoaziou.fr> User-agent: mu4e 1.4; emacs 28.0.50 From: stardiviner To: Nicolas Goaziou Subject: Re: [BUG] org-fill-paragraph [M-q] not apply on last paragraph In-reply-to: <87zh8d2bvm.fsf@nicolasgoaziou.fr> Date: Mon, 06 Jul 2020 19:40:48 +0800 Message-ID: <87o8osq3b3.fsf@gmail.com> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Host-Lookup-Failed: Reverse DNS lookup failed for 183.249.139.74 (deferred) Received-SPF: softfail client-ip=183.249.139.74; envelope-from=numbchild@gmail.com; helo=localhost X-detected-operating-system: by eggs.gnu.org: First seen = 2020/07/06 07:40:49 X-ACL-Warn: Detected OS = Linux 2.2.x-3.x [generic] [fuzzy] X-Spam_score_int: 63 X-Spam_score: 6.3 X-Spam_bar: ++++++ X-Spam_report: (6.3 / 5.0 requ) BAYES_00=-1.9, DKIM_ADSP_CUSTOM_MED=0.001, FORGED_GMAIL_RCVD=1, FREEMAIL_FROM=0.001, FSL_HELO_NON_FQDN_1=0.001, HELO_LOCALHOST=3.828, NML_ADSP_CUSTOM_MED=0.9, RDNS_NONE=0.793, SPF_SOFTFAIL=0.665, SPOOFED_FREEMAIL_NO_RDNS=1 autolearn=_AUTOLEARN X-Spam_action: reject X-BeenThere: emacs-orgmode@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Reply-To: numbchild@gmail.com Cc: Org Mode Errors-To: emacs-orgmode-bounces+larch=yhetil.org@gnu.org Sender: "Emacs-orgmode" X-Scanner: scn0 Authentication-Results: aspmx1.migadu.com; dkim=none; dmarc=fail reason="SPF not aligned (relaxed), No valid DKIM" header.from=gmail.com (policy=none); spf=pass (aspmx1.migadu.com: domain of emacs-orgmode-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=emacs-orgmode-bounces@gnu.org X-Spam-Score: -0.81 X-TUID: 6GkjIXXXw0To --=-=-= Content-Type: text/plain Nicolas Goaziou writes: > Hello, > > stardiviner writes: > >> After recently (about weeks) update in Org Mode "master" branch. I found [M-q] >> org-fill-paragraph command not apply on the last paragraph of region select >> large part of text. I don't have this problem before. > > This is very vague. Do you have an ECM demonstrating the issue? I have long minimal-init.el config file. I will attach the init file in attachments. And here is the steps I reproduce this bug: 1. Open an Org file which contains long un-wrapped text. Like this: #+begin_src org In addition to debugging a program, VS Code supports running the program. The *Debug: Run (Start Without Debugging)* /action/ is triggered with =[Ctrl+F5]= and uses the currently selected launch configuration. Many of the launch configuration attributes are supported in 'Run' mode. VS Code maintains a debug session while the program is running, and pressing the Stop button terminates the program. Tip: The Run action is always available, but not all debugger extensions support 'Run'. In this case, 'Run' will be the same as 'Debug'. #+end_src 2. region select two paragraphs. 3. press [M-q] ~org-fill-paragraph~ command. 4. The second paragraph is not filled. > > Regards, -- [ stardiviner ] I try to make every word tell the meaning that I want to express. Blog: https://stardiviner.github.io/ IRC(freenode): stardiviner, Matrix: stardiviner GPG: F09F650D7D674819892591401B5DF1C95AE89AC3 --=-=-= Content-Type: application/emacs-lisp Content-Disposition: attachment; filename=minimal-init.el Content-Transfer-Encoding: quoted-printable ;;; minimal-init.el --- minimal init file for testing. ;;; Commentary: ;;; Code: (package-initialize) ;;; [ Debug ] (setq debug-on-error t debug-on-signal nil debug-on-quit nil) ;;; add my init files directory (add-to-list 'load-path "/usr/share/emacs/site-lisp/") (if (version<=3D emacs-version "27") (setq user-emacs-directory (expand-file-name "~/.config/emacs/"))) (add-to-list 'load-path (expand-file-name "init" user-emacs-directory)) ;; recursively load init files. (let ((default-directory (expand-file-name "init" user-emacs-directory))) (setq load-path (append (let ((load-path (copy-sequence load-path))) ; shadow (append (copy-sequence (normal-top-level-add-to-load-path '("."))) (normal-top-level-add-subdirs-to-load-path))) load-path))) (setq load-prefer-newer t) ;;; [ package.el ] (load (expand-file-name "init/init-package.el" user-emacs-directory)) (require 'init-package) (setq visible-bell nil) ;;; disable Emacs built-in bell when [C-g] (setq ring-bell-function 'ignore) (require 'color) ;;; my custom functions (require 'init-library) (require 'init-functions) ;;; add your customizations from here (use-package one-themes :load-path "~/Code/Emacs/one-themes" :config (load-theme 'one-dark t)) (use-package ace-window :ensure t :config (global-set-key (kbd "C-x C-j") 'ace-window)) (use-package which-key :ensure :config (which-key-mode 1)) (require 'init-ivy) (require 'init-company-mode) ;; (require 'init-org-mode) ;;; Org-mode Babel (setq org-confirm-babel-evaluate nil) (setq org-babel-no-eval-on-ctrl-c-ctrl-c nil) (setq org-confirm-shell-link-function 'yes-or-no-p) (setq org-confirm-elisp-link-function 'yes-or-no-p) ;; babel src block editing (setq org-src-fontify-natively t ;; nil: preserve org indent, t: preserve export indent. org-src-preserve-indentation nil ;; 0: fix `diff' babel syntax highlighting invalid issue. org-edit-src-content-indentation 0 org-src-tab-acts-natively nil ; make [Tab] work native as in major mo= de. org-src-window-setup 'current-window ; 'reorganize-frame, 'current-wi= ndow org-src-ask-before-returning-to-edit-buffer nil org-edit-src-auto-save-idle-delay 0 ; 0: don't auto save. ) (org-babel-do-load-languages 'org-babel-load-languages '((emacs-lisp . t) (org . t) (shell . t) (lisp . t) (clojure . t) (js . t))) ;; (require 'init-prog-lang-clojure) (provide 'minimal-init) ;;; minimal-init.el ends here --=-=-= Content-Type: application/emacs-lisp Content-Disposition: attachment; filename=init-package.el Content-Transfer-Encoding: quoted-printable ;;; init-package.el --- init package.el ;;; -*- coding: utf-8 -*- ;;; Commentary: ;;; Code: ;;; [ package.el ] -- Emacs Lisp Package Archive (ELPA) (require 'package) (setq package-enable-at-startup nil) (setq package-menu-async t) (setq package-user-dir (expand-file-name "elpa" user-emacs-directory)) ;;; ELPA Mirrors ;; (setq-default package-archives ;; '(("gnu" . "https://elpa.gnu.org/packages/") ;; ("melpa" . "http://melpa.org/packages/") ;; ;; ("melpa-stable" . "http://stable.melpa.org/packages/") ;; ;; ("marmalade" . "http://marmalade-repo.org/packages/") ;; ("org" . "http://orgmode.org/elpa/"))) (setq-default package-archives '(("melpa" . "http://mirrors.tuna.tsinghua.edu.cn/elpa/melpa/= ") ("org" . "http://mirrors.tuna.tsinghua.edu.cn/elpa/org/") ("gnu" . "http://mirrors.tuna.tsinghua.edu.cn/elpa/gnu/")= )) (let* ((elpa-archives-dir (expand-file-name "elpa/archives/" user-emacs-dir= ectory)) (elpa-gnu-archives-dir (concat elpa-archives-dir "gnu")) (elpa-melpa-archives-dir (concat elpa-archives-dir "melpa")) (elpa-org-archives-dir (concat elpa-archives-dir "org"))) (unless (and (file-exists-p elpa-gnu-archives-dir) (file-exists-p elpa-melpa-archives-dir) (file-exists-p elpa-org-archives-dir)) (package-refresh-contents))) (package-initialize) (add-to-list 'display-buffer-alist '("^\\*package-build-result\\*" (display-buffer-reuse-window display-buffer-below-selected))) ;;; Load `use-package' ahead before `package-initialize' for (use-package o= rg :pin manual ...). ;;; [ use-package ] (unless (package-installed-p 'use-package) (package-refresh-contents) (package-install 'use-package)) (eval-when-compile (require 'use-package)) (require 'bind-key) ; if you use any `:bind' variant (use-package delight ; if you use `:delight' :ensure t) ;; (use-package deminish ; if you use `:diminish' ;; :ensure t) (setq use-package-verbose t ; 'debug: any evaluation errors report to `*use= -package*` buffer. use-package-always-ensure nil) (if (not (file-exists-p "~/Code/Emacs/org-mode/lisp/")) (progn (use-package org :pin org :ensure t :mode (("\\.org\\'" . org-mode)) :custom ((org-modules nil) ; disable all extra org-mode modules to = speed-up Org-mode file opening. (org-startup-folded t) (org-agenda-inhibit-startup t))) (use-package org-plus-contrib :pin org :ensure t)) ;; disable Emacs built-in Org Mode (delete (format "/usr/local/share/emacs/%s/lisp/org" emacs-version) load-= path) (delete "/usr/share/emacs/site-lisp/org/" load-path) =20=20 (use-package org :pin manual :load-path "~/Code/Emacs/org-mode/lisp/" :defer t :mode (("\\.org\\'" . org-mode)) :custom ((org-modules nil) ; disable all extra org-mode modules to spee= d-up Org-mode file opening. (org-startup-folded t) (org-agenda-inhibit-startup t)) ;; load org before org-mode init files settings. :init (require 'org)) (use-package org-plus-contrib :pin manual :load-path "~/Code/Emacs/org-mode/contrib/lisp/" :defer t :no-require t) ;; add source code version Org-mode Info into Emacs. (if (file-exists-p "~/Code/Emacs/org-mode/doc/org") (with-eval-after-load 'info (add-to-list 'Info-directory-list "~/Code/Emacs/org-mode/doc/") (info-initialize)))) ;;; [ package-lint ] -- A linting library for elisp package authors. (use-package package-lint :ensure t :defer t) ;;; [ flycheck-package ] -- A Flycheck checker for elisp package authors. (use-package flycheck-package :ensure t :defer t :after flycheck :init (flycheck-package-setup)) ;;; [ quelpa ] (use-package quelpa-use-package :ensure t :demand t :commands (quelpa-upgrade quelpa-self-upgrade) :init (setq quelpa-checkout-melpa-p nil quelpa-update-melpa-p nil)) (provide 'init-package) ;;; init-package.el ends here --=-=-=--