emacs.d/bundle/bundle--qda.el
2022-09-11 10:25:46 +02:00

47 lines
1.9 KiB
EmacsLisp
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

;;; bundle--qda.el --- Data and functions for qualitative data analysis
(defvar mk--qda/questions
;; A list of user interview questions.
'((general
((en "What does your typical weekday look like?")
(de "Wie sieht Ihr typischer Arbeitstag aus?"))
((en "Tell me about your role at your company?")
(de "Erzählen Sie mir etwas über Ihre Rolle in Ihrem Unternehmen?")))
(task
((en "Whats the hardest part about [problem / task]?")
(de "Was ist das Schwierigste an [Problem/Aufgabe]?"))
((en "How do you currently go about [problem / task]?")
(de "Wie gehen Sie derzeit [Problem/Aufgabe] an?"))
((en "What is the biggest pain point related to [problem / task]?")
(de "Was ist der größte Schmerzpunkt im Zusammenhang mit [Problem/Aufgabe]?")))
(demographic
((en "What is the highest degree or level of education you have completed?")
(de "Welches ist der höchste Abschluss, den Sie erworben haben?"))
((en "")))
(standard
((en "")
(de "")
(fr "")))))
(defvar mk--qda/explain-codes
;; Describe codes used for thematic analysis.
'((glossary (A users term))
(job (Users task))
(activity (Someone is acting))
(gain (Outcome that users want to achieve))
(pain (Undesired Outcome))
(tool (A special kind of hard- or software which supports users activity))))
(use-package subed
:config
;; Disable automatic movement of point by default
(add-hook 'subed-mode-hook 'subed-disable-sync-point-to-player)
;; Remember cursor position between sessions
(add-hook 'subed-mode-hook 'save-place-local-mode)
;; Break lines automatically while typing
(add-hook 'subed-mode-hook 'turn-on-auto-fill)
;; Break lines at 40 characters
(add-hook 'subed-mode-hook (lambda () (setq-local fill-column 40)))
(when (eq system-type 'windows-nt)
(when (directory-name-p "c:/msys64/")
(setq subed-mpv-executable "c:/msys64/mingw64/bin/mpv.exe"))))