Browse Source

Fix some typos.

Among others, this renames the variable `org-mtags-prefere-muse-templates'
to `org-mtags-prefer-muse-templates'.  I guess hardy anyone is using this.
Carsten Dominik 16 years ago
parent
commit
2d59facec7
2 changed files with 20 additions and 6 deletions
  1. 1 1
      contrib/lisp/org-mtags.el
  2. 19 5
      lisp/org.el

+ 1 - 1
contrib/lisp/org-mtags.el

@@ -102,7 +102,7 @@
   :group 'org-mtags
   :group 'org-mtags
   :group 'org-faces)
   :group 'org-faces)
 
 
-(defcustom org-mtags-prefere-muse-templates t
+(defcustom org-mtags-prefer-muse-templates t
   "Non-nil means, prefere Muse tags for structure elements.
   "Non-nil means, prefere Muse tags for structure elements.
 This is relevane when expanding the templates defined in the variable
 This is relevane when expanding the templates defined in the variable
 `org-structure-templates'."
 `org-structure-templates'."

+ 19 - 5
lisp/org.el

@@ -6086,7 +6086,7 @@ This link is added to `org-stored-links' and can later be inserted
 into an org-buffer with \\[org-insert-link].
 into an org-buffer with \\[org-insert-link].
 
 
 For some link types, a prefix arg is interpreted:
 For some link types, a prefix arg is interpreted:
-For links to usenet articles, arg negates `org-gnus-prefere-web-links'.
+For links to usenet articles, arg negates `org-gnus-prefer-web-links'.
 For file links, arg negates `org-context-in-file-links'."
 For file links, arg negates `org-context-in-file-links'."
   (interactive "P")
   (interactive "P")
   (org-load-modules-maybe)
   (org-load-modules-maybe)
@@ -7709,7 +7709,7 @@ for the file uning completion.
 There are two templates for each key, the first uses the original Org syntax,
 There are two templates for each key, the first uses the original Org syntax,
 the second uses Emacs Muse-like syntax tags.  These Muse-like tags become
 the second uses Emacs Muse-like syntax tags.  These Muse-like tags become
 the default when the /org-mtags.el/ module has been loaded. See also the
 the default when the /org-mtags.el/ module has been loaded. See also the
-variable `org-mtags-prefere-muse-templates'.
+variable `org-mtags-prefer-muse-templates'.
 This is an experimental feature, it is undecided if it is going to stay in."
 This is an experimental feature, it is undecided if it is going to stay in."
   :group 'org-completion
   :group 'org-completion
   :type '(repeat
   :type '(repeat
@@ -7732,7 +7732,7 @@ expands them."
 
 
 (defun org-complete-expand-structure-template (start cell)
 (defun org-complete-expand-structure-template (start cell)
   "Expand a structure template."
   "Expand a structure template."
-  (let* ((musep (org-bound-and-true-p org-mtags-prefere-muse-templates))
+  (let* ((musep (org-bound-and-true-p org-mtags-prefer-muse-templates))
 	 (rpl (nth (if musep 2 1) cell)))
 	 (rpl (nth (if musep 2 1) cell)))
     (delete-region start (point))
     (delete-region start (point))
     (when (string-match "\\`#\\+" rpl)
     (when (string-match "\\`#\\+" rpl)
@@ -12671,7 +12671,14 @@ depending on context.  See the individual commands for more information."
    (t (call-interactively 'org-next-item))))
    (t (call-interactively 'org-next-item))))
 
 
 (defun org-shiftright (&optional arg)
 (defun org-shiftright (&optional arg)
-  "Next TODO keyword or timestamp one day later, depending on context."
+  "Cycle the thing at point or in the current line, depending on context.
+Depending on context, this does one of the following:
+
+- switch a timestamp at point one day into the future
+- on a headline, switch to the next TODO keyword.
+- on an item, switch entire list to the next bullet type
+- on a property line, switch to the next allowed value
+- on a clocktable definition line, move time block into the future"
   (interactive "P")
   (interactive "P")
   (cond
   (cond
    ((org-at-timestamp-p t) (call-interactively 'org-timestamp-up-day))
    ((org-at-timestamp-p t) (call-interactively 'org-timestamp-up-day))
@@ -12682,7 +12689,14 @@ depending on context.  See the individual commands for more information."
    (t (org-shiftcursor-error))))
    (t (org-shiftcursor-error))))
 
 
 (defun org-shiftleft (&optional arg)
 (defun org-shiftleft (&optional arg)
-  "Previous TODO keyword or timestamp one day earlier, depending on context."
+  "Cycle the thing at point or in the current line, depending on context.
+Depending on context, this does one of the following:
+
+- switch a timestamp at point one day into the past
+- on a headline, switch to the previous TODO keyword.
+- on an item, switch entire list to the previous bullet type
+- on a property line, switch to the previous allowed value
+- on a clocktable definition line, move time block into the past"
   (interactive "P")
   (interactive "P")
   (cond
   (cond
    ((org-at-timestamp-p t) (call-interactively 'org-timestamp-down-day))
    ((org-at-timestamp-p t) (call-interactively 'org-timestamp-down-day))