Fix typos on org-colview-xemacs.el

This commit is contained in:
Bernt Hansen 2008-12-16 09:51:34 -05:00
parent 5ee1bb9a4a
commit 455df64fba
1 changed files with 6 additions and 6 deletions

View File

@ -27,7 +27,7 @@
;;
;;; Commentary:
;; This file contains the face definitons for Org.
;; This file contains the face definitions for Org.
;;; Code:
@ -37,7 +37,7 @@
(declare-function org-agenda-redo "org-agenda" ())
;;; Definie additional faces for column view
;;; Define additional faces for column view
(when (featurep 'xemacs)
@ -159,7 +159,7 @@
))
(defun org-get-columns-level-face (n)
"Get the right face for match N in font-lock matching of healdines."
"Get the right face for match N in font-lock matching of headlines."
(setq org-l (- (match-end 2) (match-beginning 1) 1))
(if org-odd-levels-only (setq org-l (1+ (/ org-l 2))))
(setq org-f (nth (% (1- org-l) org-n-level-faces) org-columns-level-faces))
@ -414,7 +414,7 @@ This is the compiled version of the format.")
org-columns-ellipses))))
(defvar org-columns-full-header-line-format nil
"Fthe full header line format, will be shifted by horizontal scrolling." )
"The full header line format, will be shifted by horizontal scrolling." )
(defvar org-previous-header-line-format nil
"The header line format before column view was turned on.")
(defvar org-columns-inhibit-recalculation nil
@ -519,7 +519,7 @@ This is the compiled version of the format.")
(defvar org-agenda-columns-remove-prefix-from-item)
(defun org-agenda-columns-cleanup-item (item pl cphr fmt)
"Cleanup the tiem property for agenda column view.
"Cleanup the time property for agenda column view.
See also the variable `org-agenda-columns-remove-prefix-from-item'."
(let* ((org-complex-heading-regexp cphr)
(prefix (substring item 0 pl))
@ -934,7 +934,7 @@ around it."
(org-columns-redo)))
(defun org-columns-narrow (arg)
"Make the column nrrower by ARG characters."
"Make the column narrower by ARG characters."
(interactive "p")
(org-columns-widen (- arg)))