Org-ajandada fare vurgulamayı kapat

org-ajanda 'yı görüntülerken, farenin hangi noktasını çizdiğim vurgulanır. Bu satırlarda asla fare ile hareket etmediğim için ve noktanın da vurgulandığı noktadan beri, ekstra vurgu dikkat dağıtıcı ve kafa karıştırıcıdır.

How can I disable highlighting the line under the mouse tip in org-agenda views? I am sure it is an easy fix, but I can't figure out the name of the relevant variable to customize. Thank you!

4
Bir fare dokunuşuyla bir org-ajanda tamponu oluşturmak için etiketler ve son tarihler gibi belirli şeyleri tıklayabilmenin işlevselliğini devre dışı bırakmak mı, yoksa yalnızca vurgulamayı kapatmak ve işlevsellikten ayrılmak mı istiyorsunuz? Fare işaretçisi tıklanabilir alanlar üzerinde gezinirken hala değişiyor mu?
katma yazar lawlist, kaynak
@lawlist Dürüstçe, fareyi asla org-ajanda görünümlerinde kullanmıyorum ve bu modda fare işlevselliğini bilmiyorum. Vurgulama giderildikçe (fare ile vurgulanan nokta - yine de şu anda vurgulanan noktaya sahip çizgiyi istiyorum) org-ajanda 'da fare ile ilgili tüm işlevlerin devre dışı bırakılması iyi olur. Diğer bir deyişle, sadece fare vurgulamayı kapatmak iyidir ve onunla birlikte fare işlevselliğini devre dışı bırakmak da iyidir, ama ben bu konuda endişelenmiyorum.
katma yazar Lord Loh., kaynak

3 cevap

Gündemde bir bütün olarak fare yüzünü çıkardım:

(add-hook 'org-agenda-finalize-hook
      (lambda() (remove-text-properties
         (point-min) (point-max) '(mouse-face t)))) 
6
katma

Özellikle org modu hakkında soru sorduğunu anlıyorum. Ancak bu, bunu okuyanların ilgisini çekebilir.

Genel bir değişken var: mouse-highlight . Nil olarak ayarlamak, tüm modlarda tıklanabilir metnin vurgulanmasını devre dışı bırakır, tıklama işlevini sağlam tutar. Emacs kılavuzunda belgelenmiştir .

3
katma

Başka bir seçenek de fare yüzünü korumaktır (böylece fare imleci hala "el" olarak değişir) ancak vurgulamayı devre dışı bırakır:

(defun rg/modify-mouse-face ()
  (save-excursion
    (goto-char (point-min))
    (while (< (point) (point-max))
      (when (get-text-property (point) 'mouse-face)
        (remove-text-properties (point) (+ 1 (point)) '(mouse-face t))
        (add-text-properties (point) (+ 1 (point)) (list 'mouse-face (face-at-point t))))
      (forward-char))))
(add-hook 'org-finalize-agenda-hook 'rg/modify-mouse-face t)
0
katma