平衡点


2006/09/12

_ やることが遅い.

…GFD セミナのノート作ってたら, それだけで一日終ってしまった.

あれやこれや, やることあったのに….


2007/09/12

_ ええっと...

...無責任?(ボソッ)


2017/09/12

_ 続: tmux でのEAWの扱い

sid の tmux が 2.6~rc3-1 に上がったので, 状況を調べてみた.

前提

こちらの希望は

  • East Asian Ambiguous Character は二文字幅で生活したい
  • なるべく修正は少ない方が良い.

といった塩梅.

罫線素片の扱い

yanma(@yanma)さん | Twitter が tmux の upstream に request を投げて, 状況が改善された. 素晴しい.

というわけで, 設定ファイルに

set -ag terminal-overrides ',*:U8=0'

と書いておくと border に罫線素片が使われる.

とはいえ, VTE を利用している端末は, 罫線素片を再度 Unicode Box drawing char に置き換えるので, 例えば gnome-terminal なんかでは幸せになれません. 皆さん rxvt-unicode を使おう(違.

冗談はさておき, VTE を使っている端末の場合には, どうするのが良いのだろうねぇ...

文字幅の扱い.

あいかわらず, 文字幅の計算は LANG=en_US.UTF-8 決め打ちなのだが, これには明確な理由があるのだろうか....

やっぱり安直な方法はロケールを強制すること, です. その際に ja_JP.UTF-8 だけじゃなく, en_US.UTF-8 も置換しておくと Debian の提供するパッケージに手を入れる必要はなくなります(が, 副作用があるかもね).

のどれかお好きな奴を使いましょう(一番下は私が作っている/使っている奴です).

まとめ

以前は patch を当ててました.

今回の更新で, 少なくとも rxvt-unicode を使っているならば,

  • tmux.conf に設定を追加

    set -ag terminal-overrides ',*:U8=0'
  • locale の修正

で良くなりました.

あとは gnome-terminal みたいな VTE を使っている奴ですね. どうするのが良いかな...


2021/09/12

_ modus-theme

Emacs 28 から built-in となる予定の modus-themes(gitlab:modus-theme) がなかなか良い感じであったので, これまでチマチマと作成していたテーマからエイヤッっと乗り換えてみた.

default の font-lock- の組み合わせがあんまり気にくわなかったので 入れ替えたり継ぎ足したりして, 以下の様に.

(leaf modus-themes
  :ensure t
  :bind ("<f5>" . modus-themes-toggle)
  :init
  (modus-themes-load-themes)
  :config
  (modus-themes-load-vivendi)
  :preface
  (defun my:set-background (&optional frame)
    "Unsets the background color for transparency"
    (or frame
        (setq frame (selected-frame)))
    (if (display-graphic-p frame)
        (progn
          (set-frame-parameter nil 'alpha '(80  50))
          (add-to-list 'default-frame-alist '(alpha 80 50)))
      (set-face-background 'default "unspecified-bg" frame)))
  ;; (my:modus-themes-custom-faces)
  (defun my:modus-themes-custom-faces ()
    (modus-themes-with-colors
      (custom-set-faces
       ;;
       ;; `(hl-line ((,class :background "#556b2f")))
       ;;
       ;; preprocessor → builtin
       `(font-lock-builtin-face ((,class ,@(modus-themes--syntax-extra
                                              blue-alt-other blue-alt-other-faint
                                              blue-alt blue-alt-faint))))
       ;; preprocessor:: red
       `(font-lock-preprocessor-face ((,class :inherit modus-themes-bold
                                         ,@(modus-themes--syntax-extra
                                            red-alt red-alt-faint
                                            red-intense red-faint))))
       ;; constant → function
       `(font-lock-function-name-face ((,class ,@(modus-themes--syntax-extra
                                             blue-alt-other blue-alt-other-faint
                                             magenta-alt-other magenta-alt-other-faint))))
       ;; constant :: custom
       `(font-lock-constant-face ((,class ,@(modus-themes--syntax-extra
                                             orange-intense orange-intense
                                             orange-intense orange-intense))))
       ;; keyword → string
       `(font-lock-string-face ((,class :inherit modus-themes-bold
                                        ,@(modus-themes--syntax-extra
                                           magenta-alt-other magenta-alt-other-faint
                                           cyan cyan-faint))))
       ;; keyword :: custom
       `(font-lock-keyword-face ((,class :inherit modus-themes-bold
                                         ,@(modus-themes--syntax-extra
                                            red-alt-other red-alt-other-faint
                                            red-alt-other red-alt-other-faint))))
       ;; type → negation-char
       `(font-lock-negation-char-face ((,class :inherit modus-themes-bold
                                      ,@(modus-themes--syntax-foreground
                                         cyan-alt-other cyan-alt-faint))))
       ;; type :: custom
       `(font-lock-type-face ((,class :inherit modus-themes-bold
                                      ,@(modus-themes--syntax-foreground
                                         yellow-intense yellow-faint))))
       `(font-lock-regexp-grouping-backslash ((,class :inherit bold
                                                      ,@(modus-themes--syntax-string
                                                         fg-escape-char-backslash fg-escape-char-backslash
                                                         fg-escape-char-backslash fg-escape-char-backslash
                                                         ))))
       `(font-lock-regexp-grouping-construct ((,class :inherit bold
                                                      ,@(modus-themes--syntax-string
                                                         fg-escape-char-construct fg-escape-char-construct
                                                         fg-escape-char-construct fg-escape-char-construct
                                                         ))))
       ;; ちょっと気に食わないので…
       `(org-agenda-date-weekend
         ((,class :inherit 'default :foreground "#ff7f7f" :bold t)))
       `(org-agenda-date
         ((,class :inherit 'default :foreground "#ffffff" :bold t )))
       `(org-agenda-date-today
         ((,class :inherit 'default :foreground "#ffffff" :bold t :underline t)))
       ;; 不要
       `(org-block-begin-line ((,class :background nil)))
       `(org-block-end-line ((,class :background nil)))
       ;; shell に揃える.
       `(dired-directory ((,class :foreground "#7f7fff" :bold t)))
       ;;
       ;; wanderlust
       `(wl-highlight-folder-closed-face                  ((,class :foreground "#4cff4c")))
       `(wl-highlight-folder-few-face                     ((,class :foreground "#ff4c4c")))
       `(wl-highlight-folder-killed-face                  ((,class :foreground "#4f4f4f")))
       `(wl-highlight-folder-many-face                    ((,class :foreground "#ff4cff")))
       `(wl-highlight-folder-opened-face                  ((,class :foreground "#4cffff")))
       `(wl-highlight-folder-path-face                    ((,class :underline t :bold t)))
       `(wl-highlight-folder-unknown-face                 ((,class :foreground "#4cffff")))
       `(wl-highlight-folder-unread-face                  ((,class :foreground "#4c4cff")))
       `(wl-highlight-folder-zero-face                    ((,class :foreground "#f6f3e8")))
       `(wl-highlight-message-citation-header             ((,class :foreground "#7fff7f")))
       `(wl-highlight-message-cited-text-1                ((,class :foreground "#7fff7f")))
       `(wl-highlight-message-cited-text-2                ((,class :foreground "#FFE57F")))
       `(wl-highlight-message-cited-text-3                ((,class :foreground "#7f7fff")))
       `(wl-highlight-message-cited-text-4                ((,class :foreground "#A7FDEB")))
       `(wl-highlight-message-cited-text-5                ((,class :foreground "#ff7fff")))
       `(wl-highlight-message-cited-text-6                ((,class :foreground "#ff7f7f")))
       `(wl-highlight-message-cited-text-7                ((,class :foreground "#5CF19E")))
       `(wl-highlight-message-cited-text-8                ((,class :foreground "#FFD740")))
       `(wl-highlight-message-cited-text-9                ((,class :foreground "#4c4cff")))
       `(wl-highlight-message-cited-text-10               ((,class :foreground "#4cffff")))
       `(wl-highlight-message-header-contents             ((,class :foreground "#5CF19E")))
       `(wl-highlight-message-headers                     ((,class :foreground "#64FCDA" :bold t)))
       `(wl-highlight-message-important-header-contents   ((,class :foreground "#ff4cff" :bold t)))
       `(wl-highlight-message-important-header-contents2  ((,class :foreground "#ff4cff" :bold t)))
       `(wl-highlight-message-signature                   ((,class :foreground "#afafaf")))
       `(wl-highlight-message-unimportant-header-contents ((,class :foreground "#afafaf")))
       `(wl-highlight-summary-answered-face               ((,class :foreground "#4cff4c")))
       `(wl-highlight-summary-deleted-face                ((,class :foreground "#4c4caa")))
       `(wl-highlight-summary-disposed-face               ((,class :foreground "#7f7faa")))
       `(wl-highlight-summary-flagged-face                ((,class :foreground "#FFE57F" :bold t)))
       `(wl-highlight-summary-high-unread-face            ((,class :foreground "#ff4c4c")))
       `(wl-highlight-summary-low-unread-face             ((,class :foreground "#ff4c4c")))
       `(wl-highlight-summary-normal-face                 ((,class :foreground "#f6f3e8")))
       `(wl-highlight-summary-refiled-face                ((,class :foreground "#7f7fff")))
       `(wl-highlight-summary-spam-face                   ((,class :foreground "#ff4cff" :bold t)))
       `(wl-highlight-summary-thread-top-face             ((,class :foreground "#f6f3e8")))
       `(wl-highlight-summary-unread-face                 ((,class :foreground "#ff4c4c")))
       ;; (wl-highlight-header-separator-face               :foreground "#f6f3e8")
       ;; (wl-highlight-logo-face                           :foreground "#f6f3e8")
       ;; (wl-highlight-summary-copied-face                 :foreground "#f6f3e8")
       ;; (wl-highlight-summary-displaying-face             :foreground "#f6f3e8")
       ;; (wl-highlight-summary-resend-face                 :foreground "#f6f3e8")
       ;; (wl-highlight-summary-prefetch-face               :foreground "#f6f3e8")
       ;; (wl-highlight-summary-target-face                 :foreground "#f6f3e8")
       ;; (wl-highlight-summary-temp-face                   :foreground "#f6f3e8")
       ;; (wl-highlight-summary-new-face                    :foreground "#f6f3e8")
       ;; (wl-highlight-summary-killed-face                 :foreground "#f6f3e8")
       ;; (wl-highlight-summary-low-read-face               :foreground "#f6f3e8")
       ;; (wl-highlight-thread-indent-face                  :foreground "#f6f3e8")
       ;; (wl-highlight-summary-forwarded-face              :foreground "#f6f3e8")
       ;; (wl-highlight-summary-high-read-face              :foreground "#f6f3e8")
       ;; (wl-message-header-narrowing-face                 :foreground "#f6f3e8")
       ;; (wl-summary-persistent-mark-face                  :foreground "#f6f3e8")
       ;;
       )))
  :advice
  ((:after
    modus-themes-load-vivendi
    my:set-background)
   (:after
    modus-themes-load-operandi
    (lambda () (set-face-background 'default "#FFFFFF" )))
   )
  :hook
  `((modus-themes-after-load-theme-hook
     . (lambda ()
         (my:modus-themes-custom-faces)
         ;; (my:set-background)
         ))
    ;; (window-setup-hook . my:set-background)
    ;; (tty-setup-hook . my:set-background)
    )
  :custom
  `(
    (modus-themes-inhibit-reload          . t)
    (modus-themes-success-deuteranopia    . nil) ;; default
    (modus-themes-bold-constructs         . nil) ;; default
    (modus-themes-italic-constructs       . nil) ;; default
    (modus-themes-syntax                  . '(alt-syntax green-strings))
    (modus-themes-no-mixed-fonts          . t)
    (modus-themes-links                   . '(neutral-underline bold))
    (modus-themes-prompts                 . '(intense bold))
    (modus-themes-mode-line               . '(borderless accented))
    (modus-themes-tabs-accented           . t)
    (modus-themes-completions             . nil) ;; default
    (modus-themes-mail-citations          . nil) ;; default
    (modus-themes-fringes                 . nil) ;; default
    (modus-themes-lang-checkers           . '(straight-underline intense))
    (modus-themes-hl-line                 . '(accented intense)) ;; → custom
    (modus-themes-subtle-line-numbers     . nil) ;; default
    (modus-themes-paren-match             . '(bold intense))
    (modus-themes-region                  . '(accented no-extend))
    (modus-themes-diffs                   . nil) ;; default
    (modus-themes-org-blocks              . nil) ;; default
    (modus-themes-org-agenda              . '((t . nil)))
    (modus-themes-headings                . '((t . rainbow)))
    (modus-themes-scale-headings          . nil)
    (modus-themes-variable-pitch-ui       . nil)
    (modus-themes-variable-pitch-headings . nil)
    ;; (modus-themes-vivendi-color-overrides
    ;;  . '(
    ;;      (bg-hl-line-intense-accent . "#556b2f")
    ;;      ))
    )
  )

背景透過しているので, operandi だと上手く表示できなかったりするけどまあ, それはそれとして(vivendi の時だけ背景透過, とかできるかな?). (追記) advice :after で背景色だけ設定するようにしてみた. まあ, operandi は殆ど使わないケド.

  • Wanderlust の face(多過ぎぃ!)は, 既存のコピペ.
  • カスタマイズしている所も, 本当はちゃんと色を確認しないとアカンのだが, 手付かず.

流石に built-in の予定だけあって, 対応しているパッケージが多いのが良い.


連絡先など
最近の日記
一覧
2006|03|04|05|06|07|08|09|10|11|12|
2007|01|02|03|04|05|06|07|08|09|10|11|12|
2008|01|02|03|04|05|06|07|08|09|10|11|12|
2009|01|02|03|04|05|06|07|08|09|10|11|12|
2010|01|02|03|04|05|06|07|08|09|10|11|12|
2011|01|02|03|04|05|06|07|08|09|10|11|12|
2012|02|03|04|08|09|10|11|12|
2013|01|02|03|04|05|06|08|09|10|11|12|
2014|01|02|04|05|06|07|08|09|10|11|12|
2015|01|02|03|04|05|06|07|09|10|
2016|02|03|
2017|01|02|03|05|06|07|09|11|12|
2018|03|06|07|10|11|12|
2019|01|02|03|04|05|07|10|12|
2020|01|02|03|04|05|08|09|10|11|12|
2021|01|02|03|05|06|07|08|09|11|12|
2022|01|02|03|04|05|06|08|10|11|12|
2023|02|03|04|06|08|09|11|12|
2024|01|02|03|
Back to Top ▲