Mercurial > emacs
comparison lisp/imenu.el @ 14040:187735b53d52
Comment fixes.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Fri, 05 Jan 1996 22:21:28 +0000 |
parents | 4eac65d000d3 |
children | b8c7c891ed63 |
comparison
equal
deleted
inserted
replaced
14039:831c5fda97f4 | 14040:187735b53d52 |
---|---|
367 ;; Avoid overflow from multiplying by 100! | 367 ;; Avoid overflow from multiplying by 100! |
368 (/ (1- pos) (max (/ total 100) 1)) | 368 (/ (1- pos) (max (/ total 100) 1)) |
369 (/ (* 100 (1- pos)) (max total 1))))) | 369 (/ (* 100 (1- pos)) (max total 1))))) |
370 | 370 |
371 ;;; | 371 ;;; |
372 ;;; Function for suporting general looking submenu names. | 372 ;;; Function for supporting general looking submenu names. |
373 ;;; Uses `imenu-submenu-name-format' for creating the name. | 373 ;;; Uses `imenu-submenu-name-format' for creating the name. |
374 ;;; NAME is the base of the new submenu name. | 374 ;;; NAME is the base of the new submenu name. |
375 ;;; | 375 ;;; |
376 (defun imenu-create-submenu-name (name) | 376 (defun imenu-create-submenu-name (name) |
377 (format imenu-submenu-name-format name)) | 377 (format imenu-submenu-name-format name)) |