[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 51/352: Lasketaan uuden ajastimen käynnistysviive edellisestä et
From: |
Stefan Monnier |
Subject: |
[elpa] 51/352: Lasketaan uuden ajastimen käynnistysviive edellisestä eteenpäin |
Date: |
Mon, 07 Jul 2014 14:01:56 +0000 |
monnier pushed a commit to branch master
in repository elpa.
commit b22dfb9a420cae769a3eb0c7e9e7b49163cd8d4b
Author: Teemu Likonen <address@hidden>
Date: Wed May 20 17:50:25 2009 +0000
Lasketaan uuden ajastimen käynnistysviive edellisestä eteenpäin
Oikolukuajastin käynnistyy muuttujan wcheck-timer-idle osoittaman ajan
kuluttua siitä, kun käyttäjä jää toimettomaksi. Aiemmin maalausajastin
puolestaan käynnistyi tuo aika kerrottuna kahdella. Nyt muutetaan
toimintaa siten, että maalausajastimen viive lasketaan
oikolukuajastimesta eteenpäin wcheck-timer-idlen osoittaman ajan verran.
Laskemisessa käytetään apuna uutta apufunktiota.
Lopputulos on käytännössä sama, mutta tämä muutos mahdollistaa helpommin
useampien ajastimien laittamisen peräkkäin.
---
wcheck-mode.el | 17 +++++++++++++++--
1 files changed, 15 insertions(+), 2 deletions(-)
diff --git a/wcheck-mode.el b/wcheck-mode.el
index e4cf8fe..5a0aa57 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -442,8 +442,9 @@ in buffers."
'nomb t))))
;; Start a timer which will mark text in buffers/windows.
- (run-with-idle-timer (* 2 wcheck-timer-idle) nil
- 'wcheck-timer-paint-event))
+ (run-with-idle-timer (+ wcheck-timer-idle
+ (wcheck-current-idle-time-seconds))
+ nil 'wcheck-timer-paint-event))
(defun wcheck-timer-paint-event ()
@@ -736,6 +737,18 @@ ulkoista ohjelmaa. Palauttaa t tai nil."
t))
+(defun wcheck-current-idle-time-seconds ()
+ "Return current idle time in seconds."
+ (let* ((idle (current-idle-time))
+ (high (nth 0 idle))
+ (low (nth 1 idle))
+ (micros (nth 2 idle)))
+ (+ (* high
+ (expt 2 16))
+ low
+ (/ micros 1000000.0))))
+
+
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Overlay
- [elpa] 43/352: Englanninkielinen kuvaus ja koodin kommentit funktiolle wcheck-mode, (continued)
- [elpa] 43/352: Englanninkielinen kuvaus ja koodin kommentit funktiolle wcheck-mode, Stefan Monnier, 2014/07/07
- [elpa] 48/352: Siirretään oikolukupyyntölistan muokkaus aiemmaksi, Stefan Monnier, 2014/07/07
- [elpa] 46/352: Tehdään maalausajastimesta nimetty funktio (ei lambda), Stefan Monnier, 2014/07/07
- [elpa] 50/352: Käännetään ajastinfunktiot englanniksi, Stefan Monnier, 2014/07/07
- [elpa] 44/352: Lisätään asennusohjeet wcheck-mode.el-tiedoston alkuun, Stefan Monnier, 2014/07/07
- [elpa] 42/352: Tehdään oletuskielestä customize-muuttuja, Stefan Monnier, 2014/07/07
- [elpa] 52/352: Uusi tapa lukea tekstiä ikkunasta, Stefan Monnier, 2014/07/07
- [elpa] 49/352: Siirretään maalauspyyntölistan muokkaus aiemmaksi, Stefan Monnier, 2014/07/07
- [elpa] 45/352: Tarkistetaan prosessi funktion wcheck-program-executable-p avulla, Stefan Monnier, 2014/07/07
- [elpa] 47/352: Muutetaan funktion nimeä: wcheck-timer-event -> wcheck-timer-read-event, Stefan Monnier, 2014/07/07
- [elpa] 51/352: Lasketaan uuden ajastimen käynnistysviive edellisestä eteenpäin,
Stefan Monnier <=
- [elpa] 55/352: Päivitetään myös outline-näkyvyyden muuttuessa, Stefan Monnier, 2014/07/07
- [elpa] 57/352: Maalataan vain näkyvät tekstialueet, hypätään näkymättömien yli, Stefan Monnier, 2014/07/07
- [elpa] 56/352: Muodostetaan säännöllinen lauseke valmiiksi ennen silmukkaa, Stefan Monnier, 2014/07/07
- [elpa] 53/352: Funktio wcheck-read-words englanniksi, Stefan Monnier, 2014/07/07
- [elpa] 54/352: Poistetaan globaalit koukut ajastimesta riippumatta, Stefan Monnier, 2014/07/07
- [elpa] 59/352: Sallitaan lausekkeen täsmääminen heti edellisen perään, Stefan Monnier, 2014/07/07
- [elpa] 58/352: Funktio wcheck-paint-words englanniksi, Stefan Monnier, 2014/07/07
- [elpa] 63/352: Kutsutaan maalausajastinta useita kertoja peräkkäin, Stefan Monnier, 2014/07/07
- [elpa] 61/352: Lisätään ;;;###autoload -määritykset, Stefan Monnier, 2014/07/07
- [elpa] 62/352: Käsitellään oikein tilanne, jossa joutenoloaika on nolla, Stefan Monnier, 2014/07/07