Lines Matching +defs:old +defs:syntax
214 This variable allows the same syntax as `gnus-home-score-file'."
422 (defvar gnus-adaptive-word-syntax-table
423 (let ((table (copy-syntax-table (standard-syntax-table)))
426 (modify-syntax-entry (pop numbers) " " table))
427 (modify-syntax-entry ?' "w" table)
847 (let ((old (gnus-score-get header))
867 (if (and old
868 (setq elem (assoc match old))
872 ;; Yup, we just add this new score to the old elem.
878 (gnus-score-set header (if old (cons new old) (list new)) nil t))
1314 (error "Invalid syntax with score file %s" file))
1316 ;; This is an old-style score file.
1317 (setq gnus-score-alist (gnus-score-transform-old-to-new alist)))
1320 ;; Check the syntax of the score file.
1322 (gnus-score-check-syntax gnus-score-alist file)))))
1324 (defun gnus-score-check-syntax (alist file)
1325 "Check the syntax of the score ALIST."
1373 (defun gnus-score-transform-old-to-new (alist)
1426 (let ((lisp-mode-syntax-table score-mode-syntax-table))
2199 (let ((syntab (syntax-table))
2204 (set-syntax-table gnus-adaptive-word-syntax-table)
2215 (set-syntax-table syntab))
2318 (syntab (syntax-table))
2322 (set-syntax-table gnus-adaptive-word-syntax-table)
2350 (set-syntax-table syntab))
2383 (let ((old-scored gnus-newsgroup-scored))
2441 (setq gnus-newsgroup-scored old-scored)))
2638 GROUP using BNews sys file syntax."