replaced defvar' with setq-local'

This commit fixes an issue where once an elisp block had been evaluated, its
value would not changed until Emacs were to be restarted. Hopefully this will
fix it.
This commit is contained in:
Phuntsok Drak-pa 2019-09-11 14:36:19 +02:00
parent 4e31a14754
commit 92d190243a
3 changed files with 7 additions and 7 deletions

View File

@ -658,7 +658,7 @@
#+NAME: vow-dot #+NAME: vow-dot
#+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes #+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes
<<tree-dot>> <<tree-dot>>
(defvar eittlandic-vowels (setq-local eittlandic-vowels
'("vowels" '("vowels"
("[high]" ("[high]"
("[rnd]" ("[rnd]"
@ -902,7 +902,7 @@
#+NAME: cons-dot #+NAME: cons-dot
#+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes #+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes
<<tree-dot>> <<tree-dot>>
(defvar eittlandic-consonants (setq-local eittlandic-consonants
'("consonants" '("consonants"
("[occ]" ("[occ]"
("[cor]" ("[cor]"

View File

@ -189,7 +189,7 @@
#+NAME: cons-tree #+NAME: cons-tree
#+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes #+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes
<<tree-dot>> <<tree-dot>>
(defvar nyqy-consonants (setq-local nyqy-consonants
'("[cons]" '("[cons]"
("[son]" ("[son]"
("[dor]" ("[dor]"
@ -309,7 +309,7 @@
#+NAME: vow-tree #+NAME: vow-tree
#+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes #+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes
<<tree-dot>> <<tree-dot>>
(defvar nyqy-vowels (setq-local nyqy-vowels
'("[vowel]" '("[vowel]"
("[back]" ("[back]"
("[tense]" ("[tense]"
@ -705,7 +705,7 @@
#+NAME: basic-syntax-tree #+NAME: basic-syntax-tree
#+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes #+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes
<<tree-dot>> <<tree-dot>>
(defvar nyqy-syntax-tree (setq-local nyqy-syntax-tree
'("S" '("S"
("Obl") ("Obl")
("S'" ("S'"

View File

@ -73,7 +73,7 @@
#+name: cons-tree #+name: cons-tree
#+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes #+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes
<<tree-dot>> <<tree-dot>>
(defvar taso-consonants (setq-local taso-consonants
'("consonant" '("consonant"
("[son]" ("[son]"
("[cor]" ("[cor]"
@ -156,7 +156,7 @@
#+name: vowel-tree #+name: vowel-tree
#+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes #+BEGIN_SRC emacs-lisp :noweb yes :exports none :eval yes :cache yes
<<tree-dot>> <<tree-dot>>
(defvar taso-vowels (setq-local taso-vowels
'("vowel" '("vowel"
("[high]" ("[high]"
("[frnt]" ("[frnt]"