X-Git-Url: https://git.sesse.net/?p=pr0n;a=blobdiff_plain;f=perl%2FSesse%2Fpr0n%2FRegistry.pm;fp=perl%2FSesse%2Fpr0n%2FRegistry.pm;h=4ebd4f718c6e477d20540516092696468743bf37;hp=14b5b1447bb4c194622590727c43e9e733b95bb8;hb=f595655353d04ea4902857f3a8caf7b9c28b71e6;hpb=2488dbbf6694be7a8ceec5d68a2a1e85e68ba6c9

diff --git a/perl/Sesse/pr0n/Registry.pm b/perl/Sesse/pr0n/Registry.pm
index 14b5b14..4ebd4f7 100644
--- a/perl/Sesse/pr0n/Registry.pm
+++ b/perl/Sesse/pr0n/Registry.pm
@@ -22,6 +22,12 @@ sub handler {
 	$r->print("\"DisplayName\"=\"$vhost\"\r\n");
 	$r->print("\"Description\"=\"$desc\"\r\n");
 	$r->print("\"HREF\"=\"http://$vhost/wizard\"\r\n");
+	$r->print("");
+	$r->print("[HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\Currentversion\\Explorer\\PublishingWizard\\InternetPhotoPrinting\\Providers\\$vhost]\r\n");
+	$r->print("\"Icon\"=\"http://$vhost/pr0n.ico\"\r\n");
+	$r->print("\"DisplayName\"=\"$vhost\"\r\n");
+	$r->print("\"Description\"=\"$desc\"\r\n");
+	$r->print("\"HREF\"=\"http://$vhost/wizard\"\r\n");
 
 	return Apache2::Const::OK;
 }