Skip to content

Instantly share code, notes, and snippets.

View tsuu32's full-sized avatar
👾

Masahiro Nakamura tsuu32

👾
View GitHub Profile
From dacd2d63122622ddb967ad8bca46c158bcbfb85c Mon Sep 17 00:00:00 2001
From: Masahiro Nakamura <[email protected]>
Date: Fri, 14 Feb 2020 04:29:34 +0900
Subject: [PATCH] marked text face & Isearch patch
---
lisp/isearch.el | 3 +--
lisp/term/ns-win.el | 43 ++++++++++++++++++++++++++++++++++---------
src/keyboard.c | 7 ++++---
src/nsterm.m | 21 +++++++++++++++++++++
@tsuu32
tsuu32 / auctex-cluttex-scratch.el
Last active February 11, 2020 14:44
ClutTeX command for Emacs AUCTeX (experimental)
(add-hook 'plain-TeX-mode-hook
(lambda () (setq TeX-command-default "ClutTeX")))
(add-hook 'LaTeX-mode-hook
(lambda () (setq TeX-command-default "ClutTeX")))
(add-to-list 'TeX-expand-list
'("%(cltxengine)"
(lambda ()
(cond
((eq major-mode 'plain-tex-mode)
@tsuu32
tsuu32 / min10_example.png
Last active February 4, 2020 11:37
ブログ用
min10_example.png
@tsuu32
tsuu32 / tokenize.c
Last active November 17, 2019 00:58
CoreFoundation の CFStringTokenizer を使って(日本語でも)tokenize するやつ
/* compile: cc tokenize.c -o tokenize -framework CoreFoundation */
/* usage: ./tokenize 今日は晴れでいい気分
/* 参考: https://stackoverflow.com/questions/6877659/how-to-get-an-array-of-sentences-using-cfstringtokenizer */
#include <stdio.h>
#include <CoreFoundation/CoreFoundation.h>
int main(int argc, char *argv[])
{
if (argc != 2) {
% upLaTeX 文書
\documentclass[uplatex]{jsarticle}
\begin{document}
これは和文です(和文だよ)。
\end{document}
(defvar sushi-bar--old-format mode-line-format)
(defvar sushi-bar--conveyor-belt "")
(defvar sushi-bar--update-timer nil)
(defun sushi-bar--sushi-is-ready-p ()
(eq (random 15) 1))
(defun sushi-bar--conveyor-update ()
(require 'cl-lib)
(defvar-local sushi-bar--conveyor-belt "")
(defvar sushi-bar--update-timer nil)
(defvar sushi-bar--buffers 0)
(defun sushi-bar--sushi-is-ready-p ()
(eq (random 15) 1))