Mercurial > emacs
comparison lisp/progmodes/cpp.el @ 40955:eb0bdaed72a8
(cpp-choose-face): Fix typo.
| author | Pavel Jan?k <Pavel@Janik.cz> |
|---|---|
| date | Mon, 12 Nov 2001 22:35:05 +0000 |
| parents | b174db545cfd |
| children | 7505ed4a9b60 |
comparison
equal
deleted
inserted
replaced
| 40954:5eb998b7a74c | 40955:eb0bdaed72a8 |
|---|---|
| 685 (list "Branch" (cons "Branch" cpp-branch-list))) | 685 (list "Branch" (cons "Branch" cpp-branch-list))) |
| 686 (cdr (assoc (completing-read "Branch: " cpp-branch-list nil t) | 686 (cdr (assoc (completing-read "Branch: " cpp-branch-list nil t) |
| 687 cpp-branch-list)))) | 687 cpp-branch-list)))) |
| 688 | 688 |
| 689 (defun cpp-choose-face (prompt default) | 689 (defun cpp-choose-face (prompt default) |
| 690 ;; Choose a face from cpp-face-defalt-list. | 690 ;; Choose a face from cpp-face-default-list. |
| 691 ;; PROMPT is what to say to the user. | 691 ;; PROMPT is what to say to the user. |
| 692 ;; DEFAULT is the default face. | 692 ;; DEFAULT is the default face. |
| 693 (or (if cpp-button-event | 693 (or (if cpp-button-event |
| 694 (x-popup-menu cpp-button-event | 694 (x-popup-menu cpp-button-event |
| 695 (list prompt (cons prompt cpp-face-default-list))) | 695 (list prompt (cons prompt cpp-face-default-list))) |