From f273fa0ebbc2f94e2b0134a7e8824123fbb76f03 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Thu, 15 Sep 2011 03:15:18 +0200 Subject: Compatibility with filladapt. Seems like the add-on package filladapt.el is broken in that its version of fill-adapt uses a non-optional first argument. Aquamacs users were filling the pain. Fixed by passing nil in our call to fill-paragraph. Hat tip Jonathan Oddie. --- elisp/geiser-doc.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'elisp') diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el index c085718..ad16f92 100644 --- a/elisp/geiser-doc.el +++ b/elisp/geiser-doc.el @@ -1,6 +1,6 @@ ;;; geiser-doc.el -- accessing scheme-provided documentation -;; Copyright (C) 2009, 2010 Jose Antonio Ortega Ruiz +;; Copyright (C) 2009, 2010, 2011 Jose Antonio Ortega Ruiz ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the Modified BSD License. You should @@ -224,7 +224,7 @@ help (e.g. browse an HTML page) implementing this method.") (defun geiser-doc--insert-title (title) (let ((p (point))) (insert (format "%s" title)) - (fill-paragraph) + (fill-paragraph nil) (let ((indent-line-function 'lisp-indent-line)) (indent-region p (point))) (put-text-property p (point) 'face 'geiser-font-lock-doc-title) -- cgit v1.2.3