diff options
| author | Makarius Wenzel | 2008-07-09 15:11:58 +0000 |
|---|---|---|
| committer | Makarius Wenzel | 2008-07-09 15:11:58 +0000 |
| commit | b2f1fe36f90c763fd49d4a2bc31b7cf0f1ca04a2 (patch) | |
| tree | 9f5d1e2ea4d9632b83d25386084936b95abd1abc | |
| parent | 430ca22c74919524a4c8c7f6301e6539fb571b0b (diff) | |
cover isup as well;
| -rw-r--r-- | lib/unicode-tokens.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lib/unicode-tokens.el b/lib/unicode-tokens.el index abf4cc86..dc88fb04 100644 --- a/lib/unicode-tokens.el +++ b/lib/unicode-tokens.el @@ -453,8 +453,9 @@ Also sets `unicode-tokens-token-alist'." (display ((raise 0.4) "superscript") ((raise -0.4) "subscript") - ((raise 0.35) "superscript1") - ((raise -0.35) "subscript1") + ((raise 0.35) "superscript1") + ((raise -0.35) "subscript1") + ((raise 0.3) "idsuperscript1") ((raise -0.3) "idsubscript1") (default ))) "Text property table for annotations.") @@ -532,6 +533,9 @@ after next character (single character control sequence)." ((equal tok "sub") (list (setq unicode-tokens-next-control-token-seen-token "subscript1") t)) + ((equal tok "isup") + (list (setq unicode-tokens-next-control-token-seen-token + "idsuperscript1") t)) ((equal tok "isub") (list (setq unicode-tokens-next-control-token-seen-token "idsubscript1") t))))) |