[gnus git] branch no-gnus updated: m0-1-32-g49b61d6 =1= (shr-color-set-minimum-interval): Renamed to add prefix

       via  49b61d6c8abde0d76a28fefa380b2dc6eb7bd353 (commit)
      from  224209579a4bbad483f41f7af6840fe1a81d8130 (commit)


- Log -----------------------------------------------------------------
commit 49b61d6c8abde0d76a28fefa380b2dc6eb7bd353
Author: Lars Ingebrigtsen <[email protected]>
Date:   Tue Feb 7 01:30:33 2012 +0100

    (shr-color-set-minimum-interval): Renamed to add prefix
    
    bug#10732

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2306e82..b9e05c0 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2012-02-07  Lars Ingebrigtsen  <[email protected]>
 
+	* shr-color.el (shr-color-set-minimum-interval): Renamed to add prefix
+	(bug#10732).
+
 	* shr.el (shr-insert-document): Add doc string.
 	(shr-visit-file): Ditto.
 	(shr-remove-trailing-whitespace): New function.
diff --git a/lisp/shr-color.el b/lisp/shr-color.el
index e23ab57..7011034 100644
--- a/lisp/shr-color.el
+++ b/lisp/shr-color.el
@@ -267,7 +267,8 @@ Like rgb() or hsl()."
      (t
       nil))))
 
-(defun set-minimum-interval (val1 val2 min max interval &optional fixed)
+(defun shr-color-set-minimum-interval (val1 val2 min max interval
+					    &optional fixed)
   "Set minimum interval between VAL1 and VAL2 to INTERVAL.
 The values are bound by MIN and MAX.
 If FIXED is t, then VAL1 will not be touched."
@@ -341,9 +342,9 @@ color will be adapted to be visible on BG."
 		 (>= luminance-distance shr-color-visible-luminance-min))
 	    (list bg fg)
 	  ;; Not visible, try to change luminance to make them visible
-	  (let ((Ls (set-minimum-interval (car bg-lab) (car fg-lab) 0 100
-					  shr-color-visible-luminance-min
-					  fixed-background)))
+	  (let ((Ls (shr-color-set-minimum-interval
+		     (car bg-lab) (car fg-lab) 0 100
+		     shr-color-visible-luminance-min fixed-background)))
 	    (unless fixed-background
 	      (setcar bg-lab (car Ls)))
 	    (setcar fg-lab (cadr Ls))

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog    |    3 +++
 lisp/shr-color.el |    9 +++++----
 2 files changed, 8 insertions(+), 4 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, no-gnus has been updated


hooks/post-receive
-- 
Gnus Project