Merge pull request #790 from shutter-project/fix-783

Fix #783: Ugly but working replacement for #773

Author: Photon89

bin/shutter

@@ -419,7 +419,10 @@ sub STARTUP {
 	#--------------------------------------
 
 	#Clipboard
-	$clipboard = Gtk3::Clipboard::get(Gtk3::Gdk::Atom::intern("clipboard", FALSE));
+	{
+   	no warnings 'once';
+	$clipboard = Gtk3::Clipboard::get($Gtk3::Gdk::SELECTION_CLIPBOARD);
+	}
 
 	#Gettext
 	$d = $sc->get_gettext;