From owner-svn-src-user@FreeBSD.ORG Mon May 21 23:38:40 2012 Return-Path: Delivered-To: svn-src-user@freebsd.org Received: from mx1.freebsd.org (mx1.freebsd.org [69.147.83.52]) by hub.freebsd.org (Postfix) with ESMTP id 17660106566C; Mon, 21 May 2012 23:38:40 +0000 (UTC) (envelope-from des@FreeBSD.org) Received: from svn.freebsd.org (svn.freebsd.org [IPv6:2001:4f8:fff6::2c]) by mx1.freebsd.org (Postfix) with ESMTP id BB7898FC0C; Mon, 21 May 2012 23:38:39 +0000 (UTC) Received: from svn.freebsd.org (localhost [127.0.0.1]) by svn.freebsd.org (8.14.4/8.14.4) with ESMTP id q4LNcd13078286; Mon, 21 May 2012 23:38:39 GMT (envelope-from des@svn.freebsd.org) Received: (from des@localhost) by svn.freebsd.org (8.14.4/8.14.4/Submit) id q4LNcdj2078284; Mon, 21 May 2012 23:38:39 GMT (envelope-from des@svn.freebsd.org) Message-Id: <201205212338.q4LNcdj2078284@svn.freebsd.org> From: Dag-Erling Smorgrav Date: Mon, 21 May 2012 23:38:39 +0000 (UTC) To: src-committers@freebsd.org, svn-src-user@freebsd.org X-SVN-Group: user MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Cc: Subject: svn commit: r235752 - user/des/fbce/lib/FBCE/Schema/Result X-BeenThere: svn-src-user@freebsd.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "SVN commit messages for the experimental " user" src tree" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Mon, 21 May 2012 23:38:40 -0000 Author: des Date: Mon May 21 23:38:38 2012 New Revision: 235752 URL: http://svn.freebsd.org/changeset/base/235752 Log: Add support for https gravatars. Modified: user/des/fbce/lib/FBCE/Schema/Result/Person.pm Modified: user/des/fbce/lib/FBCE/Schema/Result/Person.pm ============================================================================== --- user/des/fbce/lib/FBCE/Schema/Result/Person.pm Mon May 21 22:54:33 2012 (r235751) +++ user/des/fbce/lib/FBCE/Schema/Result/Person.pm Mon May 21 23:38:38 2012 (r235752) @@ -260,11 +260,15 @@ sub commit($) { # # Gravatar URL # -sub gravatar($) { - my ($self) = @_; +sub gravatar($;$) { + my ($self, $scheme) = @_; my $md5 = md5_hex($self->login . "\@freebsd.org"); - return "http://www.gravatar.com/avatar/$md5"; + if ($scheme eq 'https') { + return "https://secure.gravatar.com/avatar/$md5"; + } else { + return "http://www.gravatar.com/avatar/$md5"; + } } 1;