FIX for "Bing Search returns to the top" !

Stop doing weird things, Bing ! :)

Verze ze dne 03. 07. 2024. Zobrazit nejnovější verzi.

Zeptejte se na otázku, přidejte recenzi nebo skript nahlašte.

Wrap lines

// ==UserScript==
// @name         FIX for "Bing Search returns to the top" !
// @namespace    https://tampermonkey.net/FakerJMS
// @version      0.1.1
// @description  Stop doing weird things, Bing ! :)
// @author       FakerJMS
// @match        http*://*.bing.com/*
// @icon         https://www.bing.com/sa/simg/favicon-trans-bg-blue-mg.ico
// @grant        none
// @license      MIT
// ==/UserScript==

(function() {
    'use strict';

    // 备份
    window._fk_scrollTo = window.scrollTo;

    // 禁用"滚动到顶部"
    function disable_scrollToTop() {
        window.scrollTo = function(x, y) {
            /*
            if (y !== 0) {
                window._fk_scrollTo(x, y);
            }
            */
        };
    }

    // 使能"滚动到顶部"
    function _enable_scrollToTop(){
        window.scrollTo = window._fk_scrollTo;
    }

    // 延时使能"滚动到顶部"
    function enable_scrollToTop() {
        setTimeout(_enable_scrollToTop, 2000);
    }

    // 监听"获取焦点"事件
    window.addEventListener('focus', enable_scrollToTop);
    // 监听"失去焦点"事件
    window.addEventListener('blur', disable_scrollToTop);
})();