(concat firstname " " lastname))
firstname
lastname))
- (company (cdr (assq 'company query)))
- (net (cdr (assq 'net query)))
- (notes (cdr (assq 'notes query)))
- (phone (cdr (assq 'phone query))))
+ (company (cdr (assq 'company query)))
+ (net (cdr (assq 'net query)))
+ (notes (cdr (assq 'notes query)))
+ (phone (cdr (assq 'phone query))))
(list name company net notes phone)))
(case-fold-search t)
bbdb-val)
(or (and (memq attr '(firstname lastname aka company phones
- addresses net))
+ addresses net))
(progn
(setq bbdb-val
(eval (list (intern (concat "bbdb-record-"