Index: emacs/lisp/calc/calc-help.el
diff -c emacs/lisp/calc/calc-help.el:1.18 emacs/lisp/calc/calc-help.el:1.19
*** emacs/lisp/calc/calc-help.el:1.18 Wed Mar 30 16:35:25 2005
--- emacs/lisp/calc/calc-help.el Mon Apr 25 19:42:44 2005
***************
*** 393,404 ****
(error "Can't locate Calc sources"))
(calc-quit)
(switch-to-buffer "*Help*")
! (erase-buffer)
! (insert-file-contents (expand-file-name "README" (car path)))
! (search-forward "Summary of changes")
! (forward-line -1)
! (delete-region (point-min) (point))
! (goto-char (point-min))))
(defvar calc-help-long-names '((?b . "binary/business")
(?g . "graphics")
--- 393,406 ----
(error "Can't locate Calc sources"))
(calc-quit)
(switch-to-buffer "*Help*")
! (let ((inhibit-read-only t))
! (erase-buffer)
! (insert-file-contents (expand-file-name "README" (car path)))
! (search-forward "Summary of changes")
! (forward-line -1)
! (delete-region (point-min) (point))
! (goto-char (point-min)))
! (help-mode)))
(defvar calc-help-long-names '((?b . "binary/business")
(?g . "graphics")
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
