# HG changeset patch
# User Daniel Atallah <daniel.atallah@gmail.com>
# Date 1192731210 0
# Node ID 12753bdeaf47632fba224a44b54ff298008d8cae
# Parent  3a09d63e0c83167eac042d57ef2f8acbf66d96b3
Make Perl and Tcl debug information in the About dialog based on runtime information (the Perl and Tcl plugins being present) instead of compile time information.  This should be more accurate.  I don't know how this affects statically linked plugins (is that even possible for these plugins?).

diff -r 3a09d63e0c83 -r 12753bdeaf47 pidgin/gtkdialogs.c
--- a/pidgin/gtkdialogs.c	Thu Oct 18 16:23:23 2007 +0000
+++ b/pidgin/gtkdialogs.c	Thu Oct 18 18:13:30 2007 +0000
@@ -645,11 +645,10 @@
 	g_string_append(str, "    <b>Network Security Services (NSS):</b> Disabled<br/>");
 #endif
 
-#ifdef HAVE_PERL
+if (purple_plugins_find_with_id("core-perl") != NULL)
 	g_string_append(str, "    <b>Perl:</b> Enabled<br/>");
-#else
+else
 	g_string_append(str, "    <b>Perl:</b> Disabled<br/>");
-#endif
 
 #ifndef _WIN32
 #ifdef HAVE_STARTUP_NOTIFICATION
@@ -659,17 +658,17 @@
 #endif
 #endif
 
-#ifdef HAVE_TCL
+if (purple_plugins_find_with_id("core-tcl") != NULL) {
 	g_string_append(str, "    <b>Tcl:</b> Enabled<br/>");
-#else
-	g_string_append(str, "    <b>Tcl:</b> Disabled<br/>");
-#endif
-
 #ifdef HAVE_TK
 	g_string_append(str, "    <b>Tk:</b> Enabled<br/>");
 #else
 	g_string_append(str, "    <b>Tk:</b> Disabled<br/>");
 #endif
+} else {
+	g_string_append(str, "    <b>Tcl:</b> Disabled<br/>");
+	g_string_append(str, "    <b>Tk:</b> Disabled<br/>");
+}
 
 #ifndef _WIN32
 #ifdef USE_SM