Entries this day: lins-bag-today marble-track-3-website-easier-to-write mens-group-today

lins bag today

08:54 Monday 06 May 2019 JST

It turns out I like the bag Lin bought online better than the bag I bought in a shop last year. The wheels on her bag are larger and quieter. That was something I could not test on the linoleum tile floors in the shop. That sounded perfectly smooth there, but out on the street they are raucous.

And this bag has more pockets. I thought I could survive with the number of pockets on the other bag, but this one is way more pockety

marble track 3 website easier to write

08:57 Monday 06 May 2019 JST

Atom editor has a way to write my own autocomplete rules. I don't have a link handy, but it is handy for making links.

So I have a two part approach:

1. create a file with Emacs by entering a Title (part name), Shortcode, Image,

Tag(s), and date. Emacs creates the new file as part_name.md and now appends to the Atom file ~/.atom/snippets.cson the information necessary to let Atom auto complete the markdown after I type the shortcode.

1. use Atom to edit the file and easily insert markdown via

autocompletion. Yay!

Here is the most recent addition to snippets.cson

      'Lower Zig Zag 3 ban Upper Base Base':
        'prefix': 'lzz3bubb'
        'body': '[Lower Zig Zag 3 ban Upper Base Base](/parts/lower-zig-zag-3-ban-upper-base-base/)'

With this, I can type lzz3bubb RET to get Atom to write

[Lower Zig Zag 3 ban Upper Base Base](/parts/lower-zig-zag-3-ban-upper-base-base/)

Awesome.

I am headed to men's group to lead workshops all day so will probably forget to show the code, but there is code on github.

Emacs function to create file and autocomplete mt3-new-part

(defun mt3-new-part (title shortcode tags image yyyy mm dd)
  "Create a new track part for Marble Track 3 .com with TITLE, TAGs, and shortcode."
  (interactive
    (list
      (read-string "Title: ")
      (read-string "Shortcode: ")
      (journal-read-tags nil)
      (read-string "Image: " nil nil "/img/guest/default-guest.png")
      (read-string (format "Year (%s): " (format-time-string "%Y")) nil nil (format-time-string "%Y"))
      (read-string (format "Month (%s): " (format-time-string "%m")) nil nil (format-time-string "%m"))
      (read-string (format "Date (%s): " (format-time-string "%d")) nil nil (format-time-string "%d"))
    )
  )
  (let (
        (file-name (journal-post-title dd title))
        (file-path (journal-no-date-path title))
        )
    (switch-to-buffer (find-file-noselect location-atom-snippets))
    (end-of-buffer)
         (insert
          (format
          (get-string-from-file (expand-file-name "snippet_part.txt" location-journal-template-files))
           title
     	     shortcode
           title
     	     (file-name-sans-extension file-path)  ;; https://stackoverflow.com/a/8716106/194309
     	     ))
	 (save-buffer)
	 (kill-buffer)
    (set-buffer (get-buffer-create file-path))
    (insert
      (format
         (get-string-from-file (expand-file-name "mt3_parts_template.txt" location-journal-template-files))
         title
         (mapconcat (lambda (x) (format "\"%s\"" (downcase x)))	tags ", ")
         image
         (thumbnail-path image)
         title
         shortcode
         yyyy
         mm
         dd
         (format-time-string "%H:%M:%S+09:00")
         (format-time-string "%Y %b %d ")
      )
    )
    (write-file (expand-file-name file-path (concat mt3-site-location "parts")))
    (switch-to-buffer file-path)
    (auto-fill-mode)
  )
)

mens group today

08:40 Monday 06 May 2019 JST

Right now I'm headed to Hiroo for two (2) workshops. One, for men already in the group, a Mission workshop to find or refine our life missions. *Why are we here in this world, on this planet? What value do we bring to the world? How?*

The next workshop is for new men, an introduction to our work. I think a couple men will attend even though I am the only person who has responded on Meetup for our second Journey of the Heart workshop.

I chalk it up to only having it online for about 10 days with minimal promotion.

18:11 Monday 06 May 2019 JST

Great workshops today. Good feedback from the men on both of them. Great work by men who participated.

Six men in attendance, counting me and Robert Golden who has attended as a guest facilitator.

I feel physically tired. Emotionally I feel grounded joy.