src/patches/lltjp-siunitx.sty

   1 %
   2 % lltjp-siunitx.sty 2018-08-24
   3 %
   4
   5 \NeedsTeXFormat{LaTeX2e}
   6
   7 \RequirePackage{luatexja}
   8 \ExplSyntaxOn
   9 \cs_generate_variant:Nn \tl_if_in:NnT { coT }
  10 \cs_new:Nn \__ltj_siunix_patch_inner:n {
  11   \cs_if_exist:cT { #1_tl } {
  12     \tl_if_in:coT { #1_tl } { \tex_char:D } {
  13           \tl_replace_all:cnn { #1_tl } { \tex_char:D } { \ltjalchar }
  14         }
  15   }
  16 }
  17 \cs_new:Nn \__ltj_siunix_patch_inner_math:n {
  18    \__ltj_siunix_patch_inner:n { l__siunitx_#1_math }
  19    \__ltj_siunix_patch_inner:n { l__siunitx_#1_text }
  20 }
  21 \AtBeginDocument {
  22   \__ltj_siunix_patch_inner:n { c__siunitx_minus }
  23   \__ltj_siunix_patch_inner:n { c__siunitx_mu }
  24   \__ltj_siunix_patch_inner_math:n { angstrom }
  25   \__ltj_siunix_patch_inner_math:n { arcminute }
  26   \__ltj_siunix_patch_inner_math:n { arcsecond }
  27   \__ltj_siunix_patch_inner_math:n { ohm }
  28 }
  29 \ExplSyntaxOff
  30 \endinput