diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-10-01 02:50:00 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-10-01 02:50:00 +0000 |
| commit | 9ffe3f52feebf9098f98c028e4dfeab3e4b44f92 (patch) | |
| tree | 289f1147e9dd00badca0202f741efb1071cc4b80 /lisp/emacs-lisp/chart.el | |
| parent | d8edf09f3780a74f4b9b118a1bad895fc40f9674 (diff) | |
| download | emacs-9ffe3f52feebf9098f98c028e4dfeab3e4b44f92.tar.gz | |
Doc/message fixes.
Diffstat (limited to 'lisp/emacs-lisp/chart.el')
| -rw-r--r-- | lisp/emacs-lisp/chart.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/chart.el b/lisp/emacs-lisp/chart.el index ba7982df731..b2c3989c56e 100644 --- a/lisp/emacs-lisp/chart.el +++ b/lisp/emacs-lisp/chart.el @@ -1,7 +1,7 @@ ;;; chart.el --- Draw charts (bar charts, etc) -;;; Copyright (C) 1996, 1998, 1999, 2001, 2004, 2005, 2007, 2008, 2009 -;;; Free Software Foundation, Inc. +;; Copyright (C) 1996, 1998, 1999, 2001, 2004, 2005, 2007, 2008, 2009 +;; Free Software Foundation, Inc. ;; Author: Eric M. Ludlam <zappo@gnu.org> ;; Version: 0.2 @@ -528,7 +528,7 @@ cons cells of the form (NAME . NUM). See SORT for more details." (remove-text-properties p (point) '(face)))))) (defun chart-zap-chars (n) - "Zap up to N chars without deleteting EOLs." + "Zap up to N chars without deleting EOLs." (if (not (eobp)) (if (< n (- (save-excursion (end-of-line) (point)) (point))) (delete-char n) @@ -579,7 +579,7 @@ R1 and R2 are dotted pairs. Colorize it with FACE." (defun chart-bar-quickie (dir title namelst nametitle numlst numtitle &optional max sort-pred) "Wash over the complex eieio stuff and create a nice bar chart. -Creat it going in direction DIR ['horizontal 'vertical] with TITLE +Create it going in direction DIR ['horizontal 'vertical] with TITLE using a name sequence NAMELST labeled NAMETITLE with values NUMLST labeled NUMTITLE. Optional arguments: @@ -619,7 +619,7 @@ SORT-PRED if desired." ;;; Sample utility function (defun chart-file-count (dir) - "Draw a chart displaying the number of different file extentions in DIR." + "Draw a chart displaying the number of different file extensions in DIR." (interactive "DDirectory: ") (if (not (string-match "/$" dir)) (setq dir (concat dir "/"))) |