GK parent comment

Adds links to parent commentary to GK comments, and sets parent commentary text as link tooltip.

Terá de instalar uma extensão como Tampermonkey, Greasemonkey ou Violentmonkey para instalar este script.

You will need to install an extension such as Tampermonkey or Violentmonkey to install this script.

Terá de instalar uma extensão como Tampermonkey ou Violentmonkey para instalar este script.

Terá de instalar uma extensão como Tampermonkey ou Userscripts para instalar este script.

Terá de instalar uma extensão como Tampermonkey para instalar este script.

Terá de instalar uma extensão de gestão de scripts de utilizador para instalar este script.

(Já tenho um gestor de scripts de utilizador, deixe-me instalá-lo!)

Terá de instalar uma extensão como Stylus para instalar este estilo.

Terá de instalar uma extensão como Stylus para instalar este estilo.

Terá de instalar uma extensão como Stylus para instalar este estilo.

Terá de instalar uma extensão de gestão de estilos de utilizador para instalar este estilo.

Terá de instalar uma extensão de gestão de estilos de utilizador para instalar este estilo.

Terá de instalar uma extensão de gestão de estilos de utilizador para instalar este estilo.

(Já tenho um gestor de estilos de utilizador, deixe-me instalá-lo!)

// ==UserScript==
// @name	GK parent comment
// @namespace	GK
// @description	Adds links to parent commentary to GK comments, and sets parent commentary text as link tooltip.
// @include	http://govnokod.ru/*
// @include	http://www.govnokod.ru/*
// @version	1.2.0
// @grant	unsafeWindow
// ==/UserScript==

(function(){
function RunInPage(func) {
	var s = document.createElement("script"); 
	s.textContent = "(" + func + ")();"; 
	document.body.appendChild(s);
	setTimeout(function(){document.body.removeChild(s)}, 0);
}
RunInPage(function(){
	var PARENT = '<a class="comment-link comment-parent-link" href="">↑</a>';
	var $ = jQuery;

	//dirty, DIRTY hack to wait for certain element to appear. -_- 
	//But I have no idea how to do it right.
	function waitForSelector(selector, context, mustexist, callback) {
		if (($(selector, context).length>0) == mustexist)
			callback();
		else
			setTimeout(function(){waitForSelector(selector, context, mustexist, callback)}, 50);
		}

	//short function for adding custom CSS rules. Why use Greasemonkey specific GM_setStyle() just for that?
	function addCSS(rule) {
		var styleElement = document.createElement("style");
		styleElement.type = "text/css";
		if (typeof styleElement.styleSheet !== 'undefined')
			styleElement.styleSheet.cssText = rule;
		else
			styleElement.appendChild(document.createTextNode(rule));
		document.getElementsByTagName("head")[0].appendChild(styleElement);
		}

	addCSS([
		'.comment-parent-link {margin-left:10px;font-size:10pt}',
		].join('/n'));

	function hijackComments() {
		var oldLoadComments = comments['load'];

		function newLoadComments(aElemTrigger) {
			var $parent = $(aElemTrigger).closest('.entry-comments');
			oldLoadComments.call(this,aElemTrigger);
			waitForSelector('.hcomment', $parent, true, function(){
				setParentLinks($parent);
				});
			}

		comments['load'] = newLoadComments;
		}

	function highlightComment(e) {
		if (! $(e.target).is('a.comment-parent-link')) return;
		var match = $(e.target).attr('href').match(/\#comment(\d+)$/);
		if (match) {
			$('body').find('.highlight').removeClass('highlight');
			$('#comment-'+match[1]).addClass('highlight');
			}
		}
		
	function setParentLinks($context) {
		$context.find('.hcomment').each(function(i,e){
			var $this = $(this);
			var $parent = $this.parents('.hcomment:eq(0)');
			if ($parent.length) {
				var $parentlink = $(PARENT);
				$parentlink.attr('href', '#'+$parent.find('a.comment-link:eq(0)').attr('name'));
				$parentlink.attr('title', $parent.find('.comment-text:eq(0)').text());
				$this.find('a.comment-link:eq(0)').after($parentlink);
				}
			});
		}

	setParentLinks($('body'));
	hijackComments();
	$('body').click(highlightComment);
	});
})();