diff options
| author | Andrea Corallo | 2024-10-11 15:26:28 +0200 |
|---|---|---|
| committer | Andrea Corallo | 2024-10-11 22:42:25 +0200 |
| commit | 6dbe4e99ac41bc1f5bcbdbda3c215941170bc9c5 (patch) | |
| tree | 7fc6820bc9927af92af3128fe5be0cd4bc1f60d3 | |
| parent | d664227f81aed98097520877a16c5369403a6a2d (diff) | |
| download | emacs-6dbe4e99ac41bc1f5bcbdbda3c215941170bc9c5.tar.gz emacs-6dbe4e99ac41bc1f5bcbdbda3c215941170bc9c5.zip | |
; * lisp/emacs-lisp/chart.el (chart-bar-quickie): Improve documentation.
| -rw-r--r-- | lisp/emacs-lisp/chart.el | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/lisp/emacs-lisp/chart.el b/lisp/emacs-lisp/chart.el index 2ca9b64be33..b9646e93253 100644 --- a/lisp/emacs-lisp/chart.el +++ b/lisp/emacs-lisp/chart.el | |||
| @@ -574,13 +574,11 @@ R1 and R2 are dotted pairs. Colorize it with FACE." | |||
| 574 | 574 | ||
| 575 | (defun chart-bar-quickie (dir title namelst nametitle numlst numtitle | 575 | (defun chart-bar-quickie (dir title namelst nametitle numlst numtitle |
| 576 | &optional max sort-pred) | 576 | &optional max sort-pred) |
| 577 | "Wash over the complex EIEIO stuff and create a nice bar chart. | 577 | "Create a bar chart in direction DIR [`horizontal' `vertical'] named TITLE. |
| 578 | Create it going in direction DIR [`horizontal' `vertical'] with TITLE | 578 | NAMELST is the list of bar names and NAMETITLE is the name the of axis containing |
| 579 | using a name sequence NAMELST labeled NAMETITLE with values NUMLST | 579 | them. NUMLST is the list of values and NUMTITLE is the name of the value |
| 580 | labeled NUMTITLE. | 580 | axis. Optional arguments: Set the chart's max element display to MAX, and sort |
| 581 | Optional arguments: | 581 | lists with SORT-PRED if desired." |
| 582 | Set the chart's max element display to MAX, and sort lists with | ||
| 583 | SORT-PRED if desired." | ||
| 584 | (let ((nc (make-instance 'chart-bar | 582 | (let ((nc (make-instance 'chart-bar |
| 585 | :title title | 583 | :title title |
| 586 | :key-label "8-m" ; This is a text key pic | 584 | :key-label "8-m" ; This is a text key pic |