<pre class="lisp" style="font-family:monospace;"><ol><li style="font-weight: normal; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;"><span style="color: #66cc66;">(</span><span style="color: #b1b100;">defun</span> wsl-dict-at-point <span style="color: #66cc66;">(</span><span style="color: #66cc66;">)</span></div></li><li style="font-weight: normal; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;">  <span style="color: #ff0000;">"Search word at point in Daum Dictionary"</span></div></li><li style="font-weight: normal; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;">  <span style="color: #66cc66;">(</span>interactive<span style="color: #66cc66;">)</span></div></li><li style="font-weight: normal; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;">  <span style="color: #66cc66;">(</span><span style="color: #b1b100;">if</span> <span style="color: #66cc66;">(</span>looking-at <span style="color: #ff0000;">"[[:alpha:]]<span style="color: #000099; font-weight: bold;">\\</span>{2,<span style="color: #000099; font-weight: bold;">\\</span>}"</span><span style="color: #66cc66;">)</span></div></li><li style="font-weight: bold; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;">      <span style="color: #66cc66;">(</span>shell-command</div></li><li style="font-weight: normal; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;">       <span style="color: #66cc66;">(</span>concat <span style="color: #ff0000;">"cmd.exe /c start <span style="color: #000099; font-weight: bold;">\"</span><span style="color: #000099; font-weight: bold;">\"</span> <span style="color: #000099; font-weight: bold;">\"</span>https://dic.daum.net/search.do?q="</span></div></li><li style="font-weight: normal; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;">               <span style="color: #66cc66;">(</span>thing-at-point 'word<span style="color: #66cc66;">)</span> <span style="color: #ff0000;">"<span style="color: #000099; font-weight: bold;">\"</span> 2>/dev/null"</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></div></li><li style="font-weight: normal; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;">    <span style="color: #66cc66;">(</span>message <span style="color: #ff0000;">"Not on a alphabet word"</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span><span style="color: #66cc66;">)</span></div></li><li style="font-weight: normal; vertical-align:top;"><div style="font: normal normal 1em/1.2em monospace; margin:0; padding:0; background:none; vertical-align:top;"> </div></li></ol></pre>