nabaco

Public Sub SendToJoplin()
    Dim sToken As String, sURL As String
    Dim sURLNotes, sURLResources, sEscapedBody, sJSONString, sFolderID As String
    Dim objItem As Outlook.MailItem
    
    sToken = "REPLACE WITH YOUR TOKEN"
    sURL = "http://127.0.0.1:41184"
    sURLNotes = sURL & "/notes?token=" & sToken
    sURLResources = sURL & "/resources?token=" & sToken

nabaco

#!/usr/bin/bash

set -e

files=$(fd -e md .)
out="obsidian"

# Go over all files and turn the dot structure into diretory hierarchy
for file in $files; do
    path=$(basename -s .md "$file" | sed 's#\.#/#g')