emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/xah-fly-keys e7c77fa733: - better docstring in some comman


From: ELPA Syncer
Subject: [nongnu] elpa/xah-fly-keys e7c77fa733: - better docstring in some commands. - xah-move-block-up removed the key - to repeat. - xah-move-block-down removed the key - to repeat.
Date: Thu, 6 Oct 2022 19:59:14 -0400 (EDT)

branch: elpa/xah-fly-keys
commit e7c77fa7337c92d12209007b77b5ad62aedea6b0
Author: Xah Lee <xah@xahlee.org>
Commit: Xah Lee <xah@xahlee.org>

    - better docstring in some commands. - xah-move-block-up removed the key - 
to repeat. - xah-move-block-down removed the key - to repeat.
---
 xah-fly-keys.el | 21 ++++++++++-----------
 1 file changed, 10 insertions(+), 11 deletions(-)

diff --git a/xah-fly-keys.el b/xah-fly-keys.el
index 2d1d4fec09..0064c9256a 100644
--- a/xah-fly-keys.el
+++ b/xah-fly-keys.el
@@ -4,7 +4,7 @@
 
 ;; Author: Xah Lee ( http://xahlee.info/ )
 ;; Maintainer: Xah Lee <xah@xahlee.org>
-;; Version: 18.1.20220921110635
+;; Version: 18.2.20221004113716
 ;; Created: 10 Sep 2013
 ;; Package-Requires: ((emacs "24.1"))
 ;; Keywords: convenience, emulations, vim, ergoemacs
@@ -251,15 +251,15 @@ Version: 2018-06-04 2021-03-16 2022-03-05"
       (end-of-line))))
 
 (defvar xah-brackets '("“”" "()" "[]" "{}" "<>" "<>" "()" "[]" "{}" "⦅⦆" "〚〛" 
"⦃⦄" "‹›" "«»" "「」" "〈〉" "《》" "【】" "〔〕" "⦗⦘" "『』" "〖〗" "〘〙" "「」" "⟦⟧" "⟨⟩" "⟪⟫" 
"⟮⟯" "⟬⟭" "⌈⌉" "⌊⌋" "⦇⦈" "⦉⦊" "❛❜" "❝❞" "❨❩" "❪❫" "❴❵" "❬❭" "❮❯" "❰❱" "❲❳" "〈〉" 
"⦑⦒" "⧼⧽" "﹙﹚" "﹛﹜" "﹝﹞" "⁽⁾" "₍₎" "⦋⦌" "⦍⦎" "⦏⦐" "⁅⁆" "⸢⸣" "⸤⸥" "⟅⟆" "⦓⦔" "⦕⦖" 
"⸦⸧" "⸨⸩" "⦅⦆")
-  "A list of strings, each element is a string of 2 chars, the left bracket 
and a matching right bracket. Used by `xah-select-text-in-quote'.")
+  "A list of strings, each element is a string of 2 chars, the left bracket 
and a matching right bracket. Used by `xah-select-text-in-quote' and others.")
 
 (defconst xah-left-brackets
   (mapcar (lambda (x) (substring x 0 1)) xah-brackets)
-  "List of left bracket chars.")
+  "List of left bracket chars. Each element is a string.")
 
 (defconst xah-right-brackets
   (mapcar (lambda (x) (substring x 1 2)) xah-brackets)
-  "List of right bracket chars.")
+  "List of right bracket chars. Each element is a string.")
 
 (defconst xah-punctuation-regex "[!?\".,`'#$%&*+:;=@^|~]+"
   "A regex string for the purpose of moving cursor to a punctuation.")
@@ -385,7 +385,7 @@ When called repeatedly, append copy subsequent lines.
 When `universal-argument' is called first, copy whole buffer (respects 
`narrow-to-region').
 
 URL `http://xahlee.info/emacs/emacs/emacs_copy_cut_current_line.html'
-Version: 2019-10-30"
+Version: 2010-05-21 2022-10-03"
   (interactive)
   (let ((inhibit-field-text-motion nil))
     (if current-prefix-arg
@@ -421,7 +421,7 @@ Version: 2019-10-30"
 When `universal-argument' is called first, cut whole buffer (respects 
`narrow-to-region').
 
 URL `http://xahlee.info/emacs/emacs/emacs_copy_cut_current_line.html'
-Version: 2015-06-10"
+Version: 2010-05-21 2015-06-10"
   (interactive)
   (if current-prefix-arg
       (progn ; not using kill-region because we don't want to include previous 
kill
@@ -519,7 +519,7 @@ Version: 2019-12-02 2021-07-03"
 
 (defun xah-move-block-up ()
   "Swap the current text block with the previous.
-After this command is called, press - to repeat it.
+After this command is called, press <up> or <down> to move. Any other key to 
exit.
 Version 2022-03-04"
   (interactive)
   (let (($p0 (point))
@@ -548,14 +548,13 @@ Version 2022-03-04"
     (goto-char $p1)
     (set-transient-map
      (let (($kmap (make-sparse-keymap)))
-       (define-key $kmap (kbd "-") #'xah-move-block-up)
        (define-key $kmap (kbd "<up>") #'xah-move-block-up)
        (define-key $kmap (kbd "<down>") #'xah-move-block-down)
        $kmap))))
 
 (defun xah-move-block-down ()
   "Swap the current text block with the next.
-After this command is called, press - to repeat it.
+After this command is called, press <up> or <down> to move. Any other key to 
exit.
 Version 2022-03-04"
   (interactive)
   (let (($p0 (point))
@@ -584,7 +583,6 @@ Version 2022-03-04"
     (goto-char $n2))
   (set-transient-map
    (let (($kmap (make-sparse-keymap)))
-     (define-key $kmap (kbd "-") #'xah-move-block-down)
      (define-key $kmap (kbd "<up>") #'xah-move-block-up)
      (define-key $kmap (kbd "<down>") #'xah-move-block-down)
      $kmap)))
@@ -1229,6 +1227,7 @@ Version: 2021-07-05 2021-08-13 2022-03-12 2022-05-16"
 
 (defun xah-reformat-to-sentence-lines ()
   "Reformat current block or selection into multiple lines by ending period.
+Move cursor to the beginning of next text block.
 After this command is called, press - to repeat it.
 
 URL `http://xahlee.info/emacs/emacs/elisp_reformat_to_sentence_lines.html'
@@ -1650,7 +1649,7 @@ Version: 2015-12-08"
 See also: `xah-paste-from-register-1', `copy-to-register'.
 
 URL `http://xahlee.info/emacs/emacs/elisp_copy-paste_register_1.html'
-Version: 2017-01-23"
+Version: 2012-07-17 2022-10-03"
   (interactive)
   (let ($p1 $p2)
     (if (region-active-p)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]