hirono2021 @ ウィキ

Markdownから見出しレベルを指定しWikiに投稿するデータを生成

2021-04-14T11:20:51+09:00

&bold(){Emacs-Lisp関数} #highlight(lisp){{ ;; 2021-04-14 (defun k-markdown-copy-to-subtree-wiki (arg) "Narrow buffer to the current subtree." (interactive "p") (save-excursion (let ((=start)(=end)(=p)(line_start)(line_end)) ;;(markdown-outline-previous) (setq exec (lambda (pattern1 pattern2) (setq =p (point)) (re-search-backward pattern1 nil t)(setq =start (point)) (beginning-of-line)(setq line_start (point)) (end-of-line)(setq line_end (point)) (setq lv1 (concat "./" (car (nthcdr 5 (split-string (buffer-file-name) "/"))) "/")) (setq lv2 (concat (car (nthcdr 6 (split-string (buffer-file-name) "/"))) "/")) (setq title (concat lv1 lv2 (buffer-substring line_start line_end))) ;;(progn (markdown-back-to-heading-over-code-block t) (setq =start (point))) ;;(progn (markdown-end-of-sub

Markdownのカーソル位置にある見出しをwiki記法に変換し投稿用テキストを生成

2021-04-12T12:58:17+09:00

#highlight(lisp){{ ;; 2021-04-11 (defun k-markdown-copy-to-subtree-wiki () "Narrow buffer to the current subtree." (interactive) (save-excursion (let ((=start)(=end)) (markdown-outline-previous) (beginning-of-line)(setq =start (point)) (end-of-line)(setq =end (point)) (setq title (buffer-substring =start =end)) (progn (markdown-back-to-heading-over-code-block t) (setq =start (point))) (message title) (progn (markdown-end-of-subtree) (if (and (markdown-heading-at-point) (not (eobp))) (backward-char 1)) (setq =end (point)) (setq fname (file-name-nondirectory (buffer-file-name))) (string-match ".+_\\(.+\\)\\.md" fname) (setq fname (match-string 1 fname)) ;;(copy-region-as-kill =start =end) ;; 指定した範囲のリージョンのテキストを変数に代入 (setq title (replace-regexp-in-string "#" "＊" title)) (setq title (c

あ

2021-04-11T20:24:51+09:00

あ &lightbox(https://img.atwiki.jp/hirono2021/attach/14/1/2021-04-07%2018.22.55.jpg,link=image,title=@wiki,percent=50) &lightbox(https://img.atwiki.jp/hirono2021/attach/14/2/2021-04-09%2015.43.02.jpg,link=image,title=@wiki,percent=50)

Emacs-Lisp/現在の日付と時刻を独自フォーマットでカーソル位置に挿入

2021-04-12T10:39:19+09:00

&topicpath(top=Top) #highlight(sh){{ ;; 2021-04-11 (defun insert-start-date (arg) (interactive "p") (insert (format-time-string "〉〉〉 Linux Emacs： %Y/%m/%d %H:%M:%S 〉〉〉"))) (defun insert-end-date (arg) (interactive "p") (insert (format-time-string "〈〈〈 %Y/%m/%d %H:%M:%S Linux Emacs：〈〈〈 "))) ;;　キーマップに登録 ;;キャップスキーのキーバインド (let ((cmap (make-sparse-keymap))) ;caps key (define-key cmap "e" 'insert-end-date) (define-key cmap "s" 'insert-start-date) (setq caps-key cmap)) }} 実行結果： ---- ;; This buffer is for text that is not saved, and for Lisp evaluation. ;; To create a file, visit it with and enter text in its buffer. 〉〉〉 Linux Emacs： 2021/04/11 19:45:05 〉〉〉〈〈〈 2021/04/11 19:45:11 Linux Emacs：〈〈〈

Emacs-Lisp/read-string

2021-04-12T10:40:07+09:00

&topicpath(top=Top) #highlight(lisp){{ (setq default-format "%Y/%m/%d %H:%M:%S") (defvar insert-date-format-history '()) (read-string (format "Format (default %s): " default-format) "" 'insert-date-format-history xxx) "てすと" "x" (setq xxx "てすと") "てすと" }}

Emacs-Lisp

2021-04-11T19:31:43+09:00

* Emacs-Lisp #ls()

プラグイン/コメント

2021-04-11T18:49:17+09:00

* コメントプラグイン @wikiのwikiモードでは #comment() と入力することでコメントフォームを簡単に作成することができます。詳しくはこちらをご覧ください。＝＞http://www1.atwiki.jp/guide/pages/921.html#id_476878da ----- たとえば、#comment() と入力すると以下のように表示されます。 #comment

プラグイン

2021-04-11T18:49:17+09:00

@wikiにはいくつかの便利なプラグインがあります。 ----- #ls ----- これ以外のプラグインについては@wikiガイドをご覧ください =>http://atwiki.jp/guide/

プラグイン/動画(Youtube)

2021-04-11T18:49:17+09:00

* 動画(youtube) @wikiのwikiモードでは #video(動画のURL) と入力することで、動画を貼り付けることが出来ます。詳しくはこちらをご覧ください。＝＞http://www1.atwiki.jp/guide/pages/801.html#id_30dcdc73 また動画のURLはYoutubeのURLをご利用ください。＝＞http://www.youtube.com/ ----- たとえば、#video(http://youtube.com/watch?v=kTV1CcS53JQ)と入力すると以下のように表示されます。 #video(http://youtube.com/watch?v=kTV1CcS53JQ)

プラグイン/アーカイブ

2021-04-11T18:49:17+09:00

* アーカイブ @wikiのwikiモードでは #archive_log() と入力することで、特定のウェブページを保存しておくことができます。詳しくはこちらをご覧ください。＝＞http://www1.atwiki.jp/guide/pages/921.html#id_2d967d6e ----- たとえば、#archive_log()と入力すると以下のように表示されます。保存したいURLとサイト名を入力して"アーカイブログ"をクリックしてみよう #archive_log()