Skip to content

Instantly share code, notes, and snippets.

@cwittern
cwittern / KR5c0057.xml
Created April 6, 2022 11:06
Authentication with Fore
<!-- this is what gets loaded from the exist-db in line 147 above -->
<TEI xmlns="http://www.tei-c.org/ns/1.0"><teiHeader>
<fileDesc>
<titleStmt>
<title>老子</title>
</titleStmt>
<editionStmt>
<edition>
<idno type="kanripo">KR5c0057</idno>
</edition>
;; this file sets the proxy as needed for the network in the zinbun in kyoto
;; try to set proxy
(setq ssid (if (eq window-system 'w32)
(shell-command-to-string "netsh wlan show interface | find /i \" SSID\"")
(shell-command-to-string "/System/Library/PrivateFrameworks/Apple80211.framework/Versions/Current/Resources/airport -I | awk '/ SSID/ {print substr($0, index($0, $2))}'")))
(ignore-errors
(if (string-match "WaveLAN" ssid)
(setq url-proxy-services '(("no_proxy" . "localhost")
;;setup file for mandoku: we add melpa, install the required packages and initialize
(require 'cl)
(load "package")
;;we need the melpa repository for mandoku
(add-to-list 'package-archives '("melpa" . "http://melpa.milkbox.net/packages/") t)
(package-initialize)
(defvar mandoku-starter-packages
(list