オムレツ。今日はきれいにできた。記録のためにたまには写真を載せておこう。 (写真をクリックすると大きな画像になります)
奥さんは今日はボランティア活動で上野方面へ。
ヴィクトリアマイル。いつもの三連複ボックスのための6頭を選ぶ。
- ナムラクレアは強いが最近1200しか走ってない。
- ソングラインは海外遠征明け。その前走1351TSは10着。
- この二頭を外して、まずスタニングローズを入れるか。
- スタニングローズは、昨年のオークスで10番人気なのに2着に入って文字通り驚かされたのが印象的。そのときの1着はスターズオンアース。その再現となるかも。
- あと1頭は、阪神牝馬1着のサウンドビバーチェか。持ちタイムもいいし。

馬番	馬名	人気	評価
2	スターズオンアース	1	○
16	ソダシ	2	◎
11	ナミュール	3	▲
6	ソングライン	4
12	ナムラクレア	5
8	ララクリスティーヌ	6	△
5	スタニングローズ	7	△
3	サウンドビバーチェ	8	△
15	ルージュスティリア	9

結果は以下の通り。

着順	馬名
1	ソングライン
2	ソダシ
3	スターズオンアース
5	サウンドビバーチェ
7	ナミュール
8	ナムラクレア
12	スタニングローズ
14	ララクリスティーヌ

外したソングラインが1着に入ってアウト。これはしょうがない。ソングラインは大敗した後でもしれっと復活することがある馬なのだそうだ。サウンドビバーチェは5位と健闘。ナミュールとスタニングローズは意外に振るわなかった。来週はオークス。

このファイルをアップロードするelispをバージョンアップ。タイムスタンプがきれいに並ぶように、バッファの最後が行頭でなかったら改行を挿入してからタイムスタンプを記入する。（タイムスタンプはもとのorgファイルに記録されて、htmlにはexportされない。）

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; my_close_org_memo.el
;;
(defun my_close_org_memo()
  "insert a time-stamp, export only the body to html, and upload the html file."
  (interactive)
  (setq html_file_name (concat (file-name-sans-extension (buffer-file-name)) ".html"))
  (end-of-buffer)
  (if (bolp) (insert (format-time-string "# EXPORTED and UPLOADED at %Y-%m-%d %H:%M:%S")) 
    (insert (format-time-string "\n# EXPORTED and UPLOADED at %Y-%m-%d %H:%M:%S")) ;バッファの最後が行頭でなかったら改行を挿入
  )
  (save-buffer)
  (org-html-export-to-html nil nil t t)
  (shell-command-to-string
   (mapconcat #'shell-quote-argument
              (list "rsync" "-auv" html_file_name "username@domain.xx.xx:www/memo/")
              " ")
   )
  )

昼食は、冷蔵庫にハムとタマネギがあったので、炒飯を作る。味付けは塩コショウと鶏ガラスープの素を少々。それほどパラパラではないが、普通に美味しくできた。
夕食は、茄子と豚肉の炒めものとカレイの西京焼き。先日のアド街が近所の商店街のことをやっていたので、その録画を見ながら。しかし、知っている商店街とは違うところのようだった。コロナもあって、ずいぶん店が変わっている。