small revision; add note about 'uic';

This commit is contained in:
polos 2020-07-28 09:37:10 +02:00
parent 20516a7da7
commit 4208e0ddf9
2 changed files with 10 additions and 5 deletions

View file

@ -44,11 +44,11 @@
(defun grep (name)
(flet ((one-space (s)
(x:join (remove-if 'x:empty-string (x:split s)))))
(let ((s (ext:run-program "grep" (list "-rn"
"--include"
"*.qml"
(format nil "objectName:[[:space:]]*~S" name)
"qml/"))))
(let ((s (ext:run-program "grep" (list "-rn"
"--include"
"*.qml"
(format nil "objectName:[[:space:]]*~S" name)
"qml/"))))
(loop :for line = (read-line s nil nil)
:while line :collect (one-space line)))))

View file

@ -1,6 +1,11 @@
;;; copyright (c) Polos Ruetz
;;;
;;; user interface compiler
;;;
;;; N.B. you need to point a symbolic link to your 'uic', like:
;;;
;;; cd /usr/bin
;;; sudo ln -s ~/Qt5.13.2/5.13.2/gcc_64/bin/uin uic
(defpackage :quic
(:use :common-lisp :eql)