Skip to content

Instantly share code, notes, and snippets.

@sergejx
Created September 4, 2009 14:03
Show Gist options
  • Save sergejx/180897 to your computer and use it in GitHub Desktop.
Save sergejx/180897 to your computer and use it in GitHub Desktop.
Real World Haskell comments remover
// ==UserScript==
// @name Real World Haskell comments remover
// @namespace http://sergejx.mysteria.cz/
// @description Remove links to comments from Real World Haskell online book.
// @include http://book.realworldhaskell.org/read/*
// ==/UserScript==
function addGlobalStyle(css) {
var head, style;
head = document.getElementsByTagName('head')[0];
if (!head) { return; }
style = document.createElement('style');
style.type = 'text/css';
style.innerHTML = css;
head.appendChild(style);
}
addGlobalStyle('.commenttoggle { display: none !important; }');
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment